如何获取大调模式下语法对应的字符

Question

如何获取与major-mode中的给定语法字符对应的字符(或字符集

例如，我希望能够获得转义字符，例如在大多数模式下，如elisp或C。我找不到一个函数可以返回对应于语法类的字符--在本例中是转义语法类，即。Lisp/C模式下的(string-to-syntax "\\") ;; => (9)。

那么，我怎么才能走另一条路呢？(some-function '(9) major-mode) ;; => "\\"

Answer 1

语法表是字符表，您可以使用map-char-table检查语法表中的每个规则，例如，

(defun foo (syntax-code syntax-table)
  "Return chars (or char range) with SYNTAX-CODE in SYNTAX-TABLE."
  (let (result)
    (map-char-table
     (lambda (k v)
       ;; k is either a char or (FROM . TO)
       ;; v is (SYNTAX-CODE . MATCHING-CHAR)
       (when (= (car v) syntax-code)
         (push (pcase k
                 (`(,from . ,to) (list (string from) (string to)))
                 (_ (string k)))
               result)))
     syntax-table)
    (nreverse result)))

(foo 9 emacs-lisp-mode-syntax-table)
;; => ("\\")