X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fppc%2Farith.lisp;h=9e675f8acf982d185039758ffbc41d320ade9c22;hb=72fc4e4a1325e8761d97a36080fa50a8e75ed523;hp=a0288fbcd4bd7e3785576a378cbb632c0a0f8b04;hpb=8b6626faeca6b41a0c7aacb5293c54d115cec154;p=sbcl.git

diff --git a/src/compiler/ppc/arith.lisp b/src/compiler/ppc/arith.lisp
index a0288fb..9e675f8 100644
--- a/src/compiler/ppc/arith.lisp
+++ b/src/compiler/ppc/arith.lisp
@@ -667,7 +667,7 @@
   (movable foldable flushable))
 
 (defun %%ldb (integer size posn)
-  (sb-kernel::%ldb size posn integer))
+  (sb!kernel::%ldb size posn integer))
 
 (define-vop (ldb-c/fixnum)
   (:translate %%ldb)