Mercurial > repos > rhope
diff nworker_c.rhope @ 112:fd23ab2c1a73
Small changes to make profile data a little cleaner
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Mon, 11 Oct 2010 21:53:27 -0400 |
parents | 2f6f0867fd68 |
children | 04148770c229 |
line wrap: on
line diff
--- a/nworker_c.rhope Mon Oct 11 20:04:48 2010 -0400 +++ b/nworker_c.rhope Mon Oct 11 21:53:27 2010 -0400 @@ -853,7 +853,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] @@ -919,7 +919,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] @@ -927,7 +927,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] @@ -940,7 +940,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