Fix bug in reader examples for keywords. Push to 4.2.2.
svn: r16066
This commit is contained in:
parent
f300ba967a
commit
f64fe4a2e2
|
@ -79,7 +79,7 @@
|
|||
[(pair? v) `(cons ,(loop (car v)) ,(loop (cdr v)))]
|
||||
[(bytes? v) `(bytes ,@(map loop (bytes->list v)))]
|
||||
[(char? v) `(integer->char ,(char->integer v))]
|
||||
[(keyword? v) `(string->keyword ,(format "~a" v))]
|
||||
[(keyword? v) `(string->keyword ,(keyword->string v))]
|
||||
[(or (regexp? v)
|
||||
(byte-regexp? v))
|
||||
`(,(cond
|
||||
|
|
Loading…
Reference in New Issue
Block a user