diff --git a/scheme/ikarus.boot.prebuilt b/scheme/ikarus.boot.prebuilt index 1a53925..a9a66dd 100644 Binary files a/scheme/ikarus.boot.prebuilt and b/scheme/ikarus.boot.prebuilt differ diff --git a/scheme/ikarus.reader.ss b/scheme/ikarus.reader.ss index ba09c0e..cefaf8f 100644 --- a/scheme/ikarus.reader.ss +++ b/scheme/ikarus.reader.ss @@ -27,7 +27,7 @@ (define delimiter? (lambda (c) (or (char-whitespace? c) - (memq c '(#\( #\) #\[ #\] #\{ #\} #\' #\` #\, #\"))))) + (memq c '(#\( #\) #\[ #\] #\" #\# #\;))))) (define digit? (lambda (c) (and ($char<= #\0 c) ($char<= c #\9)))) diff --git a/scheme/last-revision b/scheme/last-revision index 31ba99e..ba3343d 100644 --- a/scheme/last-revision +++ b/scheme/last-revision @@ -1 +1 @@ -1157 +1158