Dan Barlow dbarlow@common-lisp.net writes:

•     ;; XXX is this _ever_ used?  By what?  *compile-file-truename*
  

•     ;; should be set by the implementation inside any call to compile-file
  

This is mostly used when a compilation condition is signaled at the end of a compilation unit, e.g, "those function <list of functions> are undefined" and also for notes about missing exported symbols in a defpackage form. The same situation occurs in SBCL with the "redefining function <foo>" style warnings. Set a breakpoint at this location to see the details.

Helmut.