Adding string and symbol quote delimiters to list of read delimiters in (scheme read).

This commit is contained in:
Alex Shinn 2013-09-29 13:42:24 +09:00
parent ae1f0fd76d
commit 6094e5fb12

View file

@ -145,7 +145,7 @@
(skip-comment in depth))))) (skip-comment in depth)))))
(define delimiters (define delimiters
'(#\; #\( #\) #\{ #\} #\space #\tab #\newline #\return)) '(#\; #\" #\| #\( #\) #\{ #\} #\space #\tab #\newline #\return))
(define named-chars (define named-chars
`(("newline" . #\newline) `(("newline" . #\newline)