後藤大地さんが、ZDnet で 以前に紹介していた 、Emacs 22.1 の正規表現置換を試す時が来た。 次のような行があって、この最後の 0 をそれぞれ +1 したい。

#if DEBUG_PHDR & 1 << 0

そこで M-C-% した後に

#if DEBUG_PHDR & 1 << \([0-9]+\)

を

#if DEBUG_PHDR & 1 << \,(+ 1 \1)

と入力したが、次のようになってしまう。

Debugger entered--Lisp error: (wrong-type-argument number-or-marker-p
#("0" 0 1 (c-in-sws t fontified t)))
+(1 #("0" 0 1 (c-in-sws t fontified t)))
(replace-quote (+ 1 (match-string 1)))
(concat "#if DEBUG_PHDR & 1 << " (replace-quote (+ 1 ...)))
eval((concat "#if DEBUG_PHDR & 1 << " (replace-quote (+ 1 ...))))

例えば最後の \1 を 3 等と書いておけば、当然置換しようとするので \1 の部分の問題 だということは明らかなのだけれど。

(c-in-sws t fontified t) 

というのが何かのおまじないらしいが、M-x describe-function しても出て来ないので、 僕の 22.1.50.2 が良くないのかな
emacs-22.1 (pkgsrc 版) で試したら

+(1 #("0" 0 1 (fontified nil)))

と言われて、少し文字は変ったが、出来ないことに変りがない。 M-x foundamental-mode と入力した後だと、元と同じ

(c-in-sws t fontified t) 

が出て来る。(emacs -q でも同じ)