diff options
Diffstat (limited to 'mu.arc.t')
| -rw-r--r-- | mu.arc.t | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/mu.arc.t b/mu.arc.t index b1d6937b..b6f11a1e 100644 --- a/mu.arc.t +++ b/mu.arc.t @@ -2731,10 +2731,14 @@ (5:integer <- get 1:channel-address/deref first-full:offset) (6:integer <- get 1:channel-address/deref first-free:offset) ]))) +;? (prn function*!write) ;? (set dump-trace*) ;? (= dump-trace* (obj blacklist '("sz" "m" "setm" "addr" "array-len" "cvt0" "cvt1"))) ;? (= dump-trace* (obj whitelist '("jump"))) +;? (= dump-trace* (obj whitelist '("run" "reply"))) (run 'main) +(each routine completed-routines* + (aif rep.routine!error (prn "error - " it))) ;? (prn canon.memory*) (if (or (~is 0 memory*.5) (~is 1 memory*.6)) |