How to load maxima as a asdf package? (sbcl)

When i use defsystem.lisp (maxima.system), SBCL can compile
f2cl-lib.lisp without any error.
Why ASDF package can't compile it under SBCL ? Is asdf package of
maxima only for ECL ?

On Sat, Dec 25, 2010 at 10:36 AM, Shaowei Wang (wsw) <wsw1wsw2 at gmail.com> wrote:
> Hi ,all
> ?I found maxima.asd file in maxima/src/. So I want to load maxima as
> a asdf package using sbcl. But I have some issues.
>
> $ cd maxima/src
> $ sbcl
> This is SBCL 1.0.45.4, an implementation of ANSI Common Lisp.
> More information about SBCL is available at <http://www.sbcl.org/>;.
>
> SBCL is free software, provided as is, with absolutely no warranty.
> It is mostly in the public domain; some portions are provided under
> BSD-style licenses. ?See the CREDITS and COPYING files in the
> distribution for more information.
> * (require :asdf)
>
> ("ASDF")
> * (asdf:load-system :maxima)
> .
> .
> .
>
> ; compilation finished in 0:00:00.192
> ; compiling file
> "/home/wsw/Sources/maxima/src/numerical/slatec/derfc.lisp" (written 08
> APR 2009 08:04:22 AM):
> ; compiling (IN-PACKAGE :SLATEC)
> ; compiling (LET (# # ...) ...)
> ; file: /home/wsw/Sources/maxima/src/numerical/slatec/derfc.lisp
> ; in: DEFUN DERFC
> ; ? ? (F2CL-LIB:FSQRT (* 2.0d0 (F2CL-LIB:D1MACH 3)))
> ; --> BLOCK TYPECASE LET COND IF PROGN SQRT COERCE THE
> ; ==>
> ; ? (SB-KERNEL:%SINGLE-FLOAT SB-C::X)
> ;
> ; caught STYLE-WARNING:
> ; ? Result is a (VALUES (SINGLE-FLOAT 0.0f0) &OPTIONAL), not a DOUBLE-FLOAT.
> ; ? See also:
> ; ? ? The SBCL Manual, Node "Handling of Types"
>
> ; ? ? (SETF SLATEC::TXMAX (F2CL-LIB:FSQRT (- (F2CL-LIB:FLOG #))))
> ; --> SETQ
> ; ==>
> ; ? (THE #<SB-KERNEL:NUMERIC-TYPE DOUBLE-FLOAT>
> ; ? ? ? ?(F2CL-LIB:FSQRT (- (F2CL-LIB:FLOG (* SLATEC::SQRTPI #)))))
> ;
> ; caught WARNING:
> ; ? Asserted type DOUBLE-FLOAT conflicts with derived type
> ; ? (VALUES (OR (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)
> (SINGLE-FLOAT 0.0f0))
> ; ? ? ? ? ? &OPTIONAL).
> ; ? See also:
> ; ? ? The SBCL Manual, Node "Handling of Types"
>
> ; compiling (IN-PACKAGE #:CL-USER)
>
> ; /home/wsw/Sources/maxima/src/binary-ecl/numerical/slatec/ASDF-TMP-derfc.fasl
> written
> ; compilation finished in 0:00:00.130
> WARNING:
> ? COMPILE-FILE warned while performing #<COMPILE-OP NIL {10036B8E81}> on
> ? #<CL-SOURCE-FILE "maxima" "numerical" "slatec" "derfc">.
>
> debugger invoked on a ASDF:COMPILE-FAILED in thread #<THREAD
> ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?"initial thread" RUNNING
> ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?{1002BBB0D1}>:
> ?erred while invoking #<COMPILE-OP NIL {10036B8E81}> on
> ?#<CL-SOURCE-FILE "maxima" "numerical" "slatec" "derfc">
>
> Type HELP for debugger help, or (SB-EXT:QUIT) to exit from SBCL.
>
> restarts (invokable by number or by possibly-abbreviated name):
> ?0: [TRY-RECOMPILING] Try recompiling derfc
> ?1: [RETRY ? ? ? ? ?] Retry
> ? ? ? ? ? ? ? ? ? ? ? compiling component ("maxima" "numerical"
> "slatec" "derfc").
> ?2: [ACCEPT ? ? ? ? ] Continue, treating
> ? ? ? ? ? ? ? ? ? ? ? compiling component ("maxima" "numerical"
> "slatec" "derfc")
> ? ? ? ? ? ? ? ? ? ? ? as having been successful.
> ?3: [ABORT ? ? ? ? ?] Exit debugger, returning to top level.
>
> ((SB-PCL::FAST-METHOD ASDF:PERFORM (ASDF:COMPILE-OP ASDF:CL-SOURCE-FILE))
> ?#<unavailable argument>
> ?#<unavailable argument>
> ?#<ASDF:COMPILE-OP NIL {10036B8E81}>
> ?#<ASDF:CL-SOURCE-FILE "maxima" "numerical" "slatec" "derfc">)
> 0]
> ============================================================
>
> There is a error come up.
> But clisp and ecl do the job just OK.
>
> Any idea?
> Thanks a lot!
>