Emacs lisp - 如何尝试/捕获处理错误？

Question

在以下 defun ...

(defun re-backward-match-group (rexp &optional n)
  "Grab the previous matches of regexp and return the contents of
  the n match group (first group match if no n arg is specified)"
  (save-excursion
  (unless n
    (setq n 1))
  (when (numberp n)
    (when (re-search-backward-lax-whitespace rexp)
      (when  (= (+ 2 (* n 2)) (length (match-data)))
        (match-string-no-properties n))))))

如果没有找到匹配项， re-search-backward-lax-whitespace 会抛出一个错误。

我将如何捕获该错误并返回 nil 或 "" ?

Answer 1

re-search-backward-lax-whitespace有一个可选的 noerror争论。

(re-search-backward-lax-whitespace rexp nil t)

不会发出错误信号。

对于更一般的错误处理，您可以使用 ignore-errors或 condition-case .有关后者的信息，请参阅

Error Handling in Emacs Lisp