2001-08-16 David Billinghurst <David.Billinghurst@riotinto.com>

	* g77.f-torture/compile/pr3743.x: Do not return 1 for xfail.
	Fix thinko.
	* g77.f-torture/execute/f90-intrinsic-bit.x: Do not return 1
	for xfail.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@44945 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index a52b0e5..6ae2e15 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,4 +1,11 @@
-2001-08-14  David Billinghurst <David.Billinghurst@riotinto.com>
+2001-08-16  David Billinghurst  <David.Billinghurst@riotinto.com>
+
+       * g77.f-torture/compile/pr3743.x: Do not return 1 for xfail.
+       Fix thinko.
+       * g77.f-torture/execute/f90-intrinsic-bit.x: Do not return 1
+       for xfail.
+
+2001-08-14  David Billinghurst  <David.Billinghurst@riotinto.com>
 
        * lib/g77-dg.exp:  Use prune.exp for common procedures
        (g77-dg-prune): Replace prune_g77_output with prune_gcc_output 

diff --git a/gcc/testsuite/g77.f-torture/compile/pr3743.x b/gcc/testsuite/g77.f-torture/compile/pr3743.x
index d66caf6..e2a7eae 100644 (file)
--- a/gcc/testsuite/g77.f-torture/compile/pr3743.x
+++ b/gcc/testsuite/g77.f-torture/compile/pr3743.x
@@ -4,7 +4,6 @@
 global target_triplet
 if { [istarget "mips-sgi-irix6*"] || [istarget "sparc-sun-solaris2.*"] } {
        set torture_compile_xfail "$target_triplet"
-       return 1
 }
 
 return 0

diff --git a/gcc/testsuite/g77.f-torture/execute/f90-intrinsic-bit.x b/gcc/testsuite/g77.f-torture/execute/f90-intrinsic-bit.x
index 8665030..f7b9000 100644 (file)
--- a/gcc/testsuite/g77.f-torture/execute/f90-intrinsic-bit.x
+++ b/gcc/testsuite/g77.f-torture/execute/f90-intrinsic-bit.x
@@ -2,9 +2,8 @@
 # GNATS PR 3743
 
 global target_triplet
-if { [istarget "mips*-sgi-irix6*"] || [istarget "sparc-sun-solaris2.8"] } {
+if { [istarget "mips*-sgi-irix6*"] || [istarget "sparc-sun-solaris2.*"] } {
        set torture_compile_xfail "$target_triplet"
-       return 1
 }
 
 return 0