From f691e14f6fe87f3bdfee380249024b9cb6354515 Mon Sep 17 00:00:00 2001 From: Francois-Rene Rideau <tunes@google.com> Date: Wed, 5 Mar 2014 22:30:51 -0500 Subject: [PATCH] Disabling (setf *load-system-operation* 'load-fasl-op) for now on ECL, as it causes issues. --- bundle.lisp | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/bundle.lisp b/bundle.lisp index 06956869..4e3106d3 100644 --- a/bundle.lisp +++ b/bundle.lisp @@ -454,8 +454,10 @@ itself.")) ;; operation on a system and its dependencies #+ecl (with-upgradability () - (unless (use-ecl-byte-compiler-p) - (setf *load-system-operation* 'load-fasl-op)) + ;; I think that Juanjo intended for this to be, + ;; but it breaks 4 tests in what looks like to be a compiler bug, so I'll punt for now. + ;;(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)) -- GitLab