33.3.3 正規表現の関数

以下の関数は正規表現を扱います。

Function: regexp-quote string

この関数はstringだけに正確にマッチするような正規表現をリターンする。looking-at内でこの正規表現を使用すると、そのバッファー内の次の文字がstringのときだけ成功するだろう。検索関数でのこの正規表現の使用は、検索されるテキストがstringを含むなら成功するだろう。Regexp Searchを参照のこと。

これにより、その正規表現を求める関数呼び出し時に正確な文字列マッチや検索を要求できる。

(regexp-quote "^The cat$")
     ⇒ "\\^The cat\\$"

正規表現として記述されたコンテキストにおいて、正確な文字列マッチを結合することがregexp-quoteの1つの使い方である。たとえば以下は空白文で囲まれたstringの値であるような文字列を検索する:

(re-search-forward
 (concat "\\s-" (regexp-quote string) "\\s-"))

Function: regexp-opt strings &optional paren

この関数はリストstringsの文字列だけにマッチする効果的な正規表現をリターンする。これはマッチングや検索を可能な限り高速にする必要があるとき、たとえばFont Lockモードで有用である¹⁷。

オプション引数parenには以下のいずれかを指定できる:

文字列なら結果regexpはparenと後の‘\)’により生成される。つまり番号付きグループを明示的に生成するためには‘"\\(?1:"’を使用する。

wordsなら結果regexpは‘\<\(’と‘\)\>’で囲まれる。

symbolsならなら結果regexpは‘\_<\(’と‘\)\_>’で囲まれる(これはプログラミング言語のキーワードやその類のマッチング時に適切なことが多い)。

非nilならなら結果regexpは‘\(’と‘\)’で囲まれる。

nilなら、追加される後置演算子が式全体に確実に適用させるために必要な場合には、結果regexpは‘\(?:’と‘\)’で囲まれる。

regexp-optの結果regexpはその単純化されたバージョンと等価だが、通常はより効果的である。

(defun simplified-regexp-opt (strings &optional paren)
 (let ((parens (cond ((stringp paren)       (cons paren "\\)"))
                     ((eq paren 'words)    '("\\<\\(" . "\\)\\>"))
                     ((eq paren 'symbols) '("\\_<\\(" . "\\)\\_>"))
                     ((null paren)          '("\\(?:" . "\\)"))
                     (t                       '("\\(" . "\\)")))))
   (concat (car paren)
           (mapconcat 'regexp-quote strings "\\|")
           (cdr paren))))

Function: regexp-opt-depth regexp

この関数はregexp内のグループ化された構成要素(カッコで囲まれた正規表現)の総数をリターンする。これには内気なグループは含まれない(Regexp Backslashを参照)。

Function: regexp-opt-charset chars

この関数は文字リストchars内の文字にマッチする正規表現をリターンする。

(regexp-opt-charset '(?a ?b ?c ?d ?e))
     ⇒ "[a-e]"