Comment out <- from scanner

This commit is contained in:
Scott Richmond 2022-11-03 17:33:06 -04:00
parent 01d7dc0ab1
commit e248be16cf

View File

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