Additional niceties and middle end support for short vector SIMD packs
[sbcl.git] / tests / eval.impure.lisp
index f70216c..392b224 100644 (file)
     (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)