diff --git a/scheme/ikarus.reader.ss b/scheme/ikarus.reader.ss index 34c2c0d..e47be29 100644 --- a/scheme/ikarus.reader.ss +++ b/scheme/ikarus.reader.ss @@ -119,6 +119,7 @@ [(char=? c #\\) (read-char p) (tokenize-backslash ls p)] + [(char=? c #\}) ls] [else (die/p p 'tokenize "invalid identifier syntax" (list->string (reverse (cons c ls))))])))) diff --git a/scheme/last-revision b/scheme/last-revision index 27c71ca..8f8453a 100644 --- a/scheme/last-revision +++ b/scheme/last-revision @@ -1 +1 @@ -1647 +1648