RE: [RFC] Change OK: to ARI: for ARI rule ignore

["Pierre Muller" <muller@ics.u-strasbg.fr>]

Sorry about this, Daniel.

  It is just that I do have the bad habit of
thinking of '-p' and '-u' options together, and
'-p' isn't very useful when it's not C code...

Here is that unified diff.

Is this OK for everyone?


Pierre Muller
Pascal language support maintainer for GDB






$ cvs diff -u gdb_ari.sh
Index: gdb_ari.sh
===================================================================
RCS file: /cvs/gdbadmin/ss/gdb_ari.sh,v
retrieving revision 1.89
diff -u -r1.89 gdb_ari.sh
--- gdb_ari.sh  20 Apr 2009 15:55:23 -0000      1.89
+++ gdb_ari.sh  1 May 2009 08:13:59 -0000
@@ -147,6 +147,9 @@
        exit
     }

+    if (ARI_OK == bug) {
+       return
+    }
     # Trim the filename down to just DIRECTORY/FILE so that it can be
     # robustly used by the FIX code.

@@ -205,8 +208,21 @@
 # Skip OBSOLETE lines
 /(^|[^_[:alnum:]])OBSOLETE([^_[:alnum:]]|$)/ { next; }

-# Skip OK lines
-/\/\* OK \*\// || /\/\* OK: / || /\/\* ARI: / { next; }
+# Skip ARI lines
+
+BEGIN {
+    ARI_OK = ""
+}
+
+/\/\* ARI:[[:space:]]*(.*)[[:space:]]*\*\// {
+    ARI_OK = gensub(/^.*\/\*
ARI:[[:space:]]*(.*[^[:space:]])[[:space:]]*\*\/.*$/, "\\1", 1, $0)
+    # print "ARI line found \"" $0 "\""
+    # print "ARI_OK \"" ARI_OK "\""
+}
+! /\/\* ARI:[[:space:]]*(.*)[[:space:]]*\*\// {
+    ARI_OK = ""
+}
+

 # Things in comments