diff nworker_c.rhope @ 115:04148770c229

Merge
author Mike Pavone <pavone@retrodev.com>
date Wed, 13 Oct 2010 01:18:53 +0000
parents 25a205094f9b fd23ab2c1a73
children 4d089503fb51
line wrap: on
line diff
--- a/nworker_c.rhope	Wed Oct 13 01:15:04 2010 +0000
+++ b/nworker_c.rhope	Wed Oct 13 01:18:53 2010 +0000
@@ -834,7 +834,7 @@
 	after save <- Fold[Save Result[?, ?, node index], with call, Range[0, save outs]]
 }
 
-Compile Node@NWorker[worker,program,func,nodes,current:out,out worker]
+Compile Node[worker,program,func,nodes,current:out,out worker]
 {
 	node index <- [nodes]Index[current]
 	node <- [[worker]Nodes >>]Index[node index]
@@ -900,7 +900,7 @@
 	}
 }
 
-Save Node Conditions@NWorker[worker,node index:out]
+Save Node Conditions[worker,node index:out]
 {
 	node <- [[worker]Nodes >>]Index[node index]
 	conditions <- [worker]Collect Conditions[node]
@@ -908,7 +908,7 @@
 	
 }
 
-Save Group Conditions@NWorker[worker, groups,current:out]
+Save Group Conditions[worker, groups,current:out]
 {
 	nodes <- [groups]Index[current]
 	nworker <- Fold[Save Node Conditions[?], worker, nodes]
@@ -921,7 +921,7 @@
 	}
 }
 
-Compile Group@NWorker[worker,program,func,groups,current:out,out worker]
+Compile Group[worker,program,func,groups,current:out,out worker]
 {
 	nodes <- [groups]Index[current]
 	[nodes]First