diff options
Diffstat (limited to 'mu.arc.t')
-rw-r--r-- | mu.arc.t | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/mu.arc.t b/mu.arc.t index 069677c2..a1f0c90e 100644 --- a/mu.arc.t +++ b/mu.arc.t @@ -2775,4 +2775,19 @@ (list before*!label1 after*!label1))) (prn "F - order matters within 'before' and 'after' fragments, but not *between* 'before' and 'after' fragments")) +(reset) +;? (new-trace "before-after-braces") +(add-code '((after label1 [ + ((1 integer) <- copy (0 literal)) + ]) + (def f1 [ + { begin + label1 + } + ]))) +(if (~iso function*!f1 + '(label1 + ((1 integer) <- copy (0 literal)))) + (prn "F - before/after works inside blocks")) + (reset) ; end file with this to persist the trace for the final test |