From 9dc9e95e85b70ec49f51542ff6d9fba23b7a5e4d Mon Sep 17 00:00:00 2001
From: Scott Richmond <kredati@users.noreply.github.com>
Date: Fri, 8 Apr 2022 15:23:08 -0400
Subject: [PATCH] Parse ignored words as placeholder

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

diff --git a/src/ludus/parser.clj b/src/ludus/parser.clj
index 69bac37..ef3e3ae 100644
--- a/src/ludus/parser.clj
+++ b/src/ludus/parser.clj
@@ -471,7 +471,7 @@
   (let [curr (current parser)
     type (::token/type curr)]
     (case type
-      ::token/placeholder (-> parser
+      (::token/placeholder ::token/ignored) (-> parser
         (advance)
         (assoc ::ast {::ast/type ::ast/placeholder}))
 
@@ -762,12 +762,9 @@
     (parser)
     (parse-script)))
 
-(comment
+(do
   (def pp pp/pprint)
-  (def source "ns foo {
-    :bar 42
-    :baz 23
-  }
+  (def source "let _foo = 42
 
   ")
   (def lexed (scanner/scan source))