From 3b1f2460a8ffb13135ea48889f215300fb66a658 Mon Sep 17 00:00:00 2001
From: Scott Richmond <kredati@users.noreply.github.com>
Date: Sun, 20 Mar 2022 18:32:31 -0400
Subject: [PATCH] Write basic test case

---
 src/ludus/interpreter.clj | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/ludus/interpreter.clj b/src/ludus/interpreter.clj
index df8451a..4215805 100644
--- a/src/ludus/interpreter.clj
+++ b/src/ludus/interpreter.clj
@@ -209,7 +209,8 @@
 (do
 
   (def source "
-  	if false then :yay else print(:foo)
+  	fn foo () -> :foo
+    foo ()
 
 	")