]> gitweb.factorcode.org Git - factor.git/commitdiff
Get concurrency code to work with 0.77 changes.
authorChris Double <chris.double@double.co.nz>
Tue, 23 Aug 2005 23:59:43 +0000 (23:59 +0000)
committerChris Double <chris.double@double.co.nz>
Tue, 23 Aug 2005 23:59:43 +0000 (23:59 +0000)
contrib/concurrency/concurrency.factor

index 8545ea91e23757544e29168d4e68e62f87149851..f64dd222776dead150412af2480fa6297643c75d 100644 (file)
@@ -166,9 +166,9 @@ init-main-process
 : with-process ( quot process -- )
   #! Calls the quotation with 'self' set
   #! to the given process.
-  <namespace> [
+  [
     self-process set
-  ] extend
+  ] make-hash
   swap bind ;
 
 : spawn ( quot -- process )