X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fforeign.lisp;h=fdf3275bbd0be2424f8922101a95b1c866fa0818;hb=9b1fade83db8453b75b8c7380eb12ce41b5b889c;hp=edc559c65f41cabad4899a6cd60a1c04f2abec0c;hpb=32eb2c37fb2d9b12c5b5f674fe33b77f611120cb;p=sbcl.git

diff --git a/src/code/foreign.lisp b/src/code/foreign.lisp
index edc559c..fdf3275 100644
--- a/src/code/foreign.lisp
+++ b/src/code/foreign.lisp
@@ -35,8 +35,8 @@
     (values
      (or (gethash extern table)
          (gethash (concatenate 'base-string
-                               #!+(and darwin (or x86 x86-64)) "_ldso_stub__"
-                               #!-(and darwin (or x86 x86-64)) "ldso_stub__"
+                               #!+(and darwin (or x86 x86-64 ppc)) "_ldso_stub__"
+                               #!-(and darwin (or x86 x86-64 ppc)) "ldso_stub__"
                                extern) table)))))
 
 (defun find-foreign-symbol-address (name)