* Tokenizer now recognizes "\r" in strings.
This commit is contained in:
parent
8b9dd5fd85
commit
53b51e4088
BIN
src/ikarus.boot
BIN
src/ikarus.boot
Binary file not shown.
|
@ -115,6 +115,7 @@
|
|||
[($char= #\" c) (tokenize-string (cons #\" ls) p)]
|
||||
[($char= #\\ c) (tokenize-string (cons #\\ ls) p)]
|
||||
[($char= #\n c) (tokenize-string (cons #\newline ls) p)]
|
||||
[($char= #\r c) (tokenize-string (cons #\return ls) p)]
|
||||
[($char= #\t c) (tokenize-string (cons #\tab ls) p)]
|
||||
[else (error 'tokenize "invalid string escape \\~a" c)]))]
|
||||
[else
|
||||
|
|
Loading…
Reference in New Issue