diff options
Diffstat (limited to 'mu.arc.t')
-rw-r--r-- | mu.arc.t | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/mu.arc.t b/mu.arc.t index a1f0c90e..542dbfc8 100644 --- a/mu.arc.t +++ b/mu.arc.t @@ -2785,9 +2785,26 @@ label1 } ]))) +(freeze-functions) (if (~iso function*!f1 '(label1 ((1 integer) <- copy (0 literal)))) (prn "F - before/after works inside blocks")) +(reset) +;? (new-trace "before-after-any-order") +(add-code '((def f1 [ + { begin + label1 + } + ]) + (after label1 [ + ((1 integer) <- copy (0 literal)) + ]))) +(freeze-functions) +(if (~iso function*!f1 + '(label1 + ((1 integer) <- copy (0 literal)))) + (prn "F - before/after can come after the function they need to modify")) + (reset) ; end file with this to persist the trace for the final test |