diff --git a/bundle.lisp b/bundle.lisp index 43a1d1f7c795a8ad1c908fb9916f63e0b1615676..7a335f530387d302b0cb02fe5aa7611eb3fd647b 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)))