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) *))