Index: /branches/working-0711/ccl/compiler/nx1.lisp
===================================================================
--- /branches/working-0711/ccl/compiler/nx1.lisp	(revision 9390)
+++ /branches/working-0711/ccl/compiler/nx1.lisp	(revision 9391)
@@ -1062,4 +1062,6 @@
                          (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*))