From bbf043bc213b2d6124659e8e47d34be4b345401e Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Daniel=20Kochma=C5=84ski?= <daniel@turtleware.eu> Date: Fri, 9 Sep 2016 14:44:06 +0200 Subject: [PATCH] *load-system-operation*: set to load-bundle-op This makes loading system faster. See: https://common-lisp.net/project/ecl/manual/re56.html --- bundle.lisp | 10 +++------- 1 file changed, 3 insertions(+), 7 deletions(-) diff --git a/bundle.lisp b/bundle.lisp index 43a1d1f7c..7a335f530 100644 --- a/bundle.lisp +++ b/bundle.lisp @@ -512,13 +512,9 @@ for all the linkable object files associated with the system or its dependencies #+(or clasp ecl mkcl) (with-upgradability () - ;; I think that Juanjo intended for this to be, but it was disabled before 3.1 - ;; due to implementation bugs in ECL and MKCL that seem to have been fixed since - ;; -- see for ECL test-xach-update-bug.script and test-bundle.script, - ;; and for MKCL test-logical-pathname.script. - ;; We should probably reenable these after consulting with ECL and MKCL maintainers. - ;;(unless (or #+(or clasp ecl) (use-ecl-byte-compiler-p)) - ;; (setf *load-system-operation* 'load-bundle-op)) + + (unless (or #+(or clasp ecl) (use-ecl-byte-compiler-p)) + (setf *load-system-operation* 'load-bundle-op)) (defun system-module-pathname (module) (let ((name (coerce-name module))) -- GitLab