test: a test-for-error that should work, but needs more advanced lifetimesstack-allocated-lambdas-error-test

2 files changed, 8 insertions, 0 deletions

diff --git a/test/output/test/test-for-errors/return_lambda_that_captures.carp.output.expected b/test/output/test/test-for-errors/return_lambda_that_captures.carp.output.expected
new file mode 100644
index 00000000..224c134a
--- /dev/null
+++ b/test/output/test/test-for-errors/return_lambda_that_captures.carp.output.expected
@@ -0,0 +1 @@
+return_lambda_that_captures.carp:4:3 The reference '(let [s (String.copy "DATA")] (fn <s : String> [] s))' isn't alive.
diff --git a/test/test-for-errors/return_lambda_that_captures.carp b/test/test-for-errors/return_lambda_that_captures.carp
new file mode 100644
index 00000000..303f9dbe
--- /dev/null
+++ b/test/test-for-errors/return_lambda_that_captures.carp
@@ -0,0 +1,7 @@
+(Project.config "file-path-print-length" "short")
+
+(defn not-allowed []
+  (let [s @"DATA"]
+    (fn [] s)
+    ;; Note: 's' will get deleted here (since the lambda is a ref)
+    ))