/[cmucl]/src/code/foreign.lisp
ViewVC logotype

Diff of /src/code/foreign.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.54 by rtoy, Wed Apr 26 20:49:23 2006 UTC revision 1.54.14.1 by rtoy, Sun Nov 2 13:30:01 2008 UTC
# Line 845  environment passed to Lisp." Line 845  environment passed to Lisp."
845    (when (atom files)    (when (atom files)
846      (when verbose      (when verbose
847        (format t ";;; Opening as shared library ~A ...~%" files))        (format t ";;; Opening as shared library ~A ...~%" files))
848      (multiple-value-bind (ok &optional error-string)      (multiple-value-bind (ok error-string)
849          (load-object-file files)          (load-object-file files)
850        (cond (ok        (cond (ok
851               (when verbose               (when verbose

Legend:
Removed from v.1.54  
changed lines
  Added in v.1.54.14.1

  ViewVC Help
Powered by ViewVC 1.1.5