Hi, here's a small patch for #1733.
>From 37ec1f2776c9e4a5a760cabd18c339d3da3f622e Mon Sep 17 00:00:00 2001 From: megane <megan...@gmail.com> Date: Sat, 13 Mar 2021 12:25:55 +0200 Subject: [PATCH] * types.db: Fix set-parameterized-read-syntax! , set-sharp-read-syntax! types Both take CHAR-OR-SYMBOL, not just char. Fixes #1733 --- types.db | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/types.db b/types.db index 587a081f..ae989220 100644 --- a/types.db +++ b/types.db @@ -1141,7 +1141,7 @@ (chicken.read-syntax#set-parameterized-read-syntax! (#(procedure #:clean #:enforce) chicken.read-syntax#set-parameterized-read-syntax! - (char (or false (procedure (input-port fixnum) . *))) + ((or char symbol) (or false (procedure (input-port fixnum) . *))) undefined)) (chicken.read-syntax#set-read-syntax! @@ -1151,7 +1151,7 @@ (chicken.read-syntax#set-sharp-read-syntax! (#(procedure #:clean #:enforce) chicken.read-syntax#set-sharp-read-syntax! - (char (or false (procedure (input-port) . *))) undefined)) + ((or char symbol) (or false (procedure (input-port) . *))) undefined)) ;; time -- 2.17.1