Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Fix some tests for builds without sb-eval.

Conditionalize on #+SB-EVAL test parts that bind *EVALUATOR-MODE* to
:INTERPRET. The affected tests are:
- compiler.pure.lisp / :multiple-args-to-function
- eval.impure.lisp / (eval :empty-let-is-not-toplevel)
  • Loading branch information...
commit ad2b04d910cfc097712f19f05af9bb679ee17130 1 parent c017b87
@leuler leuler authored
Showing with 3 additions and 1 deletion.
  1. +2 −1  tests/compiler.pure.lisp
  2. +1 −0  tests/eval.impure.lisp
View
3  tests/compiler.pure.lisp
@@ -3831,7 +3831,8 @@
(with-test (:name :multiple-args-to-function)
(let ((form `(flet ((foo (&optional (x 13)) x))
(funcall (function foo 42))))
- (*evaluator-mode* :interpret))
+ #+sb-eval (*evaluator-mode* :interpret))
+ #+sb-eval
(assert (eq :error
(handler-case (eval form)
(error () :error))))
View
1  tests/eval.impure.lisp
@@ -272,6 +272,7 @@
(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)

0 comments on commit ad2b04d

Please sign in to comment.
Something went wrong with that request. Please try again.