From ecc84fc8259ab0f2f5754718ed70e3a57048a540 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Edvard=20Th=C3=B6rnros?= <edvard.thornros@gmail.com>
Date: Tue, 16 Feb 2021 00:02:23 +0100
Subject: add test that should work

---
 src/lib.rs | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)

(limited to 'src')

diff --git a/src/lib.rs b/src/lib.rs
index b1bae9f..8821710 100644
--- a/src/lib.rs
+++ b/src/lib.rs
@@ -1261,6 +1261,25 @@ f() <=> 2
 f() <=> 3
 f() <=> 4
 f() <=> 5
+",
+
+        constants_in_inner_functions: "
+q : int = 0
+
+f :: fn -> fn -> {
+    g :: fn {
+        q += 1
+    }
+    ret g
+}
+
+g := f()
+g()
+q <=> 3
+g()
+q <=> 4
+g()
+q <=> 5
 ",
 
     );
-- 
cgit v1.2.1