From 531c85054c3a532a28069a1b64446d927d2d3e21 Mon Sep 17 00:00:00 2001
From: Scott Richmond <kredati@users.noreply.github.com>
Date: Tue, 15 Feb 2022 13:24:09 -0500
Subject: [PATCH] Stub of let works.

---
 src/ludus/parser.clj | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/ludus/parser.clj b/src/ludus/parser.clj
index 699b107..33995a2 100644
--- a/src/ludus/parser.clj
+++ b/src/ludus/parser.clj
@@ -246,6 +246,7 @@
 		expr (parse-expr equals)
 		results (map #(get-in % [::ast ::ast/type]) [pattern equals expr])
 		]
+		(println "!!!!!!!! let results")
 		(pp/pprint results)
 		))
 
@@ -289,7 +290,7 @@
 
 				))))
 
-(def source "{:foo}")
+(def source "let {1} = 12")
 
 (def tokens (:tokens (scanner/scan source)))
 
@@ -297,7 +298,7 @@
 
 (pp/pprint p)
 
-(-> (parse-script p)
+(-> (parse-let p)
 	(::ast))
 
 (comment "