diff options
author | Jakub Jelinek <jakub@redhat.com> | 2009-03-19 16:34:00 +0100 |
---|---|---|
committer | Jakub Jelinek <jakub@gcc.gnu.org> | 2009-03-19 16:34:00 +0100 |
commit | ea1199ee953ac11b8b0635da6ba2908e5311fc49 (patch) | |
tree | 3413aca2f5e318c5d2997003e2eef0683021ee20 /gcc/testsuite/gcc.dg/gomp/pr39495-2.c | |
parent | 58929c1068f0550be90d3921305b14fb3dc37132 (diff) | |
download | gcc-ea1199ee953ac11b8b0635da6ba2908e5311fc49.zip gcc-ea1199ee953ac11b8b0635da6ba2908e5311fc49.tar.gz gcc-ea1199ee953ac11b8b0635da6ba2908e5311fc49.tar.bz2 |
re PR c/39495 (OMP parallel loop w/ unsigned index var rejected)
PR c/39495
* c-omp.c (c_finish_omp_for): Allow NE_EXPR with TREE_TYPE (decl)'s
minimum or maximum value.
* parser.c (cp_parser_omp_for_cond): Don't check lhs if decl is NULL.
(cp_parser_omp_for_loop): Always use cp_parser_omp_for_cond.
* gcc.dg/gomp/pr39495-1.c: New test.
* gcc.dg/gomp/pr39495-2.c: New test.
* g++.dg/gomp/pr39495-1.C: New test.
* g++.dg/gomp/pr39495-2.C: New test.
From-SVN: r144965
Diffstat (limited to 'gcc/testsuite/gcc.dg/gomp/pr39495-2.c')
-rw-r--r-- | gcc/testsuite/gcc.dg/gomp/pr39495-2.c | 39 |
1 files changed, 39 insertions, 0 deletions
diff --git a/gcc/testsuite/gcc.dg/gomp/pr39495-2.c b/gcc/testsuite/gcc.dg/gomp/pr39495-2.c new file mode 100644 index 0000000..e463696 --- /dev/null +++ b/gcc/testsuite/gcc.dg/gomp/pr39495-2.c @@ -0,0 +1,39 @@ +/* PR c/39495 */ +/* { dg-do compile } */ +/* { dg-options "-fopenmp" } */ + +#define INT_MIN (-__INT_MAX__ - 1) +#define INT_MAX __INT_MAX__ +#define UINT_MAX (2U * __INT_MAX__ + 1) + +int +foo (void) +{ + int i; + unsigned int u; + +#pragma omp for + for (i = INT_MIN + 6; i != INT_MIN; i--) /* { dg-error "invalid controlling predicate" "" { xfail *-*-* } } */ + ; +#pragma omp for + for (i = INT_MIN + 6; i == INT_MIN; i--) /* { dg-error "invalid controlling predicate" } */ + ; +#pragma omp for + for (i = INT_MAX - 6; i != INT_MAX; i++) /* { dg-error "invalid controlling predicate" "" { xfail *-*-* } } */ + ; +#pragma omp for + for (i = INT_MAX - 6; i == INT_MAX; i++) /* { dg-error "invalid controlling predicate" } */ + ; +#pragma omp for + for (u = 6; u != 0; u--) /* { dg-error "invalid controlling predicate" "" { xfail *-*-* } } */ + ; +#pragma omp for + for (u = 6; u == 0; u--) /* { dg-error "invalid controlling predicate" } */ + ; +#pragma omp for + for (u = UINT_MAX - 6; u != UINT_MAX; u++) /* { dg-error "invalid controlling predicate" "" { xfail *-*-* } } */ + ; +#pragma omp for + for (u = UINT_MAX - 6; u == UINT_MAX; u++) /* { dg-error "invalid controlling predicate" } */ + ; +} |