Add = (as replacement for <- now that we have let)

This commit is contained in:
Scott Richmond 2022-02-15 13:16:46 -05:00
parent 25da37d093
commit 84663d0952

View File

@ -215,6 +215,7 @@
\, (add-token scanner ::token/comma)
\newline (add-token (update scanner ::line inc) ::token/newline)
\\ (add-token scanner ::token/backslash)
\= (add-token scanner ::token/equals)
;; two-character tokens
;; ->
@ -223,6 +224,7 @@
(digit? next) (add-number char scanner)
:else (add-error scanner (str "Expected -> or negative number. Got " char next)))
;; at current we're not using this
;; <-
\< (if (= next \-)
(add-token (advance scanner) ::token/larrow)