Nnng, sorry. I botched the tabs in the patch. Here's one that ought to
work.
--- libraries.lisp~ 2007-07-19 18:53:49.000000000 +0100
+++ libraries.lisp 2007-07-19 18:57:14.000000000 +0100
@@ -96,7 +96,9 @@
#+cmu
(let ((type (pathname-type (parse-namestring filename))))
(if (string-equal type "so")
- (sys::load-object-file filename)
+ (multiple-value-bind (workp whinge)
+ (sys::load-object-file filename)
+ (unless workp (error "~A" whinge)))
(alien:load-foreign filename
:libraries
(convert-supporting-libraries-to-string
-- [mdw]
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
