# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 853920145 0
# Node ID ea7763094f76a83b2ec266f07f966c539a309be2
# Parent  16c0c57e8ab249f0e3bfda6f755575d0adee0cbc
(compilation-error-regexp-alist):
In MIPS lint and Sun Ada regexps, reject newline in some
[^...] constructs.  Require newline at start in MIPS lint.

diff -r 16c0c57e8ab2 -r ea7763094f76 lisp/progmodes/compile.el
--- a/lisp/progmodes/compile.el	Wed Jan 22 05:25:31 1997 +0000
+++ b/lisp/progmodes/compile.el	Wed Jan 22 08:02:25 1997 +0000
@@ -162,9 +162,9 @@
 
     ;; MIPS lint pass<n>; looks good for SunPro lint also
     ;;  TrimMask (255) in solomon.c may be indistinguishable from TrimMasks (93) in solomon.c due to truncation
-    ("[^ ]+ (\\([0-9]+\\)) in \\([^ ]+\\)" 2 1)
+    ("\n[^\n ]+ (\\([0-9]+\\)) in \\([^ \n]+\\)" 2 1)
     ;;  name defined but never used: LinInt in cmap_calc.c(199)
-    ("in \\([^(]+\\)(\\([0-9]+\\))$" 1 2)
+    ("in \\([^(\n]+\\)(\\([0-9]+\\))$" 1 2)
 
     ;; Ultrix 3.0 f77:
     ;;  fort: Severe: addstf.f, line 82: Missing operator or delimiter symbol
@@ -215,6 +215,11 @@
     ("\n[a-zA-Z]?:?[^0-9 \n\t:]+:[ \t]*\\([^ \n\t:]+\\):\
 \\([0-9]+\\):\\(\\([0-9]+\\)[: \t]\\)?" 1 2 4)
 
+    ;; GNU messages with program name and optional column number
+    ;; and a severity letter after that.  nsgmls makes them.
+    ("\n[^0-9 \n\t:]+:[ \t]*\\([^ \n\t:]+\\):\
+\\([0-9]+\\):\\(\\([0-9]+\\):\\)?[A-Za-z]:" 1 2 4)
+
     ;; Cray C compiler error messages
     ("\n\\(cc\\| cft\\)-[0-9]+ c\\(c\\|f77\\): ERROR \\([^,\n]+, \\)* File = \\([^,\n]+\\), Line = \\([0-9]+\\)" 4 5)
 
@@ -226,7 +231,7 @@
 
     ;; Sun ada (VADS, Solaris):
     ;;  /home3/xdhar/rcds_rc/main.a, line 361, char 6:syntax error: "," inserted
-    ("\n\\([^, ]+\\), line \\([0-9]+\\), char \\([0-9]+\\)[:., \(-]" 1 2 3)
+    ("\n\\([^, \n\t]+\\), line \\([0-9]+\\), char \\([0-9]+\\)[:., \(-]" 1 2 3)
     )
   "Alist that specifies how to match errors in compiler output.
 Each elt has the form (REGEXP FILE-IDX LINE-IDX [COLUMN-IDX FILE-FORMAT...])