aboutsummaryrefslogtreecommitdiff
path: root/tests/conformance/4-statements/unchecked_stmt_block.zc
diff options
context:
space:
mode:
Diffstat (limited to 'tests/conformance/4-statements/unchecked_stmt_block.zc')
-rw-r--r--tests/conformance/4-statements/unchecked_stmt_block.zc10
1 files changed, 10 insertions, 0 deletions
diff --git a/tests/conformance/4-statements/unchecked_stmt_block.zc b/tests/conformance/4-statements/unchecked_stmt_block.zc
new file mode 100644
index 0000000..1aabb03
--- /dev/null
+++ b/tests/conformance/4-statements/unchecked_stmt_block.zc
@@ -0,0 +1,10 @@
+// expect: ok/
+// spec 4.9 and 8.3: in unchecked code a second free of an object is ignored
+include rt;
+void pn(int x) { rt.put_n(x); rt.put_c(10); }
+fn main() {
+ unchecked { int* p = rt.new(int); rt.free(p); rt.free(p); }
+ rt.put_s("ok"); rt.put_c(10);
+ return 0;
+}
+// zc0: skip