mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-15 08:10:17 +02:00
eval is actually compile
* module/ice-9/boot-9.scm (eval): Here at the tail of boot-9, replace the root definition of `eval' with a procedure that will call `compile'. * test-suite/tests/syntax.test ("top-level define"): ("internal define"): Run unmemoization tests in the interpreter, using primitive-eval.
This commit is contained in:
parent
2fb924f64f
commit
afe5e6baa7
2 changed files with 30 additions and 24 deletions
|
@ -3492,6 +3492,14 @@ module '(ice-9 q) '(make-q q-length))}."
|
|||
|
||||
|
||||
|
||||
;;; Replace the C evaluator with the compiler.
|
||||
;;;
|
||||
|
||||
(define (eval x env)
|
||||
((@ (system base compile) compile) x #:from 'scheme #:to 'value #:env env))
|
||||
|
||||
|
||||
|
||||
;;; Place the user in the guile-user module.
|
||||
;;;
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue