Common Lisp：使用 readtable-case 出错
Common Lisp: getting an error using readtable-case
当我在 REPL 提示符下输入时：
(setf (readtable-case *readtable*) :invert)
我收到此错误消息：
Error in SETF [or a callee]: Cannot expand the SETF form (READTABLE-CASE
*READTABLE*).
为什么会出现此错误？
(format nil "~A ~A" (lisp-implementation-type) (lisp-implementation-version)) says "Kyoto Common Lisp GCL 2.6.2". The result of (eq 'readtable-case 'cl:readtable-case) is T. What does this all mean please?
第二个表达式表示您使用了正确的符号。第一个表示您正在使用哪个 Lisp 实现：应该是 GNU Common Lisp 2.6.2
经过一番搜索，我发现这个 message on the gcl-devel list 说...
The problem appears to be this line:
(setf (readtable-case *readtable*) readcase)
in randomly-check-readability. I'd recommend this as the next
ansi issue to resolve, since it's blocking the tests.
... 主题为“2.7.0 中的 ansi-tests”。该消息来自 2004 年。
底线：我猜你需要更新的甚至* 不同的 Lisp 实现。
(* 正如 Rainer Joswig 所提到的，该问题也影响当前的 2.6.12 版本)
我想所有主要的 Lisp 实现都支持这个。 CLISP 2.49 does、SBCL 和 CCL 可能有，据我所知 ECL 也有。
当我在 REPL 提示符下输入时：
(setf (readtable-case *readtable*) :invert)
我收到此错误消息：
Error in SETF [or a callee]: Cannot expand the SETF form (READTABLE-CASE
*READTABLE*).
为什么会出现此错误？
(format nil "~A ~A" (lisp-implementation-type) (lisp-implementation-version))says "Kyoto Common Lisp GCL 2.6.2". The result of(eq 'readtable-case 'cl:readtable-case)is T. What does this all mean please?
第二个表达式表示您使用了正确的符号。第一个表示您正在使用哪个 Lisp 实现：应该是 GNU Common Lisp 2.6.2
经过一番搜索，我发现这个 message on the gcl-devel list 说...
The problem appears to be this line:
(setf (readtable-case *readtable*) readcase)in randomly-check-readability. I'd recommend this as the next ansi issue to resolve, since it's blocking the tests.
... 主题为“2.7.0 中的 ansi-tests”。该消息来自 2004 年。
底线：我猜你需要更新的甚至* 不同的 Lisp 实现。
(* 正如 Rainer Joswig 所提到的，该问题也影响当前的 2.6.12 版本)
我想所有主要的 Lisp 实现都支持这个。 CLISP 2.49 does、SBCL 和 CCL 可能有，据我所知 ECL 也有。