Index: /trunk/ccl/lib/foreign-types.lisp
===================================================================
--- /trunk/ccl/lib/foreign-types.lisp	(revision 4996)
+++ /trunk/ccl/lib/foreign-types.lisp	(revision 4997)
@@ -1362,5 +1362,5 @@
     (format stream "~a" (or (shlib.soname s) (shlib.pathname s)))))
 
-#-darwinppc-target
+#-darwin-target
 (defun dlerror ()
   (with-macptrs ((p))