about summary refs log tree commit diff stats
path: root/mu.arc.t
diff options
context:
space:
mode:
Diffstat (limited to 'mu.arc.t')
-rw-r--r--mu.arc.t15
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