ecos.exp (conpr-1.C): XFAIL if compile emits message containing "init_priority".

2001-01-14  Jeffrey Oldham  <oldham@codesourcery.com>

	* g++.dg/special/ecos.exp (conpr-1.C): XFAIL if compile emits
	message containing "init_priority".
	(conpr-2.C): Likewise.
	(conpr-3.C): Likewise.
	* g++.old-deja/g++.ext/initp1.C: XFAIL for Irix.

From-SVN: r39024

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 95a0cfea050b54db87631a2f5c788a9c7ce42816..544e49d984220a15e8e2fc0a8734affe7f5bad71 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,11 @@
+2001-01-14  Jeffrey Oldham  <oldham@codesourcery.com>
+
+       * g++.dg/special/ecos.exp (conpr-1.C): XFAIL if compile emits
+       message containing "init_priority".
+       (conpr-2.C): Likewise.
+       (conpr-3.C): Likewise.
+       * g++.old-deja/g++.ext/initp1.C: XFAIL for Irix.
+
 2001-01-14  Franz Sirl  <Franz.Sirl-kernel@lauterbach.com>
 
        * gcc.c-torture/execute/20010114-2.c: New test.

diff --git a/gcc/testsuite/g++.dg/special/ecos.exp b/gcc/testsuite/g++.dg/special/ecos.exp
index 373cc860de91620d34b882cf7900a64ef7a87de5..af3d8c1b5608382a8f5ebdbb415513cb819de9cc 100644 (file)
--- a/gcc/testsuite/g++.dg/special/ecos.exp
+++ b/gcc/testsuite/g++.dg/special/ecos.exp
@@ -1,4 +1,4 @@
-# Copyright (C) 1999 Free Software Foundation, Inc.
+# Copyright (C) 1999, 2001 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
@@ -29,7 +29,16 @@ load_lib g++-dg.exp
 ###########
 
 dg-init
-dg-runtest "$srcdir/$subdir/conpr-1.C" "" ""
+set lines [g++_target_compile "$srcdir/$subdir/conpr-1.C" "$srcdir/$subdir/a.out" executable ""]
+if [string match "*init_priority*" $lines] then {
+    xfail "conpr-1.C"
+    file delete $srcdir/$subdir/a.out
+} elseif ![string match "" $lines] then {
+    fail "conpr-1.C"
+} else {
+    dg-runtest "$srcdir/$subdir/conpr-1.C" "" "" 
+    file delete $srcdir/$subdir/a.out
+}
 dg-finish
 
 
@@ -40,7 +49,9 @@ dg-finish
 dg-init
 
 set lines [g++_target_compile "$srcdir/$subdir/conpr-2a.C" "conpr-2a.o" object ""]
-if ![string match "" $lines] then {
+if [string match "*init_priority*" $lines] then {
+    xfail "conpr-2a.o"
+} elseif ![string match "" $lines] then {
     fail "conpr-2a.o"
 } else {
     dg-runtest "$srcdir/$subdir/conpr-2.C" "conpr-2a.o" "" 
@@ -56,7 +67,9 @@ dg-finish
 dg-init
 
 set lines [g++_target_compile "$srcdir/$subdir/conpr-3a.C" "conpr-3a.o" object ""]
-if ![string match "" $lines] then {
+if [string match "*init_priority*" $lines] then {
+    xfail "conpr-3a.o"
+} elseif ![string match "" $lines] then {
     fail "conpr-3a.o"
 } else {
     set lines [g++_target_compile "$srcdir/$subdir/conpr-3b.C" "conpr-3b.o" object ""]

diff --git a/gcc/testsuite/g++.old-deja/g++.ext/initp1.C b/gcc/testsuite/g++.old-deja/g++.ext/initp1.C
index f22290d31407e49c68f7fbb09adea5d872986e53..0e4c02c3c0d1511929f8ec16e3dc75ca2566911e 100644 (file)
--- a/gcc/testsuite/g++.old-deja/g++.ext/initp1.C
+++ b/gcc/testsuite/g++.old-deja/g++.ext/initp1.C
@@ -1,5 +1,6 @@
 // Test for proper handling of the init_priority attribute.
 // Contributed by Hugo Tyson <hmt@cygnus.co.uk>
+// excess errors test - XFAIL mips*-sgi-irix*
 
 class Two {
 private: