conservatory
/
ikarus
4
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

* Tokenizer now recognizes "\r" in strings.

This commit is contained in:
Abdulaziz Ghuloum 2007-01-13 14:39:58 -05:00
parent 8b9dd5fd85
commit 53b51e4088
2 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
src/ikarus.boot
View File

Binary file not shown.

1
src/libtokenizer.ss
View File

@ -115,6 +115,7 @@
[($char= #\" c) (tokenize-string (cons #\" ls) p)] [($char= #\" c) (tokenize-string (cons #\" ls) p)]
[($char= #\\ c) (tokenize-string (cons #\\ ls) p)] [($char= #\\ c) (tokenize-string (cons #\\ ls) p)]
[($char= #\n c) (tokenize-string (cons #\newline 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)] [($char= #\t c) (tokenize-string (cons #\tab ls) p)]
[else (error 'tokenize "invalid string escape \\~a" c)]))] [else (error 'tokenize "invalid string escape \\~a" c)]))]
[else [else