X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-introspect%2Ftest-driver.lisp;h=5097949592faf98f2ecaca29f6090f96faabda74;hb=7be549a3b25b8808defdea3a5e213b1747e236a5;hp=2d94f116b43c5f91ae11b369ed65ba6c9549be61;hpb=d3a20211cd639081185d5d3de1aa2e3e080042de;p=sbcl.git

diff --git a/contrib/sb-introspect/test-driver.lisp b/contrib/sb-introspect/test-driver.lisp
index 2d94f11..5097949 100644
--- 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) *))