Commit 1ffeb5ac authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

Support both older and newer versions of ECL wrt which prebuilt asdf object/library is available.

parent c2ad33d9

bundle.lisp

+2 −1
Original line number Diff line number Diff line
@@ -472,7 +472,8 @@ itself.")) ;; operation on a system and its dependencies 
  ;;  (setf *load-system-operation* 'load-bundle-op))



  (defun asdf-library-pathname ()

    #+ecl (compile-file-pathname "sys:asdf" :type :object)

    #+ecl (or (probe-file* (compile-file-pathname "sys:asdf" :type :lib)) ;; new style

              (probe-file* (compile-file-pathname "sys:asdf" :type :object))) ;; old style

    #+mkcl (make-pathname :type (bundle-pathname-type :lib) :defaults #p"sys:contrib;asdf"))



  (defun compiler-library-pathname ()