1.0.37.20: Make stress test for SB-CONCURRENCY:MAILBOX more robust.

[sbcl.git] / contrib / sb-introspect / test-driver.lisp

diff --git a/contrib/sb-introspect/test-driver.lisp b/contrib/sb-introspect/test-driver.lisp
index 2d94f11..5097949 100644 (file)
--- a/contrib/sb-introspect/test-driver.lisp
+++ b/contrib/sb-introspect/test-driver.lisp
@@ -413,6 +413,7 @@
 
 ;; Interpreted functions
 
+#+sb-eval
 (deftest function-type.8
     (type-equal (function-type (interpret (lambda (x) (declare (fixnum x)) x)))
                 '(function (&rest t) *))