From 923834f19bfea1fae768cc990b5094b52e7cd43d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Edvard=20Th=C3=B6rnros?= <edvard.thornros@gmail.com>
Date: Sun, 7 Mar 2021 15:23:59 +0100
Subject: add test for constants in outer block

---
 progs/tests/global_constants.sy | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)
 create mode 100644 progs/tests/global_constants.sy

(limited to 'progs/tests/global_constants.sy')

diff --git a/progs/tests/global_constants.sy b/progs/tests/global_constants.sy
new file mode 100644
index 0000000..7ee6ca5
--- /dev/null
+++ b/progs/tests/global_constants.sy
@@ -0,0 +1,17 @@
+// TODO(ed): Pure functions
+fac :: fn n: int -> int {
+    if n < 1 { ret 1 }
+    ret n * fac! n - 1
+}
+
+a :: fac! 4
+b :: a + fac! 2
+c := b + 1
+
+start :: fn {
+    a <=> 24
+    b <=> 24 + 2
+    c <=> 24 + 2 + 1
+    c += 1
+    c <=> 24 + 2 + 2
+}
-- 
cgit v1.2.1