我正在尝试在 xubuntu 上将 quicklisp 与 SBCL 1.0.55.0.debian 一起使用。到目前为止,进展缓慢。大约一半的时间,我可以加载一个库,例如(ql:quickload "cl-ppcre")
.
但在另一半时间,我却收到了这个错误(在尝试加载 hunchentoot-cgi、libxml2 和其他一些内容时):
The function :NICKNAMES is undefined.
[Condition of type UNDEFINED-FUNCTION]
我已经尝试了所有的重启,除了 2(接受)。这在 emacs/SLIME 和 REPL 中都会发生。我不确切知道“sb-kernel”的源文件在哪里,但我不确定如果我知道如何修复它。有什么建议么?
(更新:这条线就在这条线(:use :cl)
的正下方;交换他们的位置解决了这个问题,但我很好奇它最初是如何做到的。)(:nicknames :alexandria)
package.lisp
完整的跟踪(对于 hunchentoot-cgi)是:
The function :NICKNAMES is undefined.
[Condition of type UNDEFINED-FUNCTION]
Restarts:
0: [TRY-RECOMPILING] Recompile package and try loading it again
1: [RETRY] Retry loading FASL for #<CL-SOURCE-FILE "alexandria" "package">.
2: [ACCEPT] Continue, treating loading FASL for #<CL-SOURCE-FILE "alexandria" "package"> as having been successful.
3: [ABORT] Give up on "hunchentoot-cgi"
4: [RETRY] Retry SLIME REPL evaluation request.
5: [*ABORT] Return to SLIME's top level.
--more--
Backtrace:
0: (SB-KERNEL:%COERCE-CALLABLE-TO-FUN :NICKNAMES)
1: (SB-FASL::FOP-FUNCALL)
2: (SB-FASL::LOAD-FASL-GROUP ..)
3: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-FASL::LOAD-AS-FASL))
4: ((FLET #:WITHOUT-INTERRUPTS-BODY-88923 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK))
5: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK ..)
6: (SB-FASL::LOAD-AS-FASL ..)
7: ((FLET SB-FASL::LOAD-STREAM :IN LOAD) ..)
8: (LOAD ..)
9: (SB-IMPL::%MAP-FOR-EFFECT-ARITY-1 ..)
10: ((SB-PCL::FAST-METHOD ASDF:PERFORM (ASDF:LOAD-OP ASDF:CL-SOURCE-FILE)) ..)
11: ((SB-PCL::EMF ASDF:PERFORM) #<unavailable argument> #<unavailable argument> #<ASDF:LOAD-OP (:VERBOSE NIL) {10ABFD01}> #<ASDF:CL-SOURCE-FILE "alexandria" "package">)
12: ((SB-PCL::FAST-METHOD ASDF::PERFORM-WITH-RESTARTS (ASDF:LOAD-OP ASDF:CL-SOURCE-FILE)) ..)
13: ((SB-PCL::FAST-METHOD ASDF::PERFORM-WITH-RESTARTS :AROUND (T T)) ..)
14: ((LAMBDA () :IN ASDF::PERFORM-PLAN))
15: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-C::%WITH-COMPILATION-UNIT))
16: ((FLET #:WITHOUT-INTERRUPTS-BODY-88923 :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK))
17: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK ..)
18: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
19: ((SB-PCL::FAST-METHOD ASDF::PERFORM-PLAN (LIST)) ..)
20: ((LAMBDA () :IN ASDF:OPERATE))
21: (ASDF::CALL-WITH-SYSTEM-DEFINITIONS #<CLOSURE (LAMBDA # :IN ASDF:OPERATE) {108EF07D}>)
22: ((SB-PCL::FAST-METHOD ASDF:OPERATE (T T)) #<unused argument> #<unused argument> ASDF:LOAD-OP "hunchentoot-cgi" :VERBOSE NIL)
23: ((SB-PCL::EMF ASDF:OPERATE) #<unused argument> #<unused argument> ASDF:LOAD-OP "hunchentoot-cgi" :VERBOSE NIL)
24: (QUICKLISP-CLIENT::CALL-WITH-MACROEXPAND-PROGRESS #<CLOSURE (LAMBDA # :IN QUICKLISP-CLIENT::APPLY-LOAD-STRATEGY) {108EEE4D}>)
25: (QUICKLISP-CLIENT::AUTOLOAD-SYSTEM-AND-DEPENDENCIES "hunchentoot-cgi" :PROMPT NIL)
26: ((SB-PCL::FAST-METHOD QL-IMPL-UTIL::%CALL-WITH-QUIET-COMPILATION (T T)) ..)
27: ((SB-PCL::FAST-METHOD QL-IMPL-UTIL::%CALL-WITH-QUIET-COMPILATION :AROUND (QL-IMPL:SBCL T)) ..)
28: ((SB-PCL::FAST-METHOD QUICKLISP-CLIENT:QUICKLOAD (T)) #<unused argument> #<unused argument> #<unavailable argument> :PROMPT NIL :VERBOSE NIL)
29: (QL-DIST::CALL-WITH-CONSISTENT-DISTS #<CLOSURE (LAMBDA # :IN QUICKLISP-CLIENT:QUICKLOAD) {108CD455}>)
30: (SB-INT:SIMPLE-EVAL-IN-LEXENV (QUICKLISP-CLIENT:QUICKLOAD "hunchentoot-cgi") #<NULL-LEXENV>)
31: (EVAL (QUICKLISP-CLIENT:QUICKLOAD "hunchentoot-cgi"))
32: (SWANK::EVAL-REGION "(ql:quickload \"hunchentoot-cgi\")\n")
33: ((LAMBDA () :IN SWANK::REPL-EVAL))
34: (SWANK::TRACK-PACKAGE #<CLOSURE (LAMBDA # :IN SWANK::REPL-EVAL) {108CD12D}>)
35: (SWANK::CALL-WITH-RETRY-RESTART "Retry SLIME REPL evaluation request." #<CLOSURE (LAMBDA # :IN SWANK::REPL-EVAL) {108CD0BD}>)
36: (SWANK::CALL-WITH-BUFFER-SYNTAX NIL #<CLOSURE (LAMBDA # :IN SWANK::REPL-EVAL) {108CD0A5}>)
37: (SWANK::REPL-EVAL "(ql:quickload \"hunchentoot-cgi\")\n")
38: (SB-INT:SIMPLE-EVAL-IN-LEXENV (SWANK:LISTENER-EVAL "(ql:quickload \"hunchentoot-cgi\")\n") #<NULL-LEXENV>)
39: (EVAL (SWANK:LISTENER-EVAL "(ql:quickload \"hunchentoot-cgi\")\n"))
40: (SWANK:EVAL-FOR-EMACS (SWANK:LISTENER-EVAL "(ql:quickload \"hunchentoot-cgi\")\n") "COMMON-LISP-USER" 144)
41: (SWANK::PROCESS-REQUESTS NIL)
42: ((LAMBDA () :IN SWANK::HANDLE-REQUESTS))
43: ((LAMBDA () :IN SWANK::HANDLE-REQUESTS))
44: (SWANK-BACKEND::CALL-WITH-BREAK-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA # :IN SWANK::HANDLE-REQUESTS) {D2420C5}>)
45: ((FLET SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK :IN "/home/amperry/.emacs.d/slime-2.7/swank-sbcl.lisp") #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK> #<CLOSURE (LAMBDA # :IN SWANK::HANDLE-REQUESTS) {D2420C5}>)
46: (SWANK::CALL-WITH-BINDINGS ..)
47: (SWANK::HANDLE-REQUESTS #<SWANK::MULTITHREADED-CONNECTION {CBAE9B1}> NIL)
48: ((FLET #:WITHOUT-INTERRUPTS-BODY-223578 :IN SB-THREAD:MAKE-THREAD))
49: ((FLET SB-THREAD::WITH-MUTEX-THUNK :IN SB-THREAD:MAKE-THREAD))
50: ((FLET #:WITHOUT-INTERRUPTS-BODY-88894 :IN SB-THREAD::CALL-WITH-MUTEX))
51: (SB-THREAD::CALL-WITH-MUTEX ..)
52: (SB-THREAD::INITIAL-THREAD-FUNCTION)
53: ("foreign function: call_into_lisp")
54: ("foreign function: funcall0")
55: ("foreign function: new_thread_trampoline")
56: ("foreign function: #xB7FA6D4C")