X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Feval.impure.lisp;h=d50708e4fb2cabcd163b684b1f84442077872d70;hb=a189a69454ef7635149319ae213b337f17c50d20;hp=392b22492b354b1b0988dfa08ad60e5c156af841;hpb=ad2b04d910cfc097712f19f05af9bb679ee17130;p=sbcl.git diff --git a/tests/eval.impure.lisp b/tests/eval.impure.lisp index 392b224..d50708e 100644 --- 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))