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))