From: Roland McGrath <roland@gnu.org>
Date: Thu, 8 Jul 1993 23:31:58 +0000 (+0000)
Subject: (compilation-error-regexp-alist): Broaden ``Line N of "FILE": msg'' regexp
X-Git-Tag: emacs-19.34~11806
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ff7351344ae2ace8fd5e7fc41c610020bc3d112f;p=emacs.git

(compilation-error-regexp-alist): Broaden ``Line N of "FILE": msg'' regexp
to also match Ultrix f77: ``Error on line N of FILE: msg''.
---

diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index b20a8739de8..88daa725119 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -126,8 +126,12 @@ or when it is used with \\[next-error] or \\[compile-goto-error].")
     ;; which is regexp Impressionism - it matches almost anything!
     ("([ \t]*\\([^:( \t\n]+\\)[:(][ \t]*\\([0-9]+\\))" 1 2)
 
-    ;; Line 45 of "foo.c": bloofel undefined (who does this?)
-    ("\n[Ll]ine[ \t]+\\([0-9]+\\)[ \t]+of[ \t]+\"\\([^\"\n]+\\)\":" 2 1)
+    ;; Ultrix 3.0 f77:
+    ;;  Error on line 3 of t.f: Execution error unclassifiable statement    
+    ;; Unknown who does this:
+    ;;  Line 45 of "foo.c": bloofel undefined
+    ("\n\\(Error on \\)?[Ll]ine[ \t]+\\([0-9]+\\)[ \t]+\
+of[ \t]+\"?\\([^\"\n]+\\)\"?:" 3 2)
 
     ;; Apollo cc, 4.3BSD fc:
     ;;	"foo.f", line 3: Error: syntax error near end of statement