mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-12 06:41:13 +02:00
parent
71a5964c11
commit
3bcf189ba0
1 changed files with 0 additions and 8 deletions
|
@ -3492,14 +3492,6 @@ 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.
|
;;; Place the user in the guile-user module.
|
||||||
;;;
|
;;;
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue