common-lisp - 在 ECL 上指定外部格式

Question

如何在 ECL 上指定外部格式(例如 (:crlf :|cp932|))？

我想用某种编码将字符串写入文件。所以我像这样输入我的 REPL:

(with-open-file (out "test.txt"
                 :direction :output
                 :external-format '(:crlf :|cp932|))
  (write-string "some string" out))

然后调用调试器并显示:

The function EXT:MAKE-ENCODING is undefined.
   [Condition of type UNDEFINED-FUNCTION]

这是一个错误的方法...？当external-format为:utf-8时，写入成功...

• ECL 版本 -- 15.3.7
• 操作系统——Ubuntu 14.04

Answer 1

基于§19.1.3. External formats在手册中，看起来适当的符号实际上被命名为“CP819”并且位于由“EXT”命名的包中，因此您应该使用 ext:cp819，而不是 :|cp819 |。您可以使用(:crlf ext:cp819)，例如:

(with-open-file (out "test.txt"
                 :direction :output
                 :external-format '(:crlf ext:cp932))
  (write-string "some string" out))