[cclan-list] possible bug with recent ASDF

[<rpg...@re...>]

I was trying to load the latest mcclim, and failed with this odd
error:

; Fast loading /home/rpg/lisp/mcclim/patch.fasl
Error: No methods applicable for generic function
       #<STANDARD-GENERIC-FUNCTION ASDF:OUTPUT-FILES> with args
       (#<ASDF:COMPILE-OP NIL @ #x88ee9d7a> NIL) of classes (ASDF:COMPILE-OP NULL)
  [condition type: PROGRAM-ERROR]

Restart actions (select using :continue):
 0: Try calling it again
 1: Retry performing #<ASDF:LOAD-OP NIL @ #x7da3e9c2> on
    #<ASDF:CL-SOURCE-FILE "fix-acl" @ #x7d9bddba>.
 2: Continue, treating #<ASDF:LOAD-OP NIL @ #x7da3e9c2> on
    #<ASDF:CL-SOURCE-FILE "fix-acl" @ #x7d9bddba> as having been successful.
 3: Return to Top Level (an "abort" restart).
 4: Abort entirely from this (lisp) process.
[1c] KAUAI(29): :fr
Expression: ((METHOD NO-APPLICABLE-METHOD (T)) ..)
[1c] KAUAI(30): :dn
Evaluation stack:

   (CERROR "Try calling it again" PROGRAM-ERROR ...)
   ((METHOD NO-APPLICABLE-METHOD (T)) #<STANDARD-GENERIC-FUNCTION ASDF:OUTPUT-FILES>
                                      #<ASDF:COMPILE-OP NIL @ #x88ee9d7a> ...)
 ->((FLET #:ENSURE-GENERIC-FUNCTION-USING-CLASS--NULL
      EXCL::INITIAL-CHEAP-SELECT-FUNCTION)
      #<STANDARD-GENERIC-FUNCTION ASDF:OUTPUT-FILES>
      #<ASDF:COMPILE-OP NIL @ #x88ee9d7a> ...)
   (LET* (# # # ...) (DECLARE #) ...)
   [... EXCL::EVAL-AS-PROGN ]
   (LET* NIL (LET* # # ...))
   [... EXCL::%EVAL ]
   ((:INTERNAL (METHOD ASDF:INPUT-FILES (ASDF:OPERATION ASDF:COMPONENT)))
      (ASDF:COMPILE-OP "fix-acl"))
   (MAPCAN #<Interpreted Closure # @ #x88ee9ca2> (#))
   [... EXCL::EVAL-AS-PROGN ]
   (LET (# #) (IF ASDF::SELF-DEPS # ...))
   ((METHOD ASDF:INPUT-FILES (ASDF:OPERATION ASDF:COMPONENT))
      #<ASDF:LOAD-OP NIL @ #x7da3e9c2> #<ASDF:CL-SOURCE-FILE "fix-acl" @ #x7d9bddba>)

... more older frames ...

The problem arises when loading the subsystem that is defined by this
form:

(defsystem :clim-lisp
    :components
  (;; First possible patches
   (:file "patch")
   (:module "Lisp-Dep"
            :depends-on ("patch")
            :components
            ((:file   #+cmu       "fix-cmu"
		      #+scl       "fix-scl"
                      #+excl      "fix-acl"
                      #+sbcl      "fix-sbcl"
                      #+openmcl   "fix-openmcl"
                      #+lispworks "fix-lispworks"
                      #+clisp     "fix-clisp")))
   (:file "package" :depends-on ("Lisp-Dep"))))

I *believe* the error is because of an inconsistency in
parent/component links, but I am not sure  that this is really a
problem, or just something that I don't understand.

In partiuclar, the component-parent of "fix-acl" is the system
"clim-lisp".  BUT "fix-acl" is NOT a component of that system.
Instead, the module "Lisp-Dep" is a component of clim-lisp.  But
fix-acl does not point at that module; it points directly at
clim-lisp.

Is this a bug?  Or is this an intended behavior?

Thanks,
R