Commit 612bb059 authored by Daniel Kochmański's avatar Daniel Kochmański Committed by Francois-Rene Rideau
Browse files

Revert "bundle: remove deprecated function bundle-system" 

This reverts commit 6475bce3.
parent 76c70798

bundle.lisp

+7 −1
Original line number Diff line number Diff line
@@ -328,6 +328,7 @@ for all the linkable object files associated with the system or its dependencies 
      ((:program)

       'program-op)))



  ;; DEPRECATED. This is originally from asdf-ecl.lisp. Does anyone use it?

  (defun make-build (system &rest args &key (monolithic nil) (type :fasl)

                             (move-here nil move-here-p)

                             &allow-other-keys)
@@ -354,7 +355,12 @@ for all the linkable object files associated with the system or its dependencies 
                        (copy-file f new-f)

                        (delete-file-if-exists f)))

                :collect new-f)

          files))))

          files)))



  ;; DEPRECATED. Does anyone use this?

  (defun bundle-system (system &rest args &key force (verbose t) version &allow-other-keys)

    (declare (ignore force verbose version))

    (apply #'operate 'deliver-asd-op system args)))



;;;

;;; LOAD-BUNDLE-OP