From 6475bce31aa326da99a8b76091760153e2dfdce9 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Daniel=20Kochma=C5=84ski?= <daniel@turtleware.eu> Date: Fri, 9 Sep 2016 14:46:26 +0200 Subject: [PATCH] bundle: remove deprecated function bundle-system MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Also remove deprecation comment – `make-build' is part of official ECL build system and is documented here: https://common-lisp.net/project/ecl/manual/re55.html --- bundle.lisp | 8 +------- 1 file changed, 1 insertion(+), 7 deletions(-) diff --git a/bundle.lisp b/bundle.lisp index 7a335f53..e6bf5472 100644 --- a/bundle.lisp +++ b/bundle.lisp @@ -328,7 +328,6 @@ 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) @@ -351,12 +350,7 @@ for all the linkable object files associated with the system or its dependencies :defaults dest-path) :do (rename-file-overwriting-target f new-f) :collect new-f) - 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))) + files)))) ;;; ;;; LOAD-BUNDLE-OP -- GitLab