[asdf-devel] Tiny patch for cmucl print-herald

[Raymond Toy]

Not sure how useful this would be, but it would be nice if images that
contained asdf could display the asdf version on startup on cmucl.

Anyway, here is the necessary change to allow cmucl to print out the
adsf version when the startup banner is printed.

Ray


(setf (getf ext:*herald-items* :asdf)
      `(,#'(lambda (stream)
	     (write-string "    ASDF " stream)
	     (write-string asdf::*asdf-version*))))