加载cl-unicode

时间:2016-08-31 05:10:27

标签: lisp common-lisp sbcl

我认为我必须遗漏一些东西,而不是新手。 Quicklisp update-dist和update-client说我之前有最新的,加载的cl-ppcre,它工作正常。如果这是相关的,SBCL版本是1.3.8并且我在Windows 7上。任何指针都赞赏。

* (ql:quickload :cl-unicode)
To load "cl-unicode":
  Load 1 ASDF system:
    cl-unicode
; Loading "cl-unicode"
.
; file: C:/Users/K/quicklisp/dists/quicklisp/software/cl-unicode-0.1.5/util.lisp
; in: DEFINE-HANGUL-CONSTANT "SBase"
;     (CL-UNICODE::DEFINE-HANGUL-CONSTANT "SBase" 44032)
; --> EVAL-WHEN
; ==>
;   (DEFCONSTANT :COMMA
;     (CL-UNICODE::CREATE-SYMBOL CL-UNICODE::NAME)
;     :COMMA
;     CL-UNICODE::VALUE
;     :COMMA
;     (FORMAT NIL "The constant `~A' from chapter 3 of the Unicode book."
;             CL-UNICODE::NAME))
;
; caught ERROR:
;   (during macroexpansion of (DEFCONSTANT :COMMA ...))
;   error while parsing arguments to DEFMACRO DEFCONSTANT:
;     too many elements in
;       (:COMMA (CREATE-SYMBOL NAME) :COMMA VALUE :COMMA
;        (FORMAT NIL "The constant `~A' from chapter 3 of the Unicode book." NAME))
;     to satisfy lambda list
;       (SB-IMPL::NAME SB-IMPL::VALUE &OPTIONAL (SB-IMPL::DOC)):
;     between 2 and 3 expected, but got 6

; in: DEFINE-HANGUL-CONSTANT "LBase"
;     (CL-UNICODE::DEFINE-HANGUL-CONSTANT "LBase" 4352)
; --> EVAL-WHEN
; ==>
;   (DEFCONSTANT :COMMA
;     (CL-UNICODE::CREATE-SYMBOL CL-UNICODE::NAME)
;     :COMMA
;     CL-UNICODE::VALUE
;     :COMMA
;     (FORMAT NIL "The constant `~A' from chapter 3 of the Unicode book."
;             CL-UNICODE::NAME))
;
; caught ERROR:
;   (during macroexpansion of (DEFCONSTANT :COMMA ...))
;   error while parsing arguments to DEFMACRO DEFCONSTANT:
;     too many elements in
;       (:COMMA (CREATE-SYMBOL NAME) :COMMA VALUE :COMMA
;        (FORMAT NIL "The constant `~A' from chapter 3 of the Unicode book." NAME))
;     to satisfy lambda list
;       (SB-IMPL::NAME SB-IMPL::VALUE &OPTIONAL (SB-IMPL::DOC)):
;     between 2 and 3 expected, but got 6

; in: DEFINE-HANGUL-CONSTANT "VBase"
;     (CL-UNICODE::DEFINE-HANGUL-CONSTANT "VBase" 4449)
; --> EVAL-WHEN
; ==>
;   (DEFCONSTANT :COMMA
;     (CL-UNICODE::CREATE-SYMBOL CL-UNICODE::NAME)
;     :COMMA
;     CL-UNICODE::VALUE
;     :COMMA
;     (FORMAT NIL "The constant `~A' from chapter 3 of the Unicode book."
;             CL-UNICODE::NAME))
;
; caught ERROR:
;   (during macroexpansion of (DEFCONSTANT :COMMA ...))
;   error while parsing arguments to DEFMACRO DEFCONSTANT:
;     too many elements in
;       (:COMMA (CREATE-SYMBOL NAME) :COMMA VALUE :COMMA
;        (FORMAT NIL "The constant `~A' from chapter 3 of the Unicode book." NAME))
;     to satisfy lambda list
;       (SB-IMPL::NAME SB-IMPL::VALUE &OPTIONAL (SB-IMPL::DOC)):
;     between 2 and 3 expected, but got 6

; in: DEFINE-HANGUL-CONSTANT "TBase"
;     (CL-UNICODE::DEFINE-HANGUL-CONSTANT "TBase" 4519)
; --> EVAL-WHEN
; ==>
;   (DEFCONSTANT :COMMA
;     (CL-UNICODE::CREATE-SYMBOL CL-UNICODE::NAME)
;     :COMMA
;     CL-UNICODE::VALUE
;     :COMMA
;     (FORMAT NIL "The constant `~A' from chapter 3 of the Unicode book."
;             CL-UNICODE::NAME))
;
; caught ERROR:
;   (during macroexpansion of (DEFCONSTANT :COMMA ...))
;   error while parsing arguments to DEFMACRO DEFCONSTANT:
;     too many elements in
;       (:COMMA (CREATE-SYMBOL NAME) :COMMA VALUE :COMMA
;        (FORMAT NIL "The constant `~A' from chapter 3 of the Unicode book." NAME))
;     to satisfy lambda list
;       (SB-IMPL::NAME SB-IMPL::VALUE &OPTIONAL (SB-IMPL::DOC)):
;     between 2 and 3 expected, but got 6

; in: DEFINE-HANGUL-CONSTANT "VCount"
;     (CL-UNICODE::DEFINE-HANGUL-CONSTANT "VCount" 21)
; --> EVAL-WHEN
; ==>
;   (DEFCONSTANT :COMMA
;     (CL-UNICODE::CREATE-SYMBOL CL-UNICODE::NAME)
;     :COMMA
;     CL-UNICODE::VALUE
;     :COMMA
;     (FORMAT NIL "The constant `~A' from chapter 3 of the Unicode book."
;             CL-UNICODE::NAME))
;
; caught ERROR:
;   (during macroexpansion of (DEFCONSTANT :COMMA ...))
;   error while parsing arguments to DEFMACRO DEFCONSTANT:
;     too many elements in
;       (:COMMA (CREATE-SYMBOL NAME) :COMMA VALUE :COMMA
;        (FORMAT NIL "The constant `~A' from chapter 3 of the Unicode book." NAME))
;     to satisfy lambda list
;       (SB-IMPL::NAME SB-IMPL::VALUE &OPTIONAL (SB-IMPL::DOC)):
;     between 2 and 3 expected, but got 6

; in: DEFINE-HANGUL-CONSTANT "TCount"
;     (CL-UNICODE::DEFINE-HANGUL-CONSTANT "TCount" 28)
; --> EVAL-WHEN
; ==>
;   (DEFCONSTANT :COMMA
;     (CL-UNICODE::CREATE-SYMBOL CL-UNICODE::NAME)
;     :COMMA
;     CL-UNICODE::VALUE
;     :COMMA
;     (FORMAT NIL "The constant `~A' from chapter 3 of the Unicode book."
;             CL-UNICODE::NAME))
;
; caught ERROR:
;   (during macroexpansion of (DEFCONSTANT :COMMA ...))
;   error while parsing arguments to DEFMACRO DEFCONSTANT:
;     too many elements in
;       (:COMMA (CREATE-SYMBOL NAME) :COMMA VALUE :COMMA
;        (FORMAT NIL "The constant `~A' from chapter 3 of the Unicode book." NAME))
;     to satisfy lambda list
;       (SB-IMPL::NAME SB-IMPL::VALUE &OPTIONAL (SB-IMPL::DOC)):
;     between 2 and 3 expected, but got 6

; in: DEFINE-HANGUL-CONSTANT "NCount"
;     (CL-UNICODE::DEFINE-HANGUL-CONSTANT "NCount"
;                                         (* CL-UNICODE::+V-COUNT+
;                                            CL-UNICODE::+T-COUNT+))
; --> EVAL-WHEN
; ==>
;   (DEFCONSTANT :COMMA
;     (CL-UNICODE::CREATE-SYMBOL CL-UNICODE::NAME)
;     :COMMA
;     CL-UNICODE::VALUE
;     :COMMA
;     (FORMAT NIL "The constant `~A' from chapter 3 of the Unicode book."
;             CL-UNICODE::NAME))
;
; caught ERROR:
;   (during macroexpansion of (DEFCONSTANT :COMMA ...))
;   error while parsing arguments to DEFMACRO DEFCONSTANT:
;     too many elements in
;       (:COMMA (CREATE-SYMBOL NAME) :COMMA VALUE :COMMA
;        (FORMAT NIL "The constant `~A' from chapter 3 of the Unicode book." NAME))
;     to satisfy lambda list
;       (SB-IMPL::NAME SB-IMPL::VALUE &OPTIONAL (SB-IMPL::DOC)):
;     between 2 and 3 expected, but got 6
.
debugger invoked on a UIOP/LISP-BUILD:COMPILE-FILE-ERROR in thread
#<THREAD "main thread" RUNNING {100299C713}>:
  COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "cl-unicode/base" "util">

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 "cl-unicode/base" "util">.
  1: [ACCEPT                       ] Continue, treating
                                     compiling #<CL-SOURCE-FILE "cl-unicode/base" "util">
                                     as having been successful.
  2:                                 Retry ASDF operation.
  3: [CLEAR-CONFIGURATION-AND-RETRY] Retry ASDF operation after resetting the configuration.
  4: [ABORT                        ] Give up on "cl-unicode"
  5:                                 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 "cl-unicode/base" "util">)))
0] 4
;
; compilation unit aborted
;   caught 2 fatal ERROR conditions
;   caught 7 ERROR conditions

("cl-unicode")
*

编辑:情节变浓。现在这也发生了:

* (ql:quickload "quicklisp-slime-helper")
To load "quicklisp-slime-helper":
  Install 3 Quicklisp releases:
    alexandria quicklisp-slime-helper slime
; Fetching #<URL "http://beta.quicklisp.org/archive/slime/2016-05-31/slime-v2.18.tgz">
; 1076.19KB
==================================================
1,102,017 bytes in 3.68 seconds (292.28KB/sec)
; Fetching #<URL "http://beta.quicklisp.org/archive/alexandria/2016-08-25/alexandria-20160825-git.tgz">
; 49.63KB
==================================================
50,819 bytes in 0.31 seconds (160.09KB/sec)
; Fetching #<URL "http://beta.quicklisp.org/archive/quicklisp-slime-helper/2015-07-09/quicklisp-slime-helper-20150709-git.tgz">
; 2.16KB
==================================================
2,211 bytes in 0.00 seconds (1079.59KB/sec)
; Loading "quicklisp-slime-helper"
[package swank-loader]..While evaluating the form starting at line 151, column 0
  of #P"C:/Users/K/quicklisp/dists/quicklisp/software/slime-v2.18/swank-loader.lisp":

debugger invoked on a SIMPLE-ERROR in thread
#<THREAD "main thread" RUNNING {100299C713}>:
  :COMMA is not allowed as a directory component.

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 EVAL of current toplevel form.
  1: [CONTINUE                     ] Ignore error and continue loading file "C:\\Users\\K\\quicklisp\\dists\\quicklisp\\software\\slime-v2.18\\swank-loader.lisp
".
  2: [ABORT                        ] Abort loading file "C:\\Users\\K\\quicklisp\\dists\\quicklisp\\software\\slime-v2.18\\swank-loader.lisp".
  3: [TRY-RECOMPILING              ] Recompile swank-loader and try loading it again
  4: [RETRY                        ] Retry
                                     loading FASL for #<SWANK-LOADER-FILE "swank" "swank-loader">.
  5: [ACCEPT                       ] Continue, treating
                                     loading FASL for #<SWANK-LOADER-FILE "swank" "swank-loader">
                                     as having been successful.
  6:                                 Retry ASDF operation.
  7: [CLEAR-CONFIGURATION-AND-RETRY] Retry ASDF operation after resetting the
                                     configuration.
  8:                                 Give up on "quicklisp-slime-helper"
  9:                                 Exit debugger, returning to top level.

(SB-IMPL::IMPORT-DIRECTORY #<unavailable argument> NIL)
0]

在两个错误消息中,符号:COMMA起作用。我刚刚意识到我在早期的一个实验中使用了这个符号来处理词性标注。这可能是个问题吗?

最后我试图安装babel,但也失败了:

* (ql:quickload :babel)
To load "babel":
  Load 1 ASDF system:
    alexandria
  Install 2 Quicklisp releases:
    babel trivial-features
; Fetching #<URL "http://beta.quicklisp.org/archive/trivial-features/2015-09-23/trivial-features-20150923-git.tgz">
; 10.26KB
==================================================
10,510 bytes in 0.09 seconds (119.35KB/sec)
; Fetching #<URL "http://beta.quicklisp.org/archive/babel/2015-06-08/babel-20150608-git.tgz">
; 248.03KB
==================================================
253,987 bytes in 1.06 seconds (234.22KB/sec)
; Loading "babel"
[package alexandria]
; file: C:/Users/K/quicklisp/dists/quicklisp/software/alexandria-20160825-git/package.lisp
; in: DEFPACKAGE :ALEXANDRIA
;     (DEFPACKAGE :ALEXANDRIA
;       ()
;       0
;       ()
;       DEV
;       (:NICKNAMES :ALEXANDRIA)
;       (:USE :CL)
;       (:LOCK T)
;       (:EXPORT #:IF-LET
;                #:WHEN-LET
;                #:WHEN-LET*
;                #:CSWITCH
;                #:ESWITCH
;                #:SWITCH
;                #:MULTIPLE-VALUE-PROG2
;                #:NTH-VALUE-OR
;                #:WHICHEVER
;                #:XOR
;                #:DEFINE-CONSTANT
;                ...))
;
; caught ERROR:
;   (during macroexpansion of (DEFPACKAGE :ALEXANDRIA
;     ...))
;   bogus DEFPACKAGE option: NIL

debugger invoked on a UIOP/LISP-BUILD:COMPILE-FILE-ERROR in thread
#<THREAD "main thread" RUNNING {100299C713}>:
  COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "alexandria" "package">

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 "alexandria" "package">.
  1: [ACCEPT                       ] Continue, treating
                                     compiling #<CL-SOURCE-FILE "alexandria" "package">
                                     as having been successful.
  2:                                 Retry ASDF operation.
  3: [CLEAR-CONFIGURATION-AND-RETRY] Retry ASDF operation after resetting the
                                     configuration.
  4: [ABORT                        ] Give up on "babel"
  5:                                 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 "alexa
ndria" "package">)))
0] 4
;
; compilation unit aborted
;   caught 2 fatal ERROR conditions
;   caught 1 ERROR condition

(:BABEL)

编辑2:在Linux(Mint 18 VBox)中做了同样的事情并收到了相同的版本:

* (ql:system-apropos "unicode")
#<SYSTEM cl-ppcre-unicode / cl-ppcre-2.0.11 / quicklisp 2016-08-25>
#<SYSTEM cl-ppcre-unicode-test / cl-ppcre-2.0.11 / quicklisp 2016-08-25>
#<SYSTEM cl-unicode / cl-unicode-0.1.5 / quicklisp 2016-08-25>
#<SYSTEM cl-unicode/base / cl-unicode-0.1.5 / quicklisp 2016-08-25>
#<SYSTEM cl-unicode/build / cl-unicode-0.1.5 / quicklisp 2016-08-25>
#<SYSTEM cl-unicode/test / cl-unicode-0.1.5 / quicklisp 2016-08-25>
#<SYSTEM hu.dwim.syntax-sugar/unicode / hu.dwim.syntax-sugar-20160318-darcs / quicklisp 2016-08-25>
* 

只有我需要知道的事情,我错过了一些我应该知道的东西,或者它是否被剔除了?我想使用它并学习Lisp,而不是修复安装问题。

编辑3:由于提示检查可读表的完整性,它现在有效:

* (setq *readtable* (copy-readtable nil))

#<READTABLE {100569BA23}>
* (ql:quickload :cl-unicode)
To load "cl-unicode":
  Install 1 Quicklisp release:
    cl-unicode
; Fetching #<URL "http://beta.quicklisp.org/archive/cl-unicode/2014-12-17/cl-unicode-0.1.5.tgz">
; 474.62KB
==================================================
486,011 bytes in 1.80 seconds (264.27KB/sec)
; Loading "cl-unicode"
[package cl-unicode]..............................
[package cl-unicode-names]....................
(:CL-UNICODE)
*

为什么旧版本的cl-unicode不断被拉动,为什么同样的问题发生在另一个没有修补历史的盒子上,这仍然是个谜。但我现在很满意。感谢所有花时间回应的人。

0 个答案:

没有答案