don't bother evaluating literals in (chibi repl)

This commit is contained in:
Alex Shinn 2015-07-06 20:46:42 +09:00
parent 1a2b71688d
commit 9b4cadd33f

View file

@ -317,7 +317,13 @@
(repl-advise-exception exn (current-error-port))))
(for-each
(lambda (expr)
(call-with-values (lambda () (eval expr (repl-env rp)))
(call-with-values
(lambda ()
(if (or (identifier? expr)
(pair? expr)
(null? expr))
(eval expr (repl-env rp))
expr))
(lambda res-list
(cond
((not (or (null? res-list)