Shirakumo / radiance

A Common Lisp web application environment
https://shirakumo.github.io/radiance/
zlib License
311 stars 19 forks source link

Failing to quickload on SBCL 2.0.4 #48

Closed jozip closed 4 years ago

jozip commented 4 years ago

Am I missing something?

▶ sbcl
This is SBCL 2.0.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.
* (ql:quickload :radiance)
To load "radiance":
  Load 1 ASDF system:
    radiance
; Loading "radiance"
............
; file: /home/jzp/.local/quicklisp/dists/shirakumo/software/radiance-2020.05.12_14-54-21-GMT/deploy.lisp
; in: DEPLOY:DEFINE-HOOK (:LOAD LOAD-MODULES)
;     (DEPLOY:DEFINE-HOOK (:LOAD RADIANCE-CORE::LOAD-MODULES)
;         NIL
;       (DEPLOY:STATUS 0 "Configuring environment")
;       (SETF RADIANCE-CORE::*DEPLOYING-P* T)
;       (SETF (RADIANCE-CORE:ENVIRONMENT)
;               (IF (BOUNDP 'ENVIRONMENT)
;                   (SYMBOL-VALUE 'ENVIRONMENT)
;                   "deploy"))
;       (DEPLOY:STATUS 1 "Loading target modules")
;       (WHEN (BOUNDP 'MODULES)
;         (DOLIST (MODULARIZE:MODULE (SYMBOL-VALUE 'MODULES))
;           (ASDF/OPERATE:LOAD-SYSTEM MODULARIZE:MODULE)))
;       (DEPLOY:STATUS 1 "Performing boot to load required interfaces")
;       (RADIANCE-CORE:STARTUP)
;       (RADIANCE-CORE:SHUTDOWN)
;       (MAPC #'ASDF/SYSTEM-REGISTRY:REGISTER-IMMUTABLE-SYSTEM
;             (ASDF/OPERATE:ALREADY-LOADED-SYSTEMS))
;       ...)
; 
; caught ERROR:
;   (during macroexpansion of (DEPLOY:DEFINE-HOOK (:LOAD LOAD-MODULES)
;       ...))
;   :LOAD fell through ECASE expression. Wanted one of (:BUILD :DEPLOY :BOOT :QUIT).
.
debugger invoked on a UIOP/LISP-BUILD:COMPILE-FILE-ERROR in thread
#<THREAD "main thread" RUNNING {1000518083}>:
  COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "radiance-core" "deploy">

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 "radiance-core" "deploy">.
  1: [ACCEPT                       ] Continue, treating
                                     compiling #<CL-SOURCE-FILE "radiance-core" "deploy">
                                     as having been successful.
  2:                                 Retry ASDF operation.
  3: [CLEAR-CONFIGURATION-AND-RETRY] Retry ASDF operation after resetting the
                                     configuration.
  4:                                 Retry ASDF operation.
  5:                                 Retry ASDF operation after resetting the
                                     configuration.
  6: [ABORT                        ] Give up on "radiance"
  7:                                 Exit debugger, returning to top level.

(UIOP/LISP-BUILD:CHECK-LISP-COMPILE-RESULTS NIL T T "~/asdf-action::format-action/" ((#<ASDF/LISP-ACTION:COMPILE-OP > . #<ASDF/LISP-ACTION:CL-SOURCE-FILE "radiance-core" "deploy">)))
   source: (ERROR 'COMPILE-FILE-ERROR :CONTEXT-FORMAT CONTEXT-FORMAT
                  :CONTEXT-ARGUMENTS CONTEXT-ARGUMENTS)
0] backtrace

Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {1000518083}>
0: (UIOP/LISP-BUILD:CHECK-LISP-COMPILE-RESULTS NIL T T "~/asdf-action::format-action/" ((#<ASDF/LISP-ACTION:COMPILE-OP > . #<ASDF/LISP-ACTION:CL-SOURCE-FILE "radiance-core" "deploy">)))
1: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "radiance-core" "deploy">)
2: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
3: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "radiance-core" "deploy">) [fast-method]
4: ((:METHOD ASDF/PLAN:PERFORM-PLAN (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {10030EC893}>) [fast-method]
5: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
6: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {10030EC893}>) [fast-method]
7: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "radiance"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method]
8: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "radiance"> :VERBOSE NIL)
9: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
10: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "radiance"> :VERBOSE NIL) [fast-method]
11: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "radiance" :VERBOSE NIL)
12: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
13: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "radiance" :VERBOSE NIL) [fast-method]
14: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<CLOSURE (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {10030DEE5B}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL)
15: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
16: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<CLOSURE (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {10030D40EB}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL)
17: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "radiance" :VERBOSE NIL) [fast-method]
18: (ASDF/OPERATE:LOAD-SYSTEM "radiance" :VERBOSE NIL)
19: (QUICKLISP-CLIENT::CALL-WITH-MACROEXPAND-PROGRESS #<CLOSURE (LAMBDA NIL :IN QUICKLISP-CLIENT::APPLY-LOAD-STRATEGY) {10030D284B}>)
20: (QUICKLISP-CLIENT::AUTOLOAD-SYSTEM-AND-DEPENDENCIES "radiance" :PROMPT NIL)
21: ((:METHOD QL-IMPL-UTIL::%CALL-WITH-QUIET-COMPILATION (T T)) #<unused argument> #<CLOSURE (FLET QUICKLISP-CLIENT::QL :IN QUICKLISP-CLIENT:QUICKLOAD) {1002D0447B}>) [fast-method]
22: ((:METHOD QL-IMPL-UTIL::%CALL-WITH-QUIET-COMPILATION :AROUND (QL-IMPL:SBCL T)) #<QL-IMPL:SBCL {10025BC413}> #<CLOSURE (FLET QUICKLISP-CLIENT::QL :IN QUICKLISP-CLIENT:QUICKLOAD) {1002D0447B}>) [fast-method]
23: ((:METHOD QUICKLISP-CLIENT:QUICKLOAD (T)) :RADIANCE :PROMPT NIL :SILENT NIL :VERBOSE NIL) [fast-method]
24: (QL-DIST::CALL-WITH-CONSISTENT-DISTS #<CLOSURE (LAMBDA NIL :IN QUICKLISP-CLIENT:QUICKLOAD) {1002CE9DAB}>)
25: (SB-INT:SIMPLE-EVAL-IN-LEXENV (QUICKLISP-CLIENT:QUICKLOAD :RADIANCE) #<NULL-LEXENV>)
26: (EVAL (QUICKLISP-CLIENT:QUICKLOAD :RADIANCE))
27: (INTERACTIVE-EVAL (QUICKLISP-CLIENT:QUICKLOAD :RADIANCE) :EVAL NIL)
28: (SB-IMPL::REPL-FUN NIL)
29: ((FLET "LAMBDA0" :IN "SYS:SRC;CODE;TOPLEVEL.LISP"))
30: (SB-IMPL::%WITH-REBOUND-IO-SYNTAX #<CLOSURE (FLET "LAMBDA0" :IN "SYS:SRC;CODE;TOPLEVEL.LISP") {7FAF25CF7B7B}>)
31: (SB-IMPL::TOPLEVEL-REPL NIL)
32: (SB-IMPL::TOPLEVEL-INIT)
33: ((FLET SB-UNIX::BODY :IN SAVE-LISP-AND-DIE))
34: ((FLET "WITHOUT-INTERRUPTS-BODY-7" :IN SAVE-LISP-AND-DIE))
35: ((LABELS SB-IMPL::RESTART-LISP :IN SAVE-LISP-AND-DIE))

0] l
UIOP/LISP-BUILD::CONTEXT-ARGUMENTS  =  ((#<ASDF/LISP-ACTION:COMPILE-OP >
                                            . #<ASDF/LISP-ACTION:CL-SOURCE-FILE "radiance-core" "deploy">))
UIOP/LISP-BUILD::CONTEXT-FORMAT  =  "~/asdf-action::format-action/"
UIOP/LISP-BUILD::FAILURE-P  =  T
UIOP/LISP-BUILD::OUTPUT  =  NIL
UIOP/LISP-BUILD::WARNINGS-P  =  T

0] 
Shinmera commented 4 years ago

You need a more recent version of Deploy.

jozip commented 4 years ago

That's right, I got a stale quicklisp-dist. Thanks for the help!