From 4aeaa9e889084989519bbbbe2a025cdd865cd94b Mon Sep 17 00:00:00 2001
From: Scott Richmond <kredati@users.noreply.github.com>
Date: Thu, 19 May 2022 18:11:31 -0400
Subject: [PATCH] Fix parse-list :token typo

---
 src/ludus/parser.clj | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/ludus/parser.clj b/src/ludus/parser.clj
index 22dec6c..d9a155a 100644
--- a/src/ludus/parser.clj
+++ b/src/ludus/parser.clj
@@ -211,7 +211,7 @@
         ::token/rbracket (let [ms (add-member members current_member)]
                            (assoc (advance parser) ::ast
                              {::ast/type ::ast/list
-                              :token origin
+                              :token (current origin)
                               :members ms}))
 
         (::token/comma ::token/newline)