Regression in 9933b3078f35be0198dc37d1b0d914797c5802d7
Stelian Ionescu
sionescu at cddr.org
Mon Dec 14 04:15:17 UTC 2015
Commit "Avoid calling SUBTYPEP in ANSI-STREAM-{READ,WRITE}-SEQUENCE"
causes the following error when compiling Quicklisp's package.lisp. I'm
not sure what's happening, though, because if I start SBCL with
--no-userinit and compile that file manually, I don't see the error.
debugger invoked on a TYPE-ERROR in thread #<THREAD "main thread" RUNNING {10039ED6B3}>: The value NIL is not of type SB-C::COMPILER-ERROR-CONTEXT.
Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.
restarts (invokable by number or by possibly-abbreviated name):
0: [RETRY ] Retry compiling #<CL-SOURCE-FILE "quicklisp" "package">.
1: [ACCEPT ] Continue, treating compiling #<CL-SOURCE-FILE "quicklisp" "package"> as having been successful.
2: Retry ASDF operation.
3: [CLEAR-CONFIGURATION-AND-RETRY] Retry ASDF operation after resetting the configuration.
4: [RETRY ] Retry EVAL of current toplevel form.
5: [CONTINUE ] Ignore error and continue loading file "/home/hechee/lisp/quicklisp/setup.lisp".
6: [ABORT ] Abort loading file "/home/hechee/lisp/quicklisp/setup.lisp".
7: Retry EVAL of current toplevel form.
8: Ignore error and continue loading file "/home/hechee/.cl-init/asdf-init.lisp".
9: Abort loading file "/home/hechee/.cl-init/asdf-init.lisp".
10: Retry EVAL of current toplevel form.
11: Ignore error and continue userinit file "/home/hechee/.sbclrc".
12: Abort userinit file "/home/hechee/.sbclrc".
13: Skip to toplevel READ/EVAL/PRINT loop.
14: [EXIT ] Exit SBCL (calling #'EXIT, killing the process).
((LAMBDA (UIOP/LISP-BUILD::FROB) :IN UIOP/LISP-BUILD::REIFY-UNDEFINED-WARNING) NIL)
source: #S(SB-IMPL::COMMA :EXPR (SB-C::COMPILER-ERROR-CONTEXT-ENCLOSING-SOURCE FROB) :KIND 0)
0] backtrace
Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {10039ED6B3}>
0: ((LAMBDA (UIOP/LISP-BUILD::FROB) :IN UIOP/LISP-BUILD::REIFY-UNDEFINED-WARNING) NIL)
1: (UIOP/LISP-BUILD::REIFY-UNDEFINED-WARNING #<SB-C::UNDEFINED-WARNING :DEFAULT>)
2: (UIOP/LISP-BUILD:REIFY-DEFERRED-WARNINGS)
3: ((LAMBDA NIL :IN UIOP/LISP-BUILD:SAVE-DEFERRED-WARNINGS))
4: ((LAMBDA NIL :IN UIOP/STREAM:CALL-WITH-SAFE-IO-SYNTAX))
5: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #<CLOSURE (LAMBDA NIL :IN UIOP/STREAM:CALL-WITH-SAFE-IO-SYNTAX) {100FF5BB1B}>)
6: (UIOP/STREAM:CALL-WITH-SAFE-IO-SYNTAX #<CLOSURE (LAMBDA NIL :IN UIOP/LISP-BUILD:SAVE-DEFERRED-WARNINGS) {100FF5BAFB}> :PACKAGE :CL)
7: (UIOP/LISP-BUILD:SAVE-DEFERRED-WARNINGS #P"/home/hechee/.cache/common-lisp/sbcl-1.3.1.126-b8a086c89589-linux-x64/home/hechee/lisp/quicklisp/quicklisp/package.sbcl-warnings")
8: ((LAMBDA NIL :IN UIOP/LISP-BUILD::CALL-WITH-SAVED-DEFERRED-WARNINGS))
9: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
10: (UIOP/LISP-BUILD::CALL-WITH-SAVED-DEFERRED-WARNINGS #<CLOSURE (LAMBDA NIL :IN UIOP/LISP-BUILD:COMPILE-FILE*) {100FEDFDCB}> #P"/home/hechee/.cache/common-lisp/sbcl-1.3.1.126-b8a086c89589-linux-x64/home/hechee/lisp/quicklisp/quicklisp/package.sbcl-warnings" :SOURCE-NAMESTRING "/home/hechee/lisp/quicklisp/quicklisp/package.lisp")
11: ((LAMBDA (UIOP/LISP-BUILD::INPUT-FILE) :IN UIOP/LISP-BUILD:COMPILE-FILE*) #P"/home/hechee/lisp/quicklisp/quicklisp/package.lisp")
12: (UIOP/PATHNAME:CALL-WITH-ENOUGH-PATHNAME #P"/home/hechee/lisp/quicklisp/quicklisp/package.lisp" NIL #<CLOSURE (LAMBDA (UIOP/LISP-BUILD::INPUT-FILE) :IN UIOP/LISP-BUILD:COMPILE-FILE*) {100FEDFD8B}>)
13: (UIOP/LISP-BUILD:COMPILE-FILE* #P"/home/hechee/lisp/quicklisp/quicklisp/package.lisp" :OUTPUT-FILE #P"/home/hechee/.cache/common-lisp/sbcl-1.3.1.126-b8a086c89589-linux-x64/home/hechee/lisp/quicklisp/quicklisp/package.fasl" :EXTERNAL-FORMAT :UTF-8 :WARNINGS-FILE #P"/home/hechee/.cache/common-lisp/sbcl-1.3.1.126-b8a086c89589-linux-x64/home/hechee/lisp/quicklisp/quicklisp/package.sbcl-warnings")
14: ((LAMBDA (&REST ASDF/LISP-ACTION:FLAGS) :IN ASDF/LISP-ACTION:PERFORM-LISP-COMPILATION))
15: (UIOP/UTILITY:CALL-FUNCTION FUNCALL #<CLOSURE (LAMBDA (&REST ASDF/LISP-ACTION:FLAGS) :IN ASDF/LISP-ACTION:PERFORM-LISP-COMPILATION) {100FEC7AEB}>)
16: (UIOP/LISP-BUILD:CALL-AROUND-HOOK NIL #<CLOSURE (LAMBDA (&REST ASDF/LISP-ACTION:FLAGS) :IN ASDF/LISP-ACTION:PERFORM-LISP-COMPILATION) {100FEC7AEB}>)
17: ((:METHOD ASDF/LISP-ACTION:CALL-WITH-AROUND-COMPILE-HOOK (ASDF/COMPONENT:COMPONENT T)) #<ASDF/LISP-ACTION:CL-SOURCE-FILE "quicklisp" "package"> #<CLOSURE (LAMBDA (&REST ASDF/LISP-ACTION:FLAGS) :IN ASDF/LISP-ACTION:PERFORM-LISP-COMPILATION) {100FEC7AEB}>) [fast-method]
18: (ASDF/LISP-ACTION:PERFORM-LISP-COMPILATION #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "quicklisp" "package">)
19: ((:METHOD ASDF/ACTION:PERFORM (ASDF/LISP-ACTION:COMPILE-OP ASDF/LISP-ACTION:CL-SOURCE-FILE)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "quicklisp" "package">) [fast-method]
20: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "quicklisp" "package">)
21: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS (T T)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "quicklisp" "package">) [fast-method]
22: ((FLET CALL-NEXT-METHOD :IN "/home/hechee/work/src/asdf/build/asdf.lisp"))
23: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "quicklisp" "package">) [fast-method]
24: ((:METHOD ASDF/PLAN:PERFORM-PLAN (LIST)) ((#1=#<ASDF/LISP-ACTION:PREPARE-OP > . #<ASDF/SYSTEM:SYSTEM #2="quicklisp">) (#1# . #3=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #2# "package">) (#4=#<ASDF/LISP-ACTION:COMPILE-OP > . #3#) (#5=#<ASDF/LISP-ACTION:LOAD-OP :VERBOSE NIL> . #3#) (#1# . #6=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #2# "utils">) (#4# . #6#) (#5# . #6#) (#1# . #7=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #2# "config">) (#4# . #7#) (#5# . #7#) (#1# . #8=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #2# "impl">) (#4# . #8#) ...) :FORCE NIL) [fast-method]
25: ((FLET CALL-NEXT-METHOD :IN "/home/hechee/work/src/asdf/build/asdf.lisp"))
26: ((LAMBDA NIL :IN ASDF/PLAN:PERFORM-PLAN))
27: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
28: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) ((#1=#<ASDF/LISP-ACTION:PREPARE-OP > . #<ASDF/SYSTEM:SYSTEM #2="quicklisp">) (#1# . #3=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #2# "package">) (#4=#<ASDF/LISP-ACTION:COMPILE-OP > . #3#) (#5=#<ASDF/LISP-ACTION:LOAD-OP :VERBOSE NIL> . #3#) (#1# . #6=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #2# "utils">) (#4# . #6#) (#5# . #6#) (#1# . #7=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #2# "config">) (#4# . #7#) (#5# . #7#) (#1# . #8=#<ASDF/LISP-ACTION:CL-SOURCE-FILE #2# "impl">) (#4# . #8#) ...) :VERBOSE NIL) [fast-method]
29: ((:METHOD ASDF/PLAN:PERFORM-PLAN (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {100FBEEC13}> :VERBOSE NIL) [fast-method]
30: ((FLET CALL-NEXT-METHOD :IN "/home/hechee/work/src/asdf/build/asdf.lisp"))
31: ((LAMBDA NIL :IN ASDF/PLAN:PERFORM-PLAN))
32: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
33: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {100FBEEC13}> :VERBOSE NIL) [fast-method]
34: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP :VERBOSE NIL> #<ASDF/SYSTEM:SYSTEM "quicklisp"> :VERBOSE NIL) [fast-method]
35: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP :VERBOSE NIL> #<ASDF/SYSTEM:SYSTEM "quicklisp"> :VERBOSE NIL)
36: ((FLET CALL-NEXT-METHOD :IN "/home/hechee/work/src/asdf/build/asdf.lisp"))
37: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
38: (ASDF/CACHE:CALL-WITH-ASDF-CACHE #<CLOSURE (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {100FBEDF0B}> :OVERRIDE NIL :KEY NIL)
39: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP :VERBOSE NIL> #<ASDF/SYSTEM:SYSTEM "quicklisp"> :VERBOSE NIL) [fast-method]
40: ((:METHOD ASDF/OPERATE:OPERATE (SYMBOL T)) ASDF/LISP-ACTION:LOAD-OP "quicklisp" :VERBOSE NIL) [fast-method]
41: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "quicklisp" :VERBOSE NIL)
42: ((FLET CALL-NEXT-METHOD :IN "/home/hechee/work/src/asdf/build/asdf.lisp"))
43: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
44: (ASDF/CACHE:CALL-WITH-ASDF-CACHE #<CLOSURE (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {100F6DEDCB}> :OVERRIDE NIL :KEY NIL)
45: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "quicklisp" :VERBOSE NIL) [fast-method]
46: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "quicklisp" :VERBOSE NIL) [fast-method]
47: (ASDF/OPERATE:OOS ASDF/LISP-ACTION:LOAD-OP "quicklisp" :VERBOSE NIL)
48: ((LAMBDA NIL :IN "/home/hechee/lisp/quicklisp/setup.lisp"))
49: (SB-INT:SIMPLE-EVAL-IN-LEXENV (LET ((*COMPILE-PRINT* NIL) (*COMPILE-VERBOSE* NIL) (*LOAD-VERBOSE* NIL) (*LOAD-PRINT* NIL)) (ASDF/OPERATE:OOS (QUOTE ASDF/LISP-ACTION:LOAD-OP) "quicklisp" :VERBOSE NIL)) #<NULL-LEXENV>)
50: (SB-EXT:EVAL-TLF (LET ((*COMPILE-PRINT* NIL) (*COMPILE-VERBOSE* NIL) (*LOAD-VERBOSE* NIL) (*LOAD-PRINT* NIL)) (ASDF/OPERATE:OOS (QUOTE ASDF/LISP-ACTION:LOAD-OP) "quicklisp" :VERBOSE NIL)) 14 NIL)
51: ((LABELS SB-FASL::EVAL-FORM :IN SB-INT:LOAD-AS-SOURCE) (LET ((*COMPILE-PRINT* NIL) (*COMPILE-VERBOSE* NIL) (*LOAD-VERBOSE* NIL) (*LOAD-PRINT* NIL)) (ASDF/OPERATE:OOS (QUOTE ASDF/LISP-ACTION:LOAD-OP) "quicklisp" :VERBOSE NIL)) 14)
52: ((LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) (LET ((*COMPILE-PRINT* NIL) (*COMPILE-VERBOSE* NIL) (*LOAD-VERBOSE* NIL) (*LOAD-PRINT* NIL)) (ASDF/OPERATE:OOS (QUOTE ASDF/LISP-ACTION:LOAD-OP) "quicklisp" :VERBOSE NIL)) :CURRENT-INDEX 14)
53: (SB-C::%DO-FORMS-FROM-INFO #<CLOSURE (LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) {100CD5E1AB}> #<SB-C::SOURCE-INFO {100CD5E163}> SB-C::INPUT-ERROR-IN-LOAD)
54: (SB-INT:LOAD-AS-SOURCE #<SB-INT:FORM-TRACKING-STREAM for "file /home/hechee/lisp/quicklisp/setup.lisp" {100CD5B903}> :VERBOSE NIL :PRINT NIL :CONTEXT "loading")
55: ((FLET SB-FASL::LOAD-STREAM :IN LOAD) #<SB-INT:FORM-TRACKING-STREAM for "file /home/hechee/lisp/quicklisp/setup.lisp" {100CD5B903}> NIL)
56: (LOAD #P"/home/hechee/lisp/quicklisp/setup.lisp" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST NIL :EXTERNAL-FORMAT :DEFAULT)
57: (SB-INT:SIMPLE-EVAL-IN-LEXENV (LOAD (MERGE-PATHNAMES "lisp/quicklisp/setup.lisp" (USER-HOMEDIR-PATHNAME)) :IF-DOES-NOT-EXIST NIL) #<NULL-LEXENV>)
58: (SB-EXT:EVAL-TLF (LOAD (MERGE-PATHNAMES "lisp/quicklisp/setup.lisp" (USER-HOMEDIR-PATHNAME)) :IF-DOES-NOT-EXIST NIL) 8 NIL)
59: ((LABELS SB-FASL::EVAL-FORM :IN SB-INT:LOAD-AS-SOURCE) (LOAD (MERGE-PATHNAMES "lisp/quicklisp/setup.lisp" (USER-HOMEDIR-PATHNAME)) :IF-DOES-NOT-EXIST NIL) 8)
60: ((LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) (LOAD (MERGE-PATHNAMES "lisp/quicklisp/setup.lisp" (USER-HOMEDIR-PATHNAME)) :IF-DOES-NOT-EXIST NIL) :CURRENT-INDEX 8)
61: (SB-C::%DO-FORMS-FROM-INFO #<CLOSURE (LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) {1003E003AB}> #<SB-C::SOURCE-INFO {1003E00363}> SB-C::INPUT-ERROR-IN-LOAD)
62: (SB-INT:LOAD-AS-SOURCE #<SB-INT:FORM-TRACKING-STREAM for "file /home/hechee/.cl-init/asdf-init.lisp" {1003DFDBD3}> :VERBOSE NIL :PRINT NIL :CONTEXT "loading")
63: ((FLET SB-FASL::LOAD-STREAM :IN LOAD) #<SB-INT:FORM-TRACKING-STREAM for "file /home/hechee/.cl-init/asdf-init.lisp" {1003DFDBD3}> NIL)
64: (LOAD #P"/home/hechee/.cl-init/asdf-init.lisp" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST T :EXTERNAL-FORMAT :DEFAULT)
65: (SB-INT:SIMPLE-EVAL-IN-LEXENV (FLET ((HECHEE-USER::LOAD-INIT-FILE (HECHEE-USER::FILE) (LOAD (ETYPECASE HECHEE-USER::FILE # #) :PRINT NIL :VERBOSE NIL))) (LET ((HECHEE-USER::IMPL-SPECIFIC-INIT (MAKE-PATHNAME :NAME # :TYPE "lisp" :DEFAULTS HECHEE-USER::*RCDIR*))) (WHEN (PROBE-FILE HECHEE-USER::IMPL-SPECIFIC-INIT) (HECHEE-USER::LOAD-INIT-FILE HECHEE-USER::IMPL-SPECIFIC-INIT)) (HECHEE-USER::LOAD-INIT-FILE "asdf-init"))) #<NULL-LEXENV>)
66: (SB-EXT:EVAL-TLF (FLET ((HECHEE-USER::LOAD-INIT-FILE (HECHEE-USER::FILE) (LOAD (ETYPECASE HECHEE-USER::FILE # #) :PRINT NIL :VERBOSE NIL))) (LET ((HECHEE-USER::IMPL-SPECIFIC-INIT (MAKE-PATHNAME :NAME # :TYPE "lisp" :DEFAULTS HECHEE-USER::*RCDIR*))) (WHEN (PROBE-FILE HECHEE-USER::IMPL-SPECIFIC-INIT) (HECHEE-USER::LOAD-INIT-FILE HECHEE-USER::IMPL-SPECIFIC-INIT)) (HECHEE-USER::LOAD-INIT-FILE "asdf-init"))) 10 NIL)
67: ((LABELS SB-FASL::EVAL-FORM :IN SB-INT:LOAD-AS-SOURCE) (FLET ((HECHEE-USER::LOAD-INIT-FILE (HECHEE-USER::FILE) (LOAD (ETYPECASE HECHEE-USER::FILE # #) :PRINT NIL :VERBOSE NIL))) (LET ((HECHEE-USER::IMPL-SPECIFIC-INIT (MAKE-PATHNAME :NAME # :TYPE "lisp" :DEFAULTS HECHEE-USER::*RCDIR*))) (WHEN (PROBE-FILE HECHEE-USER::IMPL-SPECIFIC-INIT) (HECHEE-USER::LOAD-INIT-FILE HECHEE-USER::IMPL-SPECIFIC-INIT)) (HECHEE-USER::LOAD-INIT-FILE "asdf-init"))) 10)
68: ((LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) (FLET ((HECHEE-USER::LOAD-INIT-FILE (HECHEE-USER::FILE) (LOAD (ETYPECASE HECHEE-USER::FILE # #) :PRINT NIL :VERBOSE NIL))) (LET ((HECHEE-USER::IMPL-SPECIFIC-INIT (MAKE-PATHNAME :NAME # :TYPE "lisp" :DEFAULTS HECHEE-USER::*RCDIR*))) (WHEN (PROBE-FILE HECHEE-USER::IMPL-SPECIFIC-INIT) (HECHEE-USER::LOAD-INIT-FILE HECHEE-USER::IMPL-SPECIFIC-INIT)) (HECHEE-USER::LOAD-INIT-FILE "asdf-init"))) :CURRENT-INDEX 10)
69: (SB-C::%DO-FORMS-FROM-INFO #<CLOSURE (LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) {1003A0C23B}> #<SB-C::SOURCE-INFO {1003A0C1F3}> SB-C::INPUT-ERROR-IN-LOAD)
70: (SB-INT:LOAD-AS-SOURCE #<SB-SYS:FD-STREAM for "file /home/hechee/.cl-init/init.lisp" {1003A0A673}> :VERBOSE NIL :PRINT NIL :CONTEXT "userinit")
71: (SB-IMPL::PROCESS-INIT-FILE NIL :USER)
72: (SB-IMPL::TOPLEVEL-INIT)
73: ((FLET #:WITHOUT-INTERRUPTS-BODY-82 :IN SB-EXT:SAVE-LISP-AND-DIE))
74: ((LABELS SB-IMPL::RESTART-LISP :IN SB-EXT:SAVE-LISP-AND-DIE))
--
Stelian Ionescu a.k.a. fe[nl]ix
Quidquid latine dictum sit, altum videtur.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: signature.asc
Type: application/pgp-signature
Size: 181 bytes
Desc: This is a digitally signed message part
URL: <https://mailman.common-lisp.net/pipermail/asdf-devel/attachments/20151213/8220bda7/attachment.sig>
More information about the asdf-devel
mailing list