diff options
Diffstat (limited to 'mu.arc.t')
| -rw-r--r-- | mu.arc.t | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/mu.arc.t b/mu.arc.t index 2ab4d9c8..3c94d298 100644 --- a/mu.arc.t +++ b/mu.arc.t @@ -669,9 +669,7 @@ ((1 integer) <- literal 3)) (f2 ((2 integer) <- literal 4)))) -(enq make-context!f1 contexts*) -(enq make-context!f2 contexts*) -(let ninsts (run) +(let ninsts (run 'f1 'f2) (when (~iso 2 ninsts) (prn "F - scheduler didn't run the right number of instructions: " ninsts))) (if (~iso memory* (obj 1 3 2 4)) |