:rarrow -> :arrow
This commit is contained in:
parent
c36a140c6b
commit
cdb71a8122
|
@ -264,7 +264,7 @@
|
|||
## two-character tokens
|
||||
## ->
|
||||
"-" (cond
|
||||
(= next ">") (add-token (advance scanner) :rarrow)
|
||||
(= next ">") (add-token (advance scanner) :arrow)
|
||||
(digit? next) (add-number char scanner)
|
||||
:else (add-error scanner (string "Expected -> or negative number after `-`. Got `" char next "`")))
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user