diff --git a/gcc/testsuite/g77.f-torture/compile/alpha1.x b/gcc/testsuite/g77.f-torture/compile/alpha1.x
index f411819ccf9..46bc66e8e46 100644
--- a/gcc/testsuite/g77.f-torture/compile/alpha1.x
+++ b/gcc/testsuite/g77.f-torture/compile/alpha1.x
@@ -1,7 +1,7 @@
 # This test fails compilation in cross-endian environments, for example as
 # below, with a "sorry" message.
 
-if { [istarget "i\[34567\]86-*-*"] } {
+if { [ishost "i\[34567\]86-*-*"] } {
     if { [istarget "mmix-knuth-mmixware"] } {
 	set torture_compile_xfail [istarget]
     }
diff --git a/gcc/testsuite/g77.f-torture/execute/980628-4.x b/gcc/testsuite/g77.f-torture/execute/980628-4.x
index f411819ccf9..46bc66e8e46 100644
--- a/gcc/testsuite/g77.f-torture/execute/980628-4.x
+++ b/gcc/testsuite/g77.f-torture/execute/980628-4.x
@@ -1,7 +1,7 @@
 # This test fails compilation in cross-endian environments, for example as
 # below, with a "sorry" message.
 
-if { [istarget "i\[34567\]86-*-*"] } {
+if { [ishost "i\[34567\]86-*-*"] } {
     if { [istarget "mmix-knuth-mmixware"] } {
 	set torture_compile_xfail [istarget]
     }
diff --git a/gcc/testsuite/g77.f-torture/execute/980628-5.x b/gcc/testsuite/g77.f-torture/execute/980628-5.x
index f411819ccf9..46bc66e8e46 100644
--- a/gcc/testsuite/g77.f-torture/execute/980628-5.x
+++ b/gcc/testsuite/g77.f-torture/execute/980628-5.x
@@ -1,7 +1,7 @@
 # This test fails compilation in cross-endian environments, for example as
 # below, with a "sorry" message.
 
-if { [istarget "i\[34567\]86-*-*"] } {
+if { [ishost "i\[34567\]86-*-*"] } {
     if { [istarget "mmix-knuth-mmixware"] } {
 	set torture_compile_xfail [istarget]
     }
diff --git a/gcc/testsuite/g77.f-torture/execute/980628-6.x b/gcc/testsuite/g77.f-torture/execute/980628-6.x
index f411819ccf9..46bc66e8e46 100644
--- a/gcc/testsuite/g77.f-torture/execute/980628-6.x
+++ b/gcc/testsuite/g77.f-torture/execute/980628-6.x
@@ -1,7 +1,7 @@
 # This test fails compilation in cross-endian environments, for example as
 # below, with a "sorry" message.
 
-if { [istarget "i\[34567\]86-*-*"] } {
+if { [ishost "i\[34567\]86-*-*"] } {
     if { [istarget "mmix-knuth-mmixware"] } {
 	set torture_compile_xfail [istarget]
     }
diff --git a/gcc/testsuite/g77.f-torture/execute/alpha2.x b/gcc/testsuite/g77.f-torture/execute/alpha2.x
index f411819ccf9..46bc66e8e46 100644
--- a/gcc/testsuite/g77.f-torture/execute/alpha2.x
+++ b/gcc/testsuite/g77.f-torture/execute/alpha2.x
@@ -1,7 +1,7 @@
 # This test fails compilation in cross-endian environments, for example as
 # below, with a "sorry" message.
 
-if { [istarget "i\[34567\]86-*-*"] } {
+if { [ishost "i\[34567\]86-*-*"] } {
     if { [istarget "mmix-knuth-mmixware"] } {
 	set torture_compile_xfail [istarget]
     }
diff --git a/gcc/testsuite/g77.f-torture/execute/auto0.x b/gcc/testsuite/g77.f-torture/execute/auto0.x
index f411819ccf9..46bc66e8e46 100644
--- a/gcc/testsuite/g77.f-torture/execute/auto0.x
+++ b/gcc/testsuite/g77.f-torture/execute/auto0.x
@@ -1,7 +1,7 @@
 # This test fails compilation in cross-endian environments, for example as
 # below, with a "sorry" message.
 
-if { [istarget "i\[34567\]86-*-*"] } {
+if { [ishost "i\[34567\]86-*-*"] } {
     if { [istarget "mmix-knuth-mmixware"] } {
 	set torture_compile_xfail [istarget]
     }
diff --git a/gcc/testsuite/g77.f-torture/execute/auto1.x b/gcc/testsuite/g77.f-torture/execute/auto1.x
index f411819ccf9..46bc66e8e46 100644
--- a/gcc/testsuite/g77.f-torture/execute/auto1.x
+++ b/gcc/testsuite/g77.f-torture/execute/auto1.x
@@ -1,7 +1,7 @@
 # This test fails compilation in cross-endian environments, for example as
 # below, with a "sorry" message.
 
-if { [istarget "i\[34567\]86-*-*"] } {
+if { [ishost "i\[34567\]86-*-*"] } {
     if { [istarget "mmix-knuth-mmixware"] } {
 	set torture_compile_xfail [istarget]
     }