--- old-cffi/src/cffi-cmucl.lisp	2006-12-06 23:11:12.000000000 +0100
+++ new-cffi/src/cffi-cmucl.lisp	2006-12-06 23:11:12.000000000 +0100
@@ -341,7 +341,8 @@
 
 (defun %load-foreign-library (name)
   "Load the foreign library NAME."
-  (sys::load-object-file name))
+  (or (sys::load-object-file name)
+      t))
 
 ;;; XXX: doesn't work on Darwin; does not check for errors. I suppose we'd
 ;;; want something like SBCL's dlclose-or-lose in foreign-load.lisp:66