# HG changeset patch
# User Roland McGrath <roland@gnu.org>
# Date 807559322 0
# Node ID 287cc74602fa00caf7d013796970a2ba7fac97a3
# Parent  eed43624bc008b5bb20cabcab3eff1ddf98dfd1e
(compilation-error-regexp-alist): Add regexp for Sun ada.

diff -r eed43624bc00 -r 287cc74602fa lisp/progmodes/compile.el
--- a/lisp/progmodes/compile.el	Fri Aug 04 03:03:01 1995 +0000
+++ b/lisp/progmodes/compile.el	Fri Aug 04 18:02:02 1995 +0000
@@ -189,6 +189,10 @@
     ;;  foo.c(3:8) : warning EDC0833: Implicit return statement encountered.
     ;;  foo.c(5:5) : error EDC0350: Syntax error.
     ("\n\\([^( \n\t]+\\)(\\([0-9]+\\):\\([0-9]+\\)) : " 1 2 3)
+
+    ;; 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)
     )
   "Alist that specifies how to match errors in compiler output.
 Each elt has the form (REGEXP FILE-IDX LINE-IDX [COLUMN-IDX FILE-FORMAT...])