From d4adc1d912777f50035fa5328cccfcfdecce4a12 Mon Sep 17 00:00:00 2001
From: Scott Richmond <kredati@users.noreply.github.com>
Date: Fri, 19 Jul 2024 16:09:31 -0400
Subject: [PATCH] clean up

---
 src/parser.janet | 16 +++++++++++-----
 1 file changed, 11 insertions(+), 5 deletions(-)

diff --git a/src/parser.janet b/src/parser.janet
index 1645fca..379da18 100644
--- a/src/parser.janet
+++ b/src/parser.janet
@@ -1148,11 +1148,12 @@
  (def origin (current parser))
  (def lines @[])
  (while (not (check parser :eof))
-  (print "starting script loop with " (pp-tok origin))
+  # (print "starting script loop with " (pp-tok origin))
   (accept-many parser :newline :semicolon)
   (when (= :break ((current parser) :type))
    (break (advance parser)))
-  (array/push lines (capture toplevel parser))
+  (def term (capture toplevel parser))
+  (array/push lines term)
   (capture terminator parser))
  {:type :script :data lines :token origin})
 
@@ -1162,10 +1163,15 @@
   (set (parser :ast) ast)
   parser)
 
-(do
-# (comment
+# (do
+(comment
 (def source `
-(foo bar)
+{
+ foo bar
+ quux frobulate
+ baz
+ 12 23 42
+}
 `)
 (def scanned (s/scan source))
 # (print "\n***NEW PARSE***\n")