* gfortran.dg/scratch_1.f90: Skip on spu-*-*.

From-SVN: r177595

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index cc695dacb4f0dc6c67f07ad0001a2673f6ec4d03..d3e941974930744ac965686c63fb1323df444d79 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2011-08-09  Ulrich Weigand  <Ulrich.Weigand@de.ibm.com>
+
+       * gfortran.dg/scratch_1.f90: Skip on spu-*-*.
+
 2011-08-09  Ulrich Weigand  <Ulrich.Weigand@de.ibm.com>
 
        * gcc.dg/pr49948.c: Require pthread effective target.

diff --git a/gcc/testsuite/gfortran.dg/scratch_1.f90 b/gcc/testsuite/gfortran.dg/scratch_1.f90
index 1547bfe8c5bdd818e8cd15e6c3dad0dd2b3cc605..fd888cc98051b7616823fda226b7ed3f88f46fae 100644 (file)
--- a/gcc/testsuite/gfortran.dg/scratch_1.f90
+++ b/gcc/testsuite/gfortran.dg/scratch_1.f90
@@ -1,4 +1,5 @@
 ! { dg-do run }
+! { dg-skip-if "Too big for local store" { spu-*-* } { "*" } { "" } }
 ! Check that we can open more than 26 scratch files concurrently
   integer :: i
   do i = 1, 30