~ chicken-core (chicken-5) f0b9817de5331d8539bd74015e76707ae006ac19


commit f0b9817de5331d8539bd74015e76707ae006ac19
Author:     Evan Hanson <evhan@foldling.org>
AuthorDate: Tue Apr 5 20:49:51 2016 +1200
Commit:     Evan Hanson <evhan@foldling.org>
CommitDate: Tue Apr 5 21:20:16 2016 +1200

    Fix types.db entry for set-read-syntax! to allow symbols as read-marks

diff --git a/types.db b/types.db
index 32ed0787..045b93fb 100644
--- a/types.db
+++ b/types.db
@@ -975,7 +975,7 @@
 
 (chicken.read-syntax#set-read-syntax!
  (#(procedure #:clean #:enforce) chicken.read-syntax#set-read-syntax!
-  (char (or false (procedure (input-port) . *)))
+  ((or char symbol) (or false (procedure (input-port) . *)))
   undefined))
 
 (chicken.read-syntax#set-sharp-read-syntax!
Trap