twc/ludus
4
0
Fork 0
Code Issues 32 Pull Requests Packages Projects 8 Releases Wiki Activity

keywords must start with lower case

Browse Source
This commit is contained in:
Scott Richmond 2024-05-14 13:45:41 -04:00
parent 3b3071adb0
commit 67cd9d479b
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
janet/scanner.janet
View File

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