2002-09-15 Krister Walfridsson <cato@df.lth.se>

	* lib/old-dejagnu.exp (old-dejagnu) Improve test for ICE.

From-SVN: r57169

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index d0ca25757d0d4526202ac6ac73f75c08a330bb91..6fd143ddd4156a62d517a75bbd6755ee254a5af8 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2002-09-15  Krister Walfridsson  <cato@df.lth.se>
+
+       * lib/old-dejagnu.exp (old-dejagnu) Improve test for ICE.
+
 2002-09-15  Nathan Sidwell  <nathan@codesourcery.com>
 
        * g++.dg/inherit/using2.C: New test.

diff --git a/gcc/testsuite/lib/old-dejagnu.exp b/gcc/testsuite/lib/old-dejagnu.exp
index 2e2acff2bd4b9260b955fa4526b53ddb74bb10a0..39c5515b63faef1cba8077f07c1283472600af38 100644 (file)
--- a/gcc/testsuite/lib/old-dejagnu.exp
+++ b/gcc/testsuite/lib/old-dejagnu.exp
@@ -445,7 +445,7 @@ proc old-dejagnu { compiler prog name cflagsx default_cflags libs } {
     # Delete things like "ld.so: warning" messages.
     set comp_output [prune_gcc_output [prune_warnings $comp_output]]
 
-    if [regexp "Internal (compiler )?error" $comp_output] then {
+    if [regexp "\[Ii\]nternal (compiler )?error" $comp_output] then {
         if $expect_crash then {
            setup_xfail "*-*-*"
        }