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

Fixes bug 173200: semi-colon is not a delimiter

This commit is contained in:
Abdulaziz Ghuloum 2007-12-01 03:18:28 -05:00
parent bd06d39220
commit 75e09500c4
3 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
scheme/ikarus.boot.prebuilt
View File

Binary file not shown.

2
scheme/ikarus.reader.ss
View File

@ -27,7 +27,7 @@
(define delimiter? (define delimiter?
(lambda (c) (lambda (c)
(or (char-whitespace? c) (or (char-whitespace? c)
(memq c '(#\( #\) #\[ #\] #\{ #\} #\' #\` #\, #\"))))) (memq c '(#\( #\) #\[ #\] #\" #\# #\;)))))
(define digit? (define digit?
(lambda (c) (lambda (c)
(and ($char<= #\0 c) ($char<= c #\9)))) (and ($char<= #\0 c) ($char<= c #\9))))

2
scheme/last-revision
View File

@ -1 +1 @@
1157 1158