bprob.exp: Disable test on arm-elf configs.

* g77.dg/bprob/bprob.exp: Disable test on arm-elf configs.
* gcc.misc-tests/bprob.exp: Likewise.
* g77.dg/execute/20001201.x, 6367.x, io0.x, io1.x, u77-test.x: XFAIL
the execution test on arm-elf configs.
* g77.dg/execute/10197.x: New file.  XFAIL the execution test on
configs that don't support scratch files.
* g77.dg/execute/u77-test.x: XFAIL compilation on arm-elf configs.

From-SVN: r73133

9 files changed, 44 insertions, 0 deletions

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 1b901ae..b65e829 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,13 @@
+2003-10-31  Richard Earnshaw  <rearnsha@arm.com>
+
+	* g77.dg/bprob/bprob.exp: Disable test on arm-elf configs.
+	* gcc.misc-tests/bprob.exp: Likewise.
+	* g77.dg/execute/20001201.x, 6367.x, io0.x, io1.x, u77-test.x: XFAIL
+	the execution test on arm-elf configs.
+	* g77.dg/execute/10197.x: New file.  XFAIL the execution test on 
+	configs that don't support scratch files.
+	* g77.dg/execute/u77-test.x: XFAIL compilation on arm-elf configs.
+
 2003-10-30  Arnaud Charlet  <charlet@act-europe.fr>
 
 	* ada/acats/run_all.sh: Do not print PASS messages to stdout, as
diff --git a/gcc/testsuite/g77.dg/bprob/bprob.exp b/gcc/testsuite/g77.dg/bprob/bprob.exp
index ae52506..771a7aa 100644
--- a/gcc/testsuite/g77.dg/bprob/bprob.exp
+++ b/gcc/testsuite/g77.dg/bprob/bprob.exp
@@ -20,6 +20,9 @@
 # Some targets don't have any implementation of __bb_init_func or are
 # missing other needed machinery.
 if { [istarget mmix-*-*]
+     || [istarget arm*-*-elf]
+     || [istarget strongarm*-*-elf]
+     || [istarget xscale*-*-elf]
      || [istarget cris-*-*] } {
     return
 }
diff --git a/gcc/testsuite/g77.f-torture/execute/10197.x b/gcc/testsuite/g77.f-torture/execute/10197.x
new file mode 100644
index 0000000..6a69a3a
--- /dev/null
+++ b/gcc/testsuite/g77.f-torture/execute/10197.x
@@ -0,0 +1,13 @@
+# Scratch files aren't implemented for mmixware
+# (_stat is a stub and files can't be deleted).
+# Similar restrictions exist for most simulators.
+
+if { [istarget "mmix-knuth-mmixware"]
+     || [istarget "arm*-*-elf"]
+     || [istarget "strongarm*-*-elf"]
+     || [istarget "xscale*-*-elf"]
+     || [istarget "cris-*-elf"] } {
+	set torture_execute_xfail [istarget]
+}
+
+return 0
diff --git a/gcc/testsuite/g77.f-torture/execute/20001201.x b/gcc/testsuite/g77.f-torture/execute/20001201.x
index 7087bab..6a69a3a 100644
--- a/gcc/testsuite/g77.f-torture/execute/20001201.x
+++ b/gcc/testsuite/g77.f-torture/execute/20001201.x
@@ -3,6 +3,9 @@
 # Similar restrictions exist for most simulators.
 
 if { [istarget "mmix-knuth-mmixware"]
+     || [istarget "arm*-*-elf"]
+     || [istarget "strongarm*-*-elf"]
+     || [istarget "xscale*-*-elf"]
      || [istarget "cris-*-elf"] } {
 	set torture_execute_xfail [istarget]
 }
diff --git a/gcc/testsuite/g77.f-torture/execute/6367.x b/gcc/testsuite/g77.f-torture/execute/6367.x
index 7087bab..42fc7da 100644
--- a/gcc/testsuite/g77.f-torture/execute/6367.x
+++ b/gcc/testsuite/g77.f-torture/execute/6367.x
@@ -3,6 +3,9 @@
 # Similar restrictions exist for most simulators.
 
 if { [istarget "mmix-knuth-mmixware"]
+     || [istarget "arm*-*-elf"]
+     || [istarget "strongarm*-*-elf"]
+     || [istarget "xscalearm*-*-elf"]
      || [istarget "cris-*-elf"] } {
 	set torture_execute_xfail [istarget]
 }
diff --git a/gcc/testsuite/g77.f-torture/execute/io0.x b/gcc/testsuite/g77.f-torture/execute/io0.x
index 7087bab..6a69a3a 100644
--- a/gcc/testsuite/g77.f-torture/execute/io0.x
+++ b/gcc/testsuite/g77.f-torture/execute/io0.x
@@ -3,6 +3,9 @@
 # Similar restrictions exist for most simulators.
 
 if { [istarget "mmix-knuth-mmixware"]
+     || [istarget "arm*-*-elf"]
+     || [istarget "strongarm*-*-elf"]
+     || [istarget "xscale*-*-elf"]
      || [istarget "cris-*-elf"] } {
 	set torture_execute_xfail [istarget]
 }
diff --git a/gcc/testsuite/g77.f-torture/execute/io1.x b/gcc/testsuite/g77.f-torture/execute/io1.x
index 7087bab..6a69a3a 100644
--- a/gcc/testsuite/g77.f-torture/execute/io1.x
+++ b/gcc/testsuite/g77.f-torture/execute/io1.x
@@ -3,6 +3,9 @@
 # Similar restrictions exist for most simulators.
 
 if { [istarget "mmix-knuth-mmixware"]
+     || [istarget "arm*-*-elf"]
+     || [istarget "strongarm*-*-elf"]
+     || [istarget "xscale*-*-elf"]
      || [istarget "cris-*-elf"] } {
 	set torture_execute_xfail [istarget]
 }
diff --git a/gcc/testsuite/g77.f-torture/execute/u77-test.x b/gcc/testsuite/g77.f-torture/execute/u77-test.x
index 469732f..e4b8900 100644
--- a/gcc/testsuite/g77.f-torture/execute/u77-test.x
+++ b/gcc/testsuite/g77.f-torture/execute/u77-test.x
@@ -2,6 +2,9 @@
 # link time.
 
 if { [istarget "mmix-knuth-mmixware"]
+     || [istarget "arm*-*-elf"]
+     || [istarget "strongarm*-*-elf"]
+     || [istarget "xscale*-*-elf"]
      || [istarget "cris-*-elf"] } {
 	set torture_compile_xfail [istarget]
 }
diff --git a/gcc/testsuite/gcc.misc-tests/bprob.exp b/gcc/testsuite/gcc.misc-tests/bprob.exp
index c0035f0..81a2968 100644
--- a/gcc/testsuite/gcc.misc-tests/bprob.exp
+++ b/gcc/testsuite/gcc.misc-tests/bprob.exp
@@ -20,6 +20,9 @@
 # Some targets don't have any implementation of __bb_init_func or are
 # missing other needed machinery.
 if { [istarget mmix-*-*]
+     || [istarget arm*-*-elf]
+     || [istarget strongarm*-*-elf]
+     || [istarget xscale*-*-elf]
      || [istarget cris-*-*]
      || [istarget h8300-*-*] } {
     return