~ chicken-core (chicken-5) 0feb2b2a337a3f8f35e4f8ed344553289eae4354
commit 0feb2b2a337a3f8f35e4f8ed344553289eae4354
Author: Evan Hanson <evhan@foldling.org>
AuthorDate: Tue Jul 10 19:20:46 2018 +1200
Commit: Peter Bex <peter@more-magic.net>
CommitDate: Sat Jul 14 21:19:02 2018 +0200
Don't warn when namespaced symbols are unbound in eval
Signed-off-by: Peter Bex <peter@more-magic.net>
diff --git a/repl.scm b/repl.scm
index a2a81437..7d7ef771 100644
--- a/repl.scm
+++ b/repl.scm
@@ -176,6 +176,7 @@
u)
(##sys#flush-output ##sys#standard-error)))
((or (memq (caar vars) u)
+ (##core#inline "C_u_i_namespaced_symbolp" (caar vars))
(##sys#symbol-has-toplevel-binding? (caar vars)))
(loop (cdr vars) u))
(else (loop (cdr vars) (cons (car vars) u)))) 9))
Trap