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

Comment out <- from scanner

Browse Source
This commit is contained in:
Scott Richmond 2022-11-03 17:33:06 -04:00
parent 01d7dc0ab1
commit e248be16cf
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/ludus/scanner.clj
View File

@ -251,9 +251,9 @@
;; at current we're not using this ;; at current we're not using this
;; <- ;; <-
\< (if (= next \-) ;;\< (if (= next \-)
(add-token (advance scanner) ::token/larrow) ;; (add-token (advance scanner) ::token/larrow)
(add-error scanner (str "Expected <-. Got " char next))) ;; (add-error scanner (str "Expected <-. Got " char next)))
;; |> ;; |>
;; Consider => , with =>> for bind ;; Consider => , with =>> for bind