[asdf-devel] Running the tests: failures: ACL (alisp) and CMUCL
Robert Goldman
rpgoldman at sift.info
Wed Mar 28 17:41:46 UTC 2012
On 3/28/12 Mar 28 -12:20 PM, Faré wrote:
> Apparently, ACL hates (or :utf-8 :default) as expanded by the #+ reader.
> Instead, I'm expanding to (progn :default :utf-8). Does that work better?
> I pushed 2.20.5 - can you test?
Works for me on Allegro now.
>
> As for the CMUCL failure, I can't reproduce, using a CMUCL snapshot
> 2011-06 (20B Unicode) on x86/sse2.
Isn't 20b old?
20c was released sometime late in 2011, right?
(SIGNAL #<TYPE-ERROR {48FAEC9D}>)
Source: Error finding source:
Error in function DEBUG::GET-FILE-TOP-LEVEL-FORM: Source file no longer
exists:
target:code/lispinit.lisp.
0] backtrace
0: (SIGNAL #<TYPE-ERROR {48FAEC9D}>)
1: (ERROR TYPE-ERROR
:FUNCTION-NAME "DEFSTRUCT COMPILER-ERROR-CONTEXT"
:DATUM ...)
2: (KERNEL::OBJECT-NOT-TYPE-ERROR-HANDLER "DEFSTRUCT COMPILER-ERROR-CONTEXT"
#.(SYSTEM:INT-SAP #x47FDD54C)
#<Alien (*
SYSTEM:SYSTEM-AREA-POINTER) at #x47FDD4B4>
(16 80))
3: (KERNEL::INTERNAL-ERROR #.(SYSTEM:INT-SAP #x47FDD4B4) #<unused-arg>)
4: ("OnLispStack+#x2F [#xB8E6] /usr/local/bin/cmucl")
5: ("funcall2+#x2C [#xB31C] /usr/local/bin/cmucl")
6: ("interrupt_internal_error+#x86 [#x7936] /usr/local/bin/cmucl")
7: ("sigtrap_handler+#x194 [#xB674] /usr/local/bin/cmucl")
8: ("_sigtramp+#x2B [#x901E005B] /usr/lib/libSystem.B.dylib")
9: ("DEFSTRUCT COMPILER-ERROR-CONTEXT" 301954370 14)[:OPTIONAL]
10: (C::NOTE-UNDEFINED-REFERENCE TST :FUNCTION "")
11: (C::FIND-FREE-REALLY-FUNCTION TST "")
12: (C::FIND-FREE-FUNCTION TST "")
13: (C::GET-DEFINED-FUNCTION TST)
14: (C::IR1-CONVERT-%DEFUN #<Continuation c1>
#<Continuation c2>
(C::%DEFUN 'TST #'(LAMBDA # #) NIL '(DEFUN
TST # #)))
15: (C::IR1-CONVERT #<Continuation c1>
#<Continuation c2>
(C::%DEFUN 'TST #'(LAMBDA # #) NIL '(DEFUN TST # #)))
16: (C::IR1-CONVERT-PROGN-BODY #<Continuation c1>
#<Continuation c3>
((C::%DEFUN 'TST #'# NIL '#) NIL))
17: (C::IR1-CONVERT-PROGN-BODY 3
#<Continuation c1>
#<Continuation c3>
((C::%DEFUN 'TST #'# NIL '#) NIL))[:EXTERNAL]
18: (C::IR1-CONVERT-AUX-BINDINGS #<Continuation c1>
#<Continuation c3>
((C::%DEFUN 'TST #'# NIL '#) NIL)
NIL
...)
19: (C::IR1-CONVERT-DYNAMIC-EXTENT-BINDINGS #<Continuation c1>
#<Continuation c3>
((C::%DEFUN 'TST #'# NIL '#)
NIL)
NIL
...)
20: (C::IR1-CONVERT-SPECIAL-BINDINGS #<Continuation c1> #<Continuation c3>
((C::%DEFUN 'TST #'# NIL '#) NIL) NIL ...)
21: (C::IR1-CONVERT-LAMBDA-BODY ((C::%DEFUN 'TST #'# NIL '#) NIL)
NIL
NIL
NIL
...)
22: (C::IR1-CONVERT-LAMBDA-BODY 2
((C::%DEFUN 'TST #'# NIL '#) NIL)
NIL
#(0 2 3 4 5 ...)
...)[:EXTERNAL]
23: (C::IR1-TOP-LEVEL (C::%DEFUN 'TST #'(LAMBDA # #) NIL '(DEFUN TST # #))
((C::%DEFUN 'TST #'# NIL '#)
C::ORIGINAL-SOURCE-START 0
1)
NIL)
24: (C::CONVERT-AND-MAYBE-COMPILE
(C::%DEFUN 'TST #'(LAMBDA # #) NIL '(DEFUN TST # #))
((C::%DEFUN 'TST #'# NIL '#) C::ORIGINAL-SOURCE-START 0 1))
25: (C::PROCESS-FORM (C::%DEFUN 'TST #'(LAMBDA # #) NIL '(DEFUN TST # #))
(C::ORIGINAL-SOURCE-START 0 1))
26: (C::PROCESS-FORM (DEFUN TST (X) (1+ X)) (C::ORIGINAL-SOURCE-START 0 1))
27: (C::PROCESS-FORM 2 (DEFUN TST (X) (1+ X)) (C::ORIGINAL-SOURCE-START
0 1))[:EXTERNAL]
28: (C::PROCESS-SOURCES #<Source-Info>)
29: ((FLET #:G0 C::SUB-COMPILE-FILE))
30: (C::SUB-COMPILE-FILE #<Source-Info> NIL)
31: (C::SUB-COMPILE-FILE 1 #<Source-Info> NIL)[:EXTERNAL]
32: (COMPILE-FILE #P"/Users/rpg/lisp/asdf/test/test.lisp"
:OUTPUT-FILE
#P"/Users/rpg/lisp/asdf/tmp/fasls/cmu-20c_release-20c__20c_unicode_-macosx-x86/test/ASDF-TMP-test.sse2f"
:ERROR-FILE ...)
33: (ASDF:COMPILE-FILE* #P"/Users/rpg/lisp/asdf/test/test.lisp"
:OUTPUT-FILE
#P"/Users/rpg/lisp/asdf/tmp/fasls/cmu-20c_release-20c__20c_unicode_-macosx-x86/test/test.sse2f"
:EXTERNAL-FORMAT ...)
34: (ASDF::CALL-IN-BASE-2
#<Closure Over Function "DEFMETHOD PERFORM (COMPILE-OP CL-SOURCE-FILE)"
{48D38F51}>)
35: ((METHOD ASDF:PERFORM NIL (ASDF:COMPILE-OP ASDF:CL-SOURCE-FILE))
(#(8 7 6) . #(# # #)) #<unused-arg>
#<ASDF:COMPILE-OP (:FORCE T) {48E4E4B5}>
#<ASDF:CL-SOURCE-FILE "test-around-compile" "test">)
36: ("LAMBDA (G2739 G2740 G2741)" #<unused-arg> #<unused-arg>
#<ASDF:COMPILE-OP (:FORCE T) {48E4E4B5}>
#<ASDF:CL-SOURCE-FILE "test-around-compile" "test">)
37: ((METHOD ASDF::PERFORM-WITH-RESTARTS (:AROUND) (T T)) #<unused-arg>
#S(PCL::FAST-METHOD-CALL
:FUNCTION #<Function # {48AA3CF9}>
:PV-CELL NIL
:NEXT-METHOD-CALL NIL
:ARG-INFO (2))
#<ASDF:COMPILE-OP (:FORCE T) {48E4E4B5}>
#<ASDF:CL-SOURCE-FILE "test-around-compile" "test">)
38: ((FLET #:G21))
39: ((METHOD ASDF::PERFORM-PLAN NIL (LIST)) #<unused-arg> #<unused-arg>
((# . #) (# . #) (# . #) (# . #) (# . #) ...) #<unused-arg>)
40: ((METHOD ASDF::PERFORM-PLAN NIL (LIST)) 4 #<unused-arg> #<unused-arg>
((# . #) (# . #) (# . #) (# . #) (# . #) ...) ...)[:EXTERNAL]
41: ("DEFMETHOD OPERATE (T T)")
42: ("DEFMETHOD OPERATE (T T)" 0)[:EXTERNAL]
43: (ASDF::CALL-WITH-SYSTEM-DEFINITIONS
#<Closure Over Function "DEFMETHOD OPERATE (T T)" {4835D529}>)
44: (ASDF::CALL-WITH-SYSTEM-DEFINITIONS 1
#<Closure Over Function
"DEFMETHOD OPERATE (T T)"
{4835D529}>)[:EXTERNAL]
45: ((METHOD ASDF:OPERATE NIL (T T)) #<unused-arg> #<unused-arg>
ASDF:LOAD-OP
TEST-AROUND-COMPILE ...)
46: ((METHOD ASDF:OPERATE NIL (T T)) 5 #<unused-arg> #<unused-arg>
ASDF:LOAD-OP
...)[:EXTERNAL]
47: (ASDF:LOAD-SYSTEM TEST-AROUND-COMPILE :FORCE T)
48: (ASDF:LOAD-SYSTEM 3 TEST-AROUND-COMPILE)[:EXTERNAL]
49: (NIL)
50: (CALL-QUITTING-ON-ERROR #<Interpreted Function (LAMBDA # # # #)
{482E5A29}>)
51: (LISP::SLOLOAD
#<Stream for file
"/Users/rpg/lisp/asdf/test/test-around-compile.script">)
52: (LISP::INTERNAL-LOAD #P"test-around-compile.script"
#P"/Users/rpg/lisp/asdf/test/test-around-compile.script"
:ERROR :SOURCE
...)
53: (LISP::INTERNAL-LOAD #P"test-around-compile.script"
#P"/Users/rpg/lisp/asdf/test/test-around-compile.script"
:ERROR NIL
...)
54: (LOAD "test-around-compile.script" :VERBOSE NIL :PRINT ...)
55: (EXTENSIONS::EVAL-SWITCH-DEMON
#<Command Line Switch "eval" -- ("(load
\"test-around-compile.script\")")>)
56: ((FLET EXTENSIONS::INVOKE-DEMON EXTENSIONS::INVOKE-SWITCH-DEMONS)
#<Command Line Switch "eval" -- ("(load
\"test-around-compile.script\")")>)
57: (EXTENSIONS::INVOKE-SWITCH-DEMONS
(#<Command Line Switch "noinit">
#<Command Line Switch "eval" -- ("(load
\"test-around-compile.script\")")>)
(("-help" . #) ("help" . #) ("load" . #) ("eval" . #)))
58: ((LABELS LISP::%RESTART-LISP SAVE-LISP))
59: ((LABELS LISP::RESTART-LISP SAVE-LISP))
0]
Hm... My attempt to deal with the debugger is not notoriously successful:
0] F 20
Argument X is not a NUMBER: |20|.
Error flushed ...
cheers,
r
More information about the asdf-devel
mailing list