diff --git a/janet/scanner.janet b/janet/scanner.janet index 979ce71..e08228e 100644 --- a/janet/scanner.janet +++ b/janet/scanner.janet @@ -14,6 +14,7 @@ "nil" :nil ## impl -> literal word "ns" :ns ## impl "panic!" :panic ## impl (should _not_ be a function) + "pkg" :pkg "recur" :recur ## impl "ref" :ref ## impl "then" :then ## impl @@ -295,8 +296,9 @@ "&" (add-comment char scanner) ## keywords + # XXX: make sure we want only lower-only keywords ":" (cond - (alpha? next) (add-keyword scanner) + (lower? next) (add-keyword scanner) :else (add-error scanner (string "Expected keyword. Got " char next))) ## splats