diff options
| author | Ulrich Weigand <uweigand@de.ibm.com> | 2012-02-27 15:30:32 +0000 |
|---|---|---|
| committer | Ulrich Weigand <uweigand@gcc.gnu.org> | 2012-02-27 15:30:32 +0000 |
| commit | 0d6d338f5bf4846b4a5b11256b5ca506a9a5fdba (patch) | |
| tree | bb02caee530c7d8a695e3162989e144074c5339a | |
| parent | 49efd4dcbf2a89b98e8b0cf6036185a4fabc4e64 (diff) | |
| download | gcc-0d6d338f5bf4846b4a5b11256b5ca506a9a5fdba.zip gcc-0d6d338f5bf4846b4a5b11256b5ca506a9a5fdba.tar.gz gcc-0d6d338f5bf4846b4a5b11256b5ca506a9a5fdba.tar.bz2 | |
typebound_operator_9.f03: Skip on SPU.
* gfortran.dg/typebound_operator_9.f03: Skip on SPU.
* gcc.dg/torture/builtin-complex-1.c: Skip "float" tests on SPU.
From-SVN: r184602
| -rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/testsuite/gcc.dg/torture/builtin-complex-1.c | 6 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/typebound_operator_9.f03 | 1 |
3 files changed, 12 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index f008afc..0af8d11 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2012-02-27 Ulrich Weigand <Ulrich.Weigand@de.ibm.com> + + * gfortran.dg/typebound_operator_9.f03: Skip on SPU. + * gcc.dg/torture/builtin-complex-1.c: Skip "float" tests on SPU. + 2012-02-27 Eric Botcazou <ebotcazou@adacore.com> * gnat.dg/aggr19.adb: New test. diff --git a/gcc/testsuite/gcc.dg/torture/builtin-complex-1.c b/gcc/testsuite/gcc.dg/torture/builtin-complex-1.c index 0c2f98b..20dc4c4 100644 --- a/gcc/testsuite/gcc.dg/torture/builtin-complex-1.c +++ b/gcc/testsuite/gcc.dg/torture/builtin-complex-1.c @@ -18,11 +18,13 @@ extern void abort (void); abort (); \ } while (0) +#ifndef __SPU__ void comparef (float a, float b) { COMPARE_BODY (a, b, float, __builtin_copysignf); } +#endif void compare (double a, double b) @@ -36,12 +38,14 @@ comparel (long double a, long double b) COMPARE_BODY (a, b, long double, __builtin_copysignl); } +#ifndef __SPU__ void comparecf (_Complex float a, float r, float i) { comparef (__real__ a, r); comparef (__imag__ a, i); } +#endif void comparec (_Complex double a, double r, double i) @@ -90,8 +94,10 @@ comparecl (_Complex long double a, long double r, long double i) void check_float (void) { +#ifndef __SPU__ ALL_CHECKS (0.0f, -0.0f, __builtin_nanf(""), __builtin_inff(), float, comparecf); +#endif } void diff --git a/gcc/testsuite/gfortran.dg/typebound_operator_9.f03 b/gcc/testsuite/gfortran.dg/typebound_operator_9.f03 index b27210b..9fda1eb 100644 --- a/gcc/testsuite/gfortran.dg/typebound_operator_9.f03 +++ b/gcc/testsuite/gfortran.dg/typebound_operator_9.f03 @@ -1,5 +1,6 @@ ! { dg-do run } ! { dg-add-options ieee } +! { dg-skip-if "Too big for local store" { spu-*-* } { "*" } { "" } } ! ! Solve a diffusion problem using an object-oriented approach ! |