Restore building on older SBCL.
[sbcl.git] / tests / bad-code.impure.lisp
blob26d9ff75700a4e406d7fe9fd867f0e70c855b568
1 (load "compiler-test-util.lisp")
3 (with-test (:name :fop-compile-bad-macro)
4 (assert (nth-value 1 (ctu:file-compile '((let () (do)))))))