0.6.12.3:
[sbcl.git] / tests / interface.pure.lisp
index a54492c..0db8c72 100644 (file)
@@ -22,7 +22,7 @@
   (and (not (typep function 'sb-c::byte-function))
        (sb-kernel:%function-arglist function)))
 (defun check-ext-symbols-arglist (package)
-  (format t "~% Looking at Package: ~A" package)
+  (format t "~% looking at package: ~A" package)
   (do-external-symbols (ext-sym package)
     (when (fboundp ext-sym)
       (let ((fun (symbol-function ext-sym)))