summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Pfeiffer <occitan@esperanto.org>2004-10-27 09:10:27 +0000
committerDaniel Pfeiffer <occitan@esperanto.org>2004-10-27 09:10:27 +0000
commit9fcabe795288bab38daf1fd77740509f07f1df86 (patch)
tree25d436375f963cac7635b6d88e6b46243be261ee
parent0b55311a873e79cbc2aecfa2e5bc94cac4235790 (diff)
downloademacs-9fcabe795288bab38daf1fd77740509f07f1df86.tar.gz
emacs-9fcabe795288bab38daf1fd77740509f07f1df86.tar.bz2
emacs-9fcabe795288bab38daf1fd77740509f07f1df86.zip
(compilation-error-regexp-alist-alist) extend irix for NAG Fortran and add ftnchek-*
-rw-r--r--lisp/progmodes/compile.el14
1 files changed, 12 insertions, 2 deletions
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 0dc73e96664..223455e9872 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -181,6 +181,16 @@ of[ \t]+\"?\\([a-zA-Z]?:?[^\":\n]+\\)\"?:" 3 2 nil (1))
(epc
"^Error [0-9]+ at (\\([0-9]+\\):\\([^)\n]+\\))" 2 1)
+ (ftnchek-file
+ "^File \\(.+\\.f\\):$"
+ 1 nil nil 0)
+ (ftnchek-line-file
+ "\\(^Warning .* \\)?line \\([0-9]+\\)\\(?: col \\([0-9]+\\)\\)? file \\(.+\\.f\\)"
+ 4 2 3 (1) nil (1 'default nil t))
+ (ftnchek-line
+ "\\(?:^\\(Warning\\) .* \\)?line \\([0-9]+\\)\\(?: col \\([0-9]+\\)\\)?"
+ nil 2 3 (1) nil (1 (compilation-face '(1)) nil t))
+
(iar
"^\"\\(.*\\)\",\\([0-9]+\\)\\s-+\\(?:Error\\|Warnin\\(g\\)\\)\\[[0-9]+\\]:"
1 2 nil (3))
@@ -191,8 +201,8 @@ of[ \t]+\"?\\([a-zA-Z]?:?[^\":\n]+\\)\"?:" 3 2 nil (1))
;; fixme: should be `mips'
(irix
- "^[-[:alnum:]_/]+: \\(?:[sS]evere\\|[eE]rror\\|[wW]arnin\\(g\\)\\|[iI]nf\\(o\\)\\)[0-9 ]*:\
- \\([^,\" \n\t]+\\)\\(?:, line\\|:\\) \\([0-9]+\\):" 3 4 nil (1 . 2))
+ "^[-[:alnum:]_/ ]+: \\(?:\\(?:[sS]evere\\|[eE]rror\\|[wW]arnin\\(g\\)\\|[iI]nf\\(o\\)\\)[0-9 ]*: \\)?\
+\\([^,\" \n\t]+\\)\\(?:, line\\|:\\) \\([0-9]+\\):" 3 4 nil (1 . 2))
(java
"^\\(?:[ \t]+at \\|==[0-9]+== +\\(?:at\\|b\\(y\\)\\)\\).+(\\([^()\n]+\\):\\([0-9]+\\))$" 2 3 nil (1))