Quicklisp使用sbcl:加载各种库时出现UNDEFINED-FUNCTION错误



我正试图在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/SLME和REPL中都会发生。我不知道"sb内核"的源文件到底在哪里,但如果我知道了,我甚至不确定该如何修复它。有什么建议吗?

(更新:(:use :cl)行位于package.lisp(:nicknames :alexandria)行的正下方;交换它们的位置解决了问题,但我很好奇它最初是如何做到这一点的。(

完整的跟踪(对于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")

正如Xach所指出的,在调用(:nicknames :alexandria)时,活动包没有(:use :cl)。交换这两行的顺序解决了这个问题,尽管我不知道它们为什么一开始就按这个顺序排列。

最新更新