[Guile-commits] 31/36: use standard evaluator

[Christopher Allan Webber]

cwebber pushed a commit to branch wip-elisp-rebased
in repository guile.

commit c53e9d0ac1c7bb057f1a369f375946ab4a421403
Author: Robin Templeton <robin@terpri.org>
AuthorDate: Sun May 10 17:11:28 2015 -0400

    use standard evaluator
    
    (Best-ability ChangeLog annotation added by Christine Lemmer-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)".
---
 module/language/elisp/compile-tree-il.scm | 3 +--
 module/language/elisp/runtime.scm         | 1 -
 2 files changed, 1 insertion(+), 3 deletions(-)

diff --git a/module/language/elisp/compile-tree-il.scm 
b/module/language/elisp/compile-tree-il.scm
index 5525634..0038d65 100644
--- a/module/language/elisp/compile-tree-il.scm
+++ b/module/language/elisp/compile-tree-il.scm
@@ -31,7 +31,6 @@
   #:use-module (srfi srfi-11)
   #:use-module (srfi srfi-26)
   #:use-module (ice-9 format)
-  #:use-module (language tree-il eval)
   #:export (compile-tree-il
             compile-progn
             compile-eval-when-compile
@@ -793,7 +792,7 @@
            (when (fluid-ref toplevel?)
              (with-native-target
               (lambda ()
-                (eval-tree-il tree-il))))
+                (eval tree-il (current-module)))))
            tree-il)))
     (else (report-error loc "bad defmacro" args))))
 
diff --git a/module/language/elisp/runtime.scm 
b/module/language/elisp/runtime.scm
index c8c39bf..bf5b369 100644
--- a/module/language/elisp/runtime.scm
+++ b/module/language/elisp/runtime.scm
@@ -22,7 +22,6 @@
   #:use-module (ice-9 format)
   #:use-module ((system base compile)
                 #:select (compile))
-  #:use-module (language tree-il eval)
   #:export (nil-value
             t-value
             value-slot-module