diff --git a/janet/base.janet b/janet/base.janet
index c0e5069..f3b5eec 100644
--- a/janet/base.janet
+++ b/janet/base.janet
@@ -78,7 +78,7 @@
     :typed (string (show-patt (get-in x [:data 1])) " as " (show-patt (get-in x [:data 0])))
     :interpolated (get-in x [:token :lexeme])
     :string (get-in x [:token :lexeme])
-    (error "cannot show pattern of unknown type " (x :type))))
+    (error (string "cannot show pattern of unknown type " (x :type)))))
 
 (defn- docstring [fnn] :todo)
 
diff --git a/janet/interpreter.janet b/janet/interpreter.janet
index 7a70cbc..8b460c3 100644
--- a/janet/interpreter.janet
+++ b/janet/interpreter.janet
@@ -566,7 +566,6 @@ fn foo {
   () -> :foo
   (_) -> :bar
 }
-foo ()
 `)
 (def result (run))
 # (b/show result)
diff --git a/janet/parser.janet b/janet/parser.janet
index ecf3d4a..44c4b3a 100644
--- a/janet/parser.janet
+++ b/janet/parser.janet
@@ -1132,15 +1132,14 @@
 )
 
 
-(do
-# (comment
+# (do
+(comment
 (def source `(foo as :bar, 12, :foo, _thing)
 `)
 (def scanned (s/scan source))
 (print "\n***NEW PARSE***\n")
 (def a-parser (new-parser scanned))
 (def parsed (pattern a-parser))
-(print (show-patt parsed))
 )