diff --git a/bundle.lisp b/bundle.lisp index 41bbc0b47b25e8690ba33136712b2965f32e257f..069568695f491b6856583bedb3431a9e63789fb6 100644 --- a/bundle.lisp +++ b/bundle.lisp @@ -454,7 +454,8 @@ itself.")) ;; operation on a system and its dependencies #+ecl (with-upgradability () - (setf *load-system-operation* 'load-fasl-op) + (unless (use-ecl-byte-compiler-p) + (setf *load-system-operation* 'load-fasl-op)) (defmethod perform ((o link-op) (c system)) (let* ((object-files (input-files o c))