
19 Jul
2007
19 Jul
'07
5:58 p.m.
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]