X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fmacroexpand.impure.lisp;h=3df0bdda7ec511b31ca61feb86af6f3e6871a907;hb=260de2062fca170efdac3e42491d7d866c2d2e56;hp=a59a331f79e44a913e268a99541a530084b48e11;hpb=79a8e51bf4b06a5bd57bc90233605f98fee3b041;p=sbcl.git diff --git a/tests/macroexpand.impure.lisp b/tests/macroexpand.impure.lisp index a59a331..3df0bdd 100644 --- a/tests/macroexpand.impure.lisp +++ b/tests/macroexpand.impure.lisp @@ -45,6 +45,7 @@ (assert flag) (assert expanded-p))) +#+sb-eval (let ((sb-ext::*evaluator-mode* :interpret)) (let* ((expanded-p nil) (*macroexpand-hook* #'(lambda (fn form env)