如何在emacs lisp中打印特殊字符

Question

例如,我的函数中的一行代码

 (message "char %c:%d" character count)

将打印每个角色的计数.对于不可打印的字符,例如换行符和制表符,我希望输出看起来像:

 \n:4
 \t:6

而不是字面上打印换行符和制表符.我怎样才能做到这一点？

Answer 1

您可以通过在打印之前绑定某些变量来实现其中一些功能.

`print-escape-newlines' is a variable defined in `C source code'.
Its value is nil

Documentation:
Non-nil means print newlines in strings as `\n'.
Also print formfeeds as `\f'.

还有:

print-escape-nonascii
   Non-nil means print unibyte non-ASCII chars in strings as \OOO.

print-escape-multibyte
   Non-nil means print multibyte characters in strings as \xXXXX.

这些都prin1可以使用,因此您可以使用%S格式的代码.例如:

(let ((print-escape-newlines t))
  (format "%S" "new\nline"))

Answer 2

emacs 中可能有一些代码可以为您执行此操作，但一种方法是编写一个将特殊字符转换为字符串的函数：

(defun print-char(c)
  (case c 
    (?\n "\\n")
    (?\t "\\t")
    (t (string c))))

请注意，您需要使用字符串格式而不是字符，因为您实际上是为每个特殊字符编写多个字符。