🚀 go-pugleaf

;; 新村さん、私信で詳しく説明して下さってありがとうございました。

>>>>> In <9ld8fs$t6i$1@news512.nifty.com>
>>>>>	Atushi Shinmura <atushi.shinmura@nifty.ne.jp> wrote:

山岡> すみませんが、具体的な絵の URL とどの部分なのかを教えていただけ
山岡> ませんか?

新村さん> 申し訳ありません。Cモードでの変数を複数行で着色したもののURL
新村さん> がわからなくなりました。C++については、xemacs.orgから辿る、
新村さん> http://my.gnus.org/mig.php?pageType=folder&currDir=./XEmacs
新村さん> にあります。ここにも、Cモードのスクリーンショットがあります
新村さん> が、別物です。但し、C,C++モードともに、コメントの着色、クラ
新村さん> ス宣言部分の色分けなどができています。C++モードは、スクリー
新村さん> ンショットの通りにできれば十分なのですが、Cモードの方は、件
新村さん> の複数行にわたる変数の記述を何とかしたいのです。（ここに、コ
新村さん> メントを書きますので・・・　全く同じパターンのスクリーンショッ
新村さん> トがあったのに・・・）

http://my.gnus.org/mig.php?currDir=./XEmacs&pageType=image&image=c%2B%2B.gif

これは font-lock のデフォルトとは違うみたいですね。新村さんが以
前に使っていらっしゃった設定もかなり凝ったものだったのではないで
しょうか。と言うのは、font-lock.el を読み直してみると、やはり

int foo,
    bar;

のような場合、二行目は fontify の対象にならないようなのです。
これは XEmacs に限らず Emacs 20 や 21 も同じでした。でもお気持ち
はよくわかるので、何とかならないか考えてみました。

(defadvice font-lock-match-c++-style-declaration-item-and-skip-to-next
  (before work-with-the-next-line activate)
  "Advised to work with the next line."
  (if (and (= (point) (ad-get-arg 0)) (eolp))
      (progn
	(end-of-line 2)
	(ad-set-arg 0 (point))
	(beginning-of-line))))

これを例えば .emacs に書いておくと、目的の半分は達成できます。
半分と言う意味は、find-file した直後には効くのですが、on the fly
でコードを書いている最中には効果が無いことです。その場合でも
M-x font-lock-mode を 2 回実行して fontify し直せば着色されるの
ですが。

これの元の関数は、"int foo," を着色した後で、さらに残りの対象を
探すためのものです。でも残りを探す範囲が行末までなので、それを次
の行末まで拡張してみたわけですが、その逸脱がうまくいかない原因な
のかもしれません。とりあえず今日のところはここまでです。

;; fj.editor.emacs に引き続いて、再び塚本さんがズバリと切り込ん
;; でくれると嬉しいなあ。:-p
-- 
Katsumi Yamaoka <yamaoka@jpl.org>