diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index a52b0e50520066894813fafdf030c05d2992cc9f..6ae2e1599a81855494a9be2d8beb64a35e78a7d7 100644
--- 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 d66caf68fc40a66822b6aea87cb4d04c9ba4f18b..e2a7eae5ed652b973e60017455609eadeea5f4ef 100644
--- 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 8665030ae0e1fe06eed90de3aa099e946eb5cccf..f7b9000035ba5e6502c766d40863027e2eb9e5c1 100644
--- 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