Unable to build ClozureCL with a method-combination defined

Hi,

When a method combination has been defined in the running image,
ClozureCL compilation fails in libs/method-combination.lisp :

,----
| ;Compiling "/usr/local/src/clozure/ccl/lib/method-combination.lisp"...
| ;Loading #P"/usr/local/src/clozure/ccl/bin/method-combination.lx64fsl"...
| > Error: value #<Anonymous Function #x30004090A0FF> is not of the expected type LIST.
| > While executing: LIST-LENGTH, in process listener(1).
| > Type :POP to abort, :R for a list of available restarts.
| > Type :? for other options.
| 1 > :b
| *(7FF537A2D1A0) : 0 (LIST-LENGTH ((#:ARGS . #:GF) . #<Anonymous Function #x30004090A0FF>)) 109
|  (7FF537A2D208) : 1 (PLISTP ((#:ARGS . #:GF) . #<Anonymous Function #x30004090A0FF>)) 61
|  (7FF537A2D228) : 2 (PL-SEARCH ((#:ARGS . #:GF) . #<Anonymous Function #x30004090A0FF>) :OPERATOR) 45
|  (7FF537A2D248) : 3 (GETF ((#:ARGS . #:GF) . #<Anonymous Function #x30004090A0FF>) :OPERATOR NIL) 69
|  (7FF537A2D270) : 4 (FUNCALL #'#<(:INTERNAL %DEFINE-METHOD-COMBINATION-EVALUATOR)> ASDF:STANDARD-ASDF-METHOD-COMBINATION #(LONG-METHOD-COMBINATION (# . #) #<POPULATION #x30004090A0BD> #<POPULATION #x30004090A09D>)) 109
|  (7FF537A2D2A0) : 5 (MAPHASH 2 #<HASH-TABLE :TEST EQ size 10/60 #x3000407A539D>) 421
|  (7FF537A2D308) : 6 (%DEFINE-METHOD-COMBINATION-EVALUATOR AND #<Anonymous Function #x30004170A52F>) 485
|  (7FF537A2D328) : 7 (FUNCALL #'#<Anonymous Function #x30004170A77F>) 477
|  (7FF537A2D348) : 8 (FUNCALL #'#<$FASL-LFUNCALL> #<FASLSTATE #x7FF53903CE6D>) 77
`----

I ran into this because I load ASDF from my init file. Compilation
works fine without ASDF (or other use of DEFINE-METHOD-COMBINATION)
loaded; until a few days ago it was possible to build ClozureCL with
ASDF loaded.

-- 
Eric Marsden