chmod_1.f90: Disable on spu-*-* targets.

	* gfortran.dg/chmod_1.f90: Disable on spu-*-* targets.
	* gfortran.dg/chmod_2.f90: Likewise.
	* gfortran.dg/chmod_3.f90: Likewise.
	* gfortran.dg/open_errors.f90: Likewise.
	* gfortran.dg/stat_1.f90: Likewise.
	* gfortran.dg/stat_2.f90: Likewise.

From-SVN: r146244

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index ef49ded67d19b317322b10770ac57942f654be0d..010a3737bf99d86617c8a4c56eaa6eb799e122a6 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,12 @@
+2009-04-17  Ulrich Weigand  <Ulrich.Weigand@de.ibm.com>
+
+       * gfortran.dg/chmod_1.f90: Disable on spu-*-* targets.
+       * gfortran.dg/chmod_2.f90: Likewise.
+       * gfortran.dg/chmod_3.f90: Likewise.
+       * gfortran.dg/open_errors.f90: Likewise.
+       * gfortran.dg/stat_1.f90: Likewise.
+       * gfortran.dg/stat_2.f90: Likewise.
+
 2009-04-17  Ulrich Weigand  <Ulrich.Weigand@de.ibm.com>
 
        * gfortran.fortran-torture/execute/nan_inf_fmt.x: Skip on spu-*-*.

diff --git a/gcc/testsuite/gfortran.dg/chmod_1.f90 b/gcc/testsuite/gfortran.dg/chmod_1.f90
index e83beccf84bc5ce1bc3cd87af6dcd5a7f2c95eee..1c7907e8f3584f3c1bf5b209dfc67a03e5213d4b 100644 (file)
--- a/gcc/testsuite/gfortran.dg/chmod_1.f90
+++ b/gcc/testsuite/gfortran.dg/chmod_1.f90
@@ -1,4 +1,4 @@
-! { dg-do run { target { ! *-*-mingw* } } }
+! { dg-do run { target { ! { *-*-mingw* spu-*-* } } } }
 ! { dg-options "-std=gnu" }
   implicit none
   character(len=*), parameter :: n = "foobar_file"

diff --git a/gcc/testsuite/gfortran.dg/chmod_2.f90 b/gcc/testsuite/gfortran.dg/chmod_2.f90
index f319cd1868e205ef7723139eed7eda4eba0e59aa..b43c60f9b927b3e0cdbfe210f62cfe18a1d39cba 100644 (file)
--- a/gcc/testsuite/gfortran.dg/chmod_2.f90
+++ b/gcc/testsuite/gfortran.dg/chmod_2.f90
@@ -1,4 +1,4 @@
-! { dg-do run { target { ! *-*-mingw* } } }
+! { dg-do run { target { ! { *-*-mingw* spu-*-* } } } }
 ! { dg-options "-std=gnu" }
   implicit none
   character(len=*), parameter :: n = "foobar_file"

diff --git a/gcc/testsuite/gfortran.dg/chmod_3.f90 b/gcc/testsuite/gfortran.dg/chmod_3.f90
index 63a4bbb564e42ac68b0d306aeec3b1ddd8d3d18b..c97af6d46921aad1390c88b5c53e68da936d75fd 100644 (file)
--- a/gcc/testsuite/gfortran.dg/chmod_3.f90
+++ b/gcc/testsuite/gfortran.dg/chmod_3.f90
@@ -1,4 +1,4 @@
-! { dg-do run { target { ! *-*-mingw* } } }
+! { dg-do run { target { ! { *-*-mingw* spu-*-* } } } }
 ! { dg-options "-std=gnu -fdefault-integer-8" }
   implicit none
   character(len=*), parameter :: n = "foobar_file"

diff --git a/gcc/testsuite/gfortran.dg/open_errors.f90 b/gcc/testsuite/gfortran.dg/open_errors.f90
index 0def37a63569f150b1ab17c2d72ce51111a22b94..729cc6a4fef47760ce952bd085217d9f75efb8de 100644 (file)
--- a/gcc/testsuite/gfortran.dg/open_errors.f90
+++ b/gcc/testsuite/gfortran.dg/open_errors.f90
@@ -1,4 +1,4 @@
-! { dg-do run { target { ! *-*-mingw* } } }
+! { dg-do run { target { ! { *-*-mingw* spu-*-* } } } }
 ! PR30005 Enhanced error messages for OPEN
 ! Submitted by Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 character(60) :: msg

diff --git a/gcc/testsuite/gfortran.dg/stat_1.f90 b/gcc/testsuite/gfortran.dg/stat_1.f90
index df60c3948f2ad846fd3df02d72b749457f6e54fe..2fceaab9f7ee145183552beb08f9c2aef9dbfe50 100644 (file)
--- a/gcc/testsuite/gfortran.dg/stat_1.f90
+++ b/gcc/testsuite/gfortran.dg/stat_1.f90
@@ -1,5 +1,5 @@
 ! { dg-do run { target fd_truncate } }
-! { dg-skip-if "" { *-*-mingw* } { "*" } { "" } }
+! { dg-skip-if "" { *-*-mingw* spu-*-* } { "*" } { "" } }
 ! { dg-options "-std=gnu" }
   character(len=*), parameter :: f = "testfile"
   integer :: s1(13), r1, s2(13), r2, s3(13), r3

diff --git a/gcc/testsuite/gfortran.dg/stat_2.f90 b/gcc/testsuite/gfortran.dg/stat_2.f90
index 4622395c34d2ac4f78921b536f0aa29c7b0d1f54..72661aced419195fa4af48ddbc980d05a47b56a9 100644 (file)
--- a/gcc/testsuite/gfortran.dg/stat_2.f90
+++ b/gcc/testsuite/gfortran.dg/stat_2.f90
@@ -1,5 +1,5 @@
 ! { dg-do run { target fd_truncate } }
-! { dg-skip-if "" { *-*-mingw* } { "*" } { "" } }
+! { dg-skip-if "" { *-*-mingw* spu-*-* } { "*" } { "" } }
 ! { dg-options "-std=gnu" }
   character(len=*), parameter :: f = "testfile"
   integer :: s1(13), r1, s2(13), r2, s3(13), r3