>>202
追加する出力パターンが例えば Hi! "dir" と Good-by! "dir" だとすると
こんな感じかなぁ…

(setcar compilation-directory-matcher
(concat
"\\(?:Entering\\|Leavin\\(?1:g\\)\\) directory [`']\\(?2:.+\\)'$"
"\\|"
"\\(?:Hi\\|Good-by\\)\\(?1:!\\) \"\\(?2:.+\\)\"$"))

後の処理を考慮すると matching group number(?1: や ?2:) を付けないとならないので
元のパターン(Entering/Leaving)も書き替えざるを得ない…