fixed gensym read syntax problem.
This commit is contained in:
parent
5ed3f80901
commit
7fa2aa75ab
|
@ -119,6 +119,7 @@
|
||||||
[(char=? c #\\)
|
[(char=? c #\\)
|
||||||
(read-char p)
|
(read-char p)
|
||||||
(tokenize-backslash ls p)]
|
(tokenize-backslash ls p)]
|
||||||
|
[(char=? c #\}) ls]
|
||||||
[else
|
[else
|
||||||
(die/p p 'tokenize "invalid identifier syntax"
|
(die/p p 'tokenize "invalid identifier syntax"
|
||||||
(list->string (reverse (cons c ls))))]))))
|
(list->string (reverse (cons c ls))))]))))
|
||||||
|
|
|
@ -1 +1 @@
|
||||||
1647
|
1648
|
||||||
|
|
Loading…
Reference in New Issue