From 339670f866de0134bcbcaa043a502d57e3e2e162 Mon Sep 17 00:00:00 2001 From: Ulrich Weigand Date: Fri, 17 Apr 2009 10:41:08 +0000 Subject: 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 --- gcc/testsuite/ChangeLog | 9 +++++++++ gcc/testsuite/gfortran.dg/chmod_1.f90 | 2 +- gcc/testsuite/gfortran.dg/chmod_2.f90 | 2 +- gcc/testsuite/gfortran.dg/chmod_3.f90 | 2 +- gcc/testsuite/gfortran.dg/open_errors.f90 | 2 +- gcc/testsuite/gfortran.dg/stat_1.f90 | 2 +- gcc/testsuite/gfortran.dg/stat_2.f90 | 2 +- 7 files changed, 15 insertions(+), 6 deletions(-) (limited to 'gcc') diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index ef49ded..010a373 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,5 +1,14 @@ 2009-04-17 Ulrich Weigand + * 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 + * gfortran.fortran-torture/execute/nan_inf_fmt.x: Skip on spu-*-*. * gfortran.fortran-torture/execute/intrinsic_nearest.x: Likewise. * gfortran.fortran-torture/execute/intrinsic_set_exponent.x: Likewise. diff --git a/gcc/testsuite/gfortran.dg/chmod_1.f90 b/gcc/testsuite/gfortran.dg/chmod_1.f90 index e83becc..1c7907e 100644 --- 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 f319cd1..b43c60f 100644 --- 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 63a4bbb..c97af6d 100644 --- 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 0def37a..729cc6a 100644 --- 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 character(60) :: msg diff --git a/gcc/testsuite/gfortran.dg/stat_1.f90 b/gcc/testsuite/gfortran.dg/stat_1.f90 index df60c39..2fceaab 100644 --- 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 4622395..72661ac 100644 --- 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 -- cgit v1.1