Include empty symbol in variable enumeration

Please merge into 6.0.
This commit is contained in:
Max New 2013-12-02 11:55:08 -06:00
parent 15e6f4d38d
commit 3e1840ac67

View File

@ -926,7 +926,7 @@
(map/e
(compose string->symbol list->string)
(compose string->list symbol->string)
(many1/e char/e)))
(many/e char/e)))
(define base/e
(disj-sum/e #:alternate? #t