[asdf-devel] Please test 2.20.16

[Robert Goldman]

On 4/21/12 Apr 21 -10:57 AM, Raymond Toy wrote:
> On 4/17/12 10:17 PM, Faré wrote:
>> Yes it's clearly there (now 2.20.18) on
>> http://common-lisp.net/gitweb?p=projects/asdf/asdf.git
>> Are you using the master branch when checking out from
>> git://common-lisp.net/projects/asdf/asdf.git
>> ?
> 
> Yeah, I was on the wrong branch.  With the master branch, make lisp
> fails because when cmucl compiles asdf, there are a few notes which I
> guess are warnings.  If you modify compile-asdf.lisp to ignore the
> warnings (like it already does for ecl and scl), then the tests can
> proceed.  At the end I get:
> 
> -#---------------------------------------
> Using cmulisp -noinit -batch
> Ran 39 tests:
>   39 passing and 0 failing
> all tests apparently successful
> -#---------------------------------------
> 
> This is with CMU Common Lisp snapshot-2012-04 (20C Unicode) running on
> OSX 10.6.8.  This is, of course, the "official" build from common-lisp.net.

I thought simple 20c was the official build, since it's all that is
mentioned at http://www.cons.org/cmucl/index.html

Please LMK if I should move to using the 2012-04 snapshot and abandon
the 20c release.
> 
> Where do you get you cmucl binaries from?  What OS are you running on?
> 
> It's possible something got fixed between 20c and 2012-04, but there
> haven't really been very many changes.

This isn't what I get on CMU 20c unicode (which I downloaded --- prior
to the snapshot).

I get a crash when I try to recompile asdf, done as:

1.  start cmucl
2.  (require :asdf)
3.  push my asdf directory onto asdf:*central-registry*
4.  (asdf:load-system :asdf)

The error I get is as follows:

; Compiling Top-Level Form:
; [GC threshold exceeded with 33,192,064 bytes in use.  Commencing GC.]
; [GC completed with 25,558,400 bytes retained and 7,633,664 bytes freed.]
; [GC will next occur when at least 37,558,400 bytes are in use.]
; Compiling LAMBDA (.PV-CELL. .NEXT-METHOD-CALL. STRING .REST-ARG.):
; Compiling Top-Level Form:
; Compiling LAMBDA (.PV-CELL. .NEXT-METHOD-CALL. X .REST-ARG.):
; Compiling Top-Level Form:
; Compiling LAMBDA (.PV-CELL. .NEXT-METHOD-CALL. FORM .REST-ARG.):
; Compiling Top-Level Form:

#(11) fell through ETYPECASE expression.
Wanted one of (FUNCTION PCL::FAST-INSTANCE-BOUNDP FIXNUM PCL::METHOD-CALL
               PCL::FAST-METHOD-CALL).
   [Condition of type CONDITIONS::CASE-FAILURE]

Restarts:
  0: [TRY-RECOMPILING] Try recompiling asdf
  1: [RETRY          ] Retry compiling #<CL-SOURCE-FILE "asdf" "asdf">.
  2: [ACCEPT         ] Continue, treating
                       compiling #<CL-SOURCE-FILE "asdf" "asdf"> as
having been
                       successful.
  3: [ABORT          ] Return to Top-Level.

Debug  (type H for help)

(PCL::INVOKE-EMF #(11)
                 (#<ASDF:LOAD-SOURCE-OP NIL {48935595}>
                  #<ASDF:CL-SOURCE-FILE "asdf" "asdf">))
Source: Error finding source:
Error in function DEBUG::GET-FILE-TOP-LEVEL-FORM:  Source file no longer
exists:
  target:pcl/boot.lisp.

BACKTRACE:

0] backtrace

0: (PCL::INVOKE-EMF #(11)
                    (#<ASDF:LOAD-SOURCE-OP NIL {48935595}>
                     #<ASDF:CL-SOURCE-FILE "asdf" "asdf">))
1: ("LAMBDA (G2663 G2664 G2665)" #<unused-arg> #<unused-arg>
    #<ASDF:LOAD-SOURCE-OP NIL {48935595}> #<ASDF:CL-SOURCE-FILE "asdf"
"asdf">)
2: ("LAMBDA (G2726 G2727 G2728)" #<unused-arg> #<unused-arg>
    #<ASDF:COMPILE-OP NIL {488B52BD}> #<ASDF:CL-SOURCE-FILE "asdf" "asdf">)
3: ((METHOD ASDF::PERFORM-WITH-RESTARTS NIL
     (ASDF:COMPILE-OP ASDF:CL-SOURCE-FILE))
    (#(0) . #(NIL))
    #S(PCL::FAST-METHOD-CALL
         :FUNCTION #<Function # {48202921}>
         :PV-CELL NIL
         :NEXT-METHOD-CALL NIL
         :ARG-INFO (2))
    #<ASDF:COMPILE-OP NIL {488B52BD}> #<ASDF:CL-SOURCE-FILE "asdf" "asdf">)
4: ((FLET #:G21))
5: ((METHOD ASDF::PERFORM-PLAN NIL (LIST)) #<unused-arg> #<unused-arg>
    ((# . #) (# . #) (# . #) (# . #)) #<unused-arg>)
6: ((METHOD ASDF::PERFORM-PLAN NIL (LIST)) 4 #<unused-arg> #<unused-arg>
    ((# . #) (# . #) (# . #) (# . #)) ...)[:EXTERNAL]
7: ("DEFMETHOD OPERATE (T T)")
8: (ASDF::CALL-WITH-SYSTEM-DEFINITIONS
    #<Closure Over Function "DEFMETHOD OPERATE (T T)" {482AB6B1}>)
9: ((METHOD ASDF:OPERATE NIL (T T)) #<unused-arg> #<unused-arg> ASDF:LOAD-OP
    "asdf" ...)
10: (ASDF:LOAD-SYSTEM "asdf")
11: (INTERACTIVE-EVAL (ASDF:LOAD-SYSTEM "asdf"))
12: (LISP::%TOP-LEVEL)
13: ((LABELS LISP::RESTART-LISP SAVE-LISP))

0]

The only recognizable (to me) lines in the output are:

; Converted DEFGENERIC*.
; Converted DEFUN*.

after that all I see is a lot of lines with

; Compiling LAMBDA (.PV-CELL. .NEXT-METHOD-CALL. X):
; Compiling Top-Level Form:

Should there be a top level form echoed there for me to read?  I am not
getting it.  I don't see any list of top level forms.

Cheers,
r