1.0.44.36: test case for bug #681092

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

diff --git a/tests/eval.impure.lisp b/tests/eval.impure.lisp
index bf9d484..6900d74 100644 (file)
--- a/tests/eval.impure.lisp
+++ b/tests/eval.impure.lisp
@@ -249,6 +249,7 @@
               (simple-type-error () 'error)))
       t)))
 
+#+sb-eval
 (with-test (:name :bug-524707)
   (let ((*evaluator-mode* :interpret)
         (lambda-form '(lambda (x) (declare (fixnum x)) (1+ x))))