X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=make-host-2.lisp;h=5af5a983810d8903cd5ed0fc3ab2b035dd6c8b5c;hb=4d0b87793a047baecf2403455ddca1a82f44a41b;hp=ab16fe59135d78d885557694367c209a94934e5e;hpb=97535256efa8ab0edefca516b2553efcccf3e2ec;p=sbcl.git

diff --git a/make-host-2.lisp b/make-host-2.lisp
index ab16fe5..5af5a98 100644
--- a/make-host-2.lisp
+++ b/make-host-2.lisp
@@ -13,7 +13,7 @@
 
 (defun proclaim-target-optimization ()
   (let ((debug (if (position :sb-show *shebang-features*) 2 1)))
-    (proclaim
+    (sb-xc:proclaim
      `(optimize
        (compilation-speed 1) (debug ,debug)
        ;; CLISP's pretty-printer is fragile and tends to cause stack