Changeset 9391

Timestamp:

May 7, 2008, 4:44:06 PM (17 years ago)

Author:

gz

Message:

Let the load-time-value form access the definition environment, so it at least knows about special decls. A little iffy but I'm hoping it's ok in practice.

File:

• branches/working-0711/ccl/compiler/nx1.lisp (modified) (1 diff)

branches/working-0711/ccl/compiler/nx1.lisp

@@ -1062 +1062 @@
                          (compile-named-function 
                           `(lambda () ,form)
+                          ;; pass in the definition env for special decls
+                          :env (definition-environment env)
                           :load-time-eval-token *nx-load-time-eval-token*
                           :target (backend-name *target-backend*))