[Bug-dejagnu] Ignore some warnings on IRIX 6 O32

[Rainer Orth]

While testing my patch to support the O32 ABI on IRIX 6

        http://gcc.gnu.org/ml/gcc-patches/2002-06/msg01051.html

I had to ignore a couple of (expected) warnings to get useful test
results.

The first set of changes is trivial (i.e. ignore warnings from all
frontends, not only cc1 and cc1plus).  The other ones are more interesting
and might point to problems in GCC O32 code generation:

* I get this one in many places (only with -mips1, it seems), e.g. in
  g77.f-torture/compile/19990826-3.f,  -O1:

as1: Warning: /var/tmp//cc5ooMCa.s, line 1: shouldn't put mult/div in branch 
delay slot (R10K bug)

  The line number is wrong since as mishandles 

        .file   1 "/vol/gnu/src/gcc/gcc/gcc/testsuite/g77.f-torture/compile/1999
0826-3.f"

* This one happens e.g. in gcc.c-torture/compile/920501-4.c,  -O1:

as1: Warning: /var/tmp//ccPJlzBd.s, line 1: DIV in branch delay slot may not 
work on a R4000 chip

* gas 2.11.2 warns

/var/tmp//cctWmzAa.s: Assembler messages:
/var/tmp//cctWmzAa.s:160: Warning: Branch bltu is always false (nop)

  e.g. in g++.other/reload1.C (test for excess errors).  I need to ignore
  both the intro line and the specific warning.  In gas 2.12, this warning
  is off by default, but could be enabled with -n.

* The last part ignores a continuation line of an ld warning.  The first
  part of that warning is already ignored.

ld: WARNING 47 : This module (/var/tmp//ccdMu5Yb.o .text) contains branch 
instruction(s) 
        that might degrade performance on an older version (rev. 2.2) R4000 
processor.

        Rainer


Wed Jun 12 21:44:03 2002  Rainer Orth  <address@hidden>

        * lib/target.exp: Ignore -g and -mabi=32 warnings from IRIX 6 O32 
        compilers.
        Ignore IRIX 6 O32 as and gas warnings.
        Ignore continuation line of IRIX 6 O32 ld warning.
        
Index: lib/target.exp
===================================================================
RCS file: /cvsroot/dejagnu/dejagnu/lib/target.exp,v
retrieving revision 1.6
diff -u -p -r1.6 target.exp
--- lib/target.exp      11 Sep 2001 17:13:47 -0000      1.6
+++ lib/target.exp      12 Jun 2002 19:38:35 -0000
@@ -1,4 +1,4 @@
-# Copyright (C) 1992 - 2001 Free Software Foundation, Inc.
+# Copyright (C) 1992 - 2002 Free Software Foundation, Inc.
 
 # This program is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -233,14 +233,20 @@ proc prune_warnings { text } {
     regsub -all "(^|\n)(NFS3 server \[^\n\]* ok\[^\n\]*\n?)+" $text "\\1" text
 
     # When using the IRIX 6 o32 assembler, -g isn't supported
-    regsub -all "(^|\n)(cc1: warning: `-g' not supported by this configuration 
of GCC\[^\n\]*\n?)+" $text "\\1" text
-    regsub -all "(^|\n)(cc1plus: warning: `-g' not supported by this 
configuration of GCC\[^\n\]*\n?)+" $text "\\1" text
+    regsub -all "(^|\n)((cc1.*|f771|jc1): warning: `-g' not supported by this 
configuration of GCC\[^\n\]*\n?)+" $text "\\1" text
+    regsub -all "(^|\n)((cc1.*|f771|jc1): warning: `-g.*': unknown or 
unsupported -g option\[^\n\]*\n?)+" $text "\\1" text
 
-    regsub -all "(^|\n)(cc1: warning: -mabi=32 does not support 
-g\[^\n\]*\n?)+" $text "\\1" text
-    regsub -all "(^|\n)(cc1plus: warning: -mabi=32 does not support 
-g\[^\n\]*\n?)+" $text "\\1" text
+    regsub -all "(^|\n)((cc1.*|f771|jc1): warning: -mabi=32 does not support 
-g\[^\n\]*\n?)+" $text "\\1" text
 
     # This happens with the o32 assembler on IRIX 6.
     regsub -all "(^|\n)(as: Warning: -O3 is not supported for assembly 
compiles for ucode compilers; changing to -O2.\n?)+" $text "\\1" text
+    regsub -all "(^|\n)(as1: Warning: \[^\n\]*: shouldn't put mult/div in 
branch delay slot \\(R10K bug\\)\n?)+" $text "\\1" text
+    regsub -all "(^|\n)(as1: Warning: \[^\n\]*: DIV in branch delay slot may 
not work on a R4000 chip\n?)+" $text "\\1" text
+
+    # This happens with gas up to 2.11.2 on IRIX 5.  In 2.12, it's disabled
+    # by default, but can be activated by -n.
+    regsub -all "(^|\n)(\[^\n\]*: Assembler messages:\n?)+" $text "\\1" text
+    regsub -all "(^|\n)(\[^\n\]*: Warning: Branch bltu is always false 
\\(nop\\)\n?)+" $text "\\1" text
 
     # This happens when using g++ on a DWARF system.
     regsub -all "(^|\n)(cc1plus: warning: -g option not supported for C\\+\\+ 
on systems using the DWARF debugging format\n?)+" $text "\\1" text
@@ -260,6 +266,8 @@ proc prune_warnings { text } {
     # Or the IRIX 6 ones.
     regsub -all "(^|\n)(ld(|32|64): WARNING \[^\n\]*\n?)+" $text "\\1" text
     regsub -all "(^|\n)(ld(|32|64): Giving up.*Use -wall\[^\n\]*\n?)+" $text 
"\\1" text
+    # Ignore second line of multiline warning, too
+    regsub -all "(^|\n)(\[\t \]*that might degrade performance on an older 
version\[^\n\]*R4000 processor.\n?)+" $text "\\1" text
 
     # Or the NetBSD ones.
     regsub -all "(^|\n)(\[^\n\]*:\[0-9\]+: warning: \[^\n\]* possibly used 
unsafely, use \[^\n\]*\n?)" $text "\\1" text