From 5430fe44f095d1cd159a4a4d91d54ec31cad7878 Mon Sep 17 00:00:00 2001 From: Francois-Rene Rideau <tunes@google.com> Date: Thu, 13 Mar 2014 23:41:20 -0400 Subject: [PATCH] Remove the ill-fated BUILD-SYSTEM. Use BUILD. --- interface.lisp | 2 +- operate.lisp | 6 +----- 2 files changed, 2 insertions(+), 6 deletions(-) diff --git a/interface.lisp b/interface.lisp index 98078a6a..8767a55c 100644 --- a/interface.lisp +++ b/interface.lisp @@ -27,7 +27,7 @@ #:operation #:make-operation #:find-operation #:upward-operation #:downward-operation #:sideway-operation #:selfward-operation #:non-propagating-operation - #:build-op #:build #:build-system + #:build-op #:build #:load-op #:prepare-op #:compile-op #:prepare-source-op #:load-source-op #:test-op #:feature #:version #:version-satisfies #:upgrade-asdf diff --git a/operate.lisp b/operate.lisp index 999b9510..be4b948b 100644 --- a/operate.lisp +++ b/operate.lisp @@ -9,7 +9,7 @@ (:export #:operate #:oos #:*systems-being-operated* - #:build-op #:build #:build-system + #:build-op #:build #:load-system #:load-systems #:load-systems* #:compile-system #:test-system #:require-system #:*load-system-operation* #:module-provide-asdf @@ -130,10 +130,6 @@ to load it in current image." (apply 'operate 'build-op system keys) t) - (defun build-system (system &rest keys) - "Alias for function BUILD" - (apply 'build system keys)) - (defun load-system (system &rest keys &key force force-not verbose version &allow-other-keys) "Shorthand for `(operate 'asdf:load-op system)`. See OPERATE for details." (declare (ignore force force-not verbose version)) -- GitLab