Updating .asd files to handle locked packages

cmucl 19a will have package locks. Several libraries try to modify locked packages, for example cmucl-clx, hemlock etc. So I'm adding these stanzas to the asd files:

#+cmu

(defclass cl-modifying-file (cl-source-file) ())



#+cmu

(defmethod perform ((op load-op) (c cl-modifying-file))

  (ext:without-package-locks

     (call-next-method)))



#+cmu

(defmethod perform ((op compile-op) (c cl-modifying-file))

  (ext:without-package-locks

     (call-next-method)))



#+cmu

(defmethod source-file-type ((c cl-modifying-file) (s module))

  "lisp")

Normally in src/tools/build-utils.sh there is (setf lisp::*enable-package-locked-errors* nil). But for .asd packages that might get loaded by the user, such a modification of the system cannot be.



So 19a will have to wait a little more before appearing in experimental.

B5 Time

Clara is off to some workshop, my brother bought year 4 of B5. You can guess the rest?

winds of change

I seen B5 4.08 and I cannot believe that this is a series from the same country that now has a ministry for homeland security.

How fast things can change :-(