Fix make-array transforms.

[sbcl.git] / tests / eval.impure.lisp

diff --git a/tests/eval.impure.lisp b/tests/eval.impure.lisp
index f70216c..d50708e 100644 (file)
--- a/tests/eval.impure.lisp
+++ b/tests/eval.impure.lisp
@@ -226,7 +226,7 @@
 (with-test (:name :toplevel-declare)
   (assert (raises-error? (eval '(declare (type pathname *scratch*))))))
 
-(with-test (:name (eval no-compiler-notes))
+(with-test (:name (eval :no-compiler-notes))
   (handler-bind ((sb-ext:compiler-note #'error))
     (let ((sb-ext:*evaluator-mode* :compile))
       (eval '(let ((x 42))
@@ -272,6 +272,7 @@
     (assert (eq :fun (empty-let-is-not-toplevel-fun))))
   ;; While at it, test that we get the late binding under
   ;; interpreter mode.
+  #+sb-eval
   (let ((sb-ext:*evaluator-mode* :interpret))
     (eval `(let ()
              (defmacro empty-let-is-not-toplevel-x () :macro)