aboutsummaryrefslogtreecommitdiff
path: root/tests/hold/reject/order.zc
diff options
context:
space:
mode:
Diffstat (limited to 'tests/hold/reject/order.zc')
-rw-r--r--tests/hold/reject/order.zc7
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/hold/reject/order.zc b/tests/hold/reject/order.zc
new file mode 100644
index 0000000..9a2943b
--- /dev/null
+++ b/tests/hold/reject/order.zc
@@ -0,0 +1,7 @@
+// trap: was entered while
+// blocks are entered in declaration order; going back to an earlier block while a later one is held stops the program
+namespace;
+include rt;
+hold { shared let a; fn ga() { a++; return a; } }
+hold { shared let b; fn gb() { b++; return ga(); } }
+fn main() { rt.put_n(gb()); rt.put_c(10); return 0; }