~ chicken-core (chicken-5) 45a7763a6ade22b9c1b6399ccab990f9833a84a0
commit 45a7763a6ade22b9c1b6399ccab990f9833a84a0
Author: Evan Hanson <evhan@foldling.org>
AuthorDate: Mon May 14 17:39:27 2018 +1200
Commit: Evan Hanson <evhan@foldling.org>
CommitDate: Mon May 14 18:05:14 2018 +1200
Unquote boolean type in expansion of `parameterize'
This code was changed to use the internal `the' form in ee6b46ab, but
the type itself shouldn't be quoted, so this drops the `##core#quote'.
diff --git a/chicken-syntax.scm b/chicken-syntax.scm
index a0237b57..2451075e 100644
--- a/chicken-syntax.scm
+++ b/chicken-syntax.scm
@@ -504,7 +504,7 @@
;; value expressions (see first example in #1336).
,(map ##sys#list saveds saveds)
(##core#let
- ((,convert? (##core#the (##core#quote boolean) #t #t))) ; Convert only first time extent is entered!
+ ((,convert? (##core#the boolean #t #t))) ; Convert only first time extent is entered!
(##sys#dynamic-wind
(##core#lambda ()
(##core#let
Trap