mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-21 12:10:26 +02:00
Code Activity

use standard evaluator

Browse source 
(Best-ability ChangeLog annotation added by Christopher Allan Webber.)

* module/language/elisp/compile-tree-il.scm: Remove import of
  "(language tree-il eval)".
  (defmacro): Use standard "eval".
* module/language/elisp/runtime.scm: Remove import of "(language tree-il eval)".
This commit is contained in:
Robin Templeton 2015-05-10 17:11:28 -04:00 • committed by Christopher Allan Webber
parent 03dfb00880
commit e3d13813aa
2 changed files with 1 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

3
module/language/elisp/compile-tree-il.scm
View file

@ -30,7 +30,6 @@
#:use-module (srfi srfi-11) #:use-module (srfi srfi-11)
#:use-module (srfi srfi-26) #:use-module (srfi srfi-26)
#:use-module (ice-9 format) #:use-module (ice-9 format)
#:use-module (language tree-il eval)
#:export (compile-tree-il #:export (compile-tree-il
compile-progn compile-progn
compile-eval-when-compile compile-eval-when-compile
@ -787,7 +786,7 @@
body)))) body))))
(make-const loc name)))) (make-const loc name))))
(when (fluid-ref toplevel?) (when (fluid-ref toplevel?)
(eval-tree-il tree-il)) (eval tree-il (current-module)))
tree-il))) tree-il)))
(else (report-error loc "bad defmacro" args)))) (else (report-error loc "bad defmacro" args))))

1
module/language/elisp/runtime.scm
View file

@ -22,7 +22,6 @@
#:use-module (ice-9 format) #:use-module (ice-9 format)
#:use-module ((system base compile) #:use-module ((system base compile)
#:select (compile)) #:select (compile))
#:use-module (language tree-il eval)
#:export (nil-value #:export (nil-value
t-value t-value
value-slot-module value-slot-module