fix ONLY-ONE-BOXED-CONSTANT-FOR-MULTIPLE-USES test

  Feh.

diff --git a/tests/compiler.pure.lisp b/tests/compiler.pure.lisp
index dd0cb16..4bdde67 100644 (file)
--- a/tests/compiler.pure.lisp
+++ b/tests/compiler.pure.lisp
@@ -4127,7 +4127,7 @@
                        `(lambda (x)
                           (unknown-fun ,big (+ ,big x))))))
     (assert (equal (list 0 (1+ most-positive-fixnum))
-                   (ctu:find-code-constants fun :type t)))))
+                   (ctu:find-code-constants fun :type 'integer)))))
 
 (with-test (:name :fixnum+float-coerces-fixnum
             :skipped-on :x86)