如何在major-mode中獲取語法對應的字符

Question

如何在major-mode獲取與給定語法字符相對應的字符（或字符集）？

例如，我希望能夠獲得轉義字符，例如在大多數模式（如 elisp 或 C）中的 '\\'。我找不到可以返回對應於語法類的字符的函數——在此案例轉義語法類，即。 (string-to-syntax "\\\\") ;; => (9) (string-to-syntax "\\\\") ;; => (9)在 Lisp/C 模式下。

那么，我怎么能走另一條路，例如。 (some-function '(9) major-mode) ;; => "\\\\"

Answer 1

語法表是char-tables，你可以使用map-char-table來檢查語法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)
;; => ("\\")