aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite/gcc.dg/gomp/reduction-1.c
blob: 0aeb21e6d155890f8190bb67134d50227e0f522b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
/* { dg-do compile } */
/* { dg-options "-fopenmp" } */

struct S {};
void foo (void *, void *);
void bar (void *, void *);
void baz (void *);
#pragma omp declare reduction(+:struct S:foo (&omp_out, &omp_in))initializer(bar(&omp_priv, &omp_orig))

void
test (void)
{
  struct S b[10];
  #pragma omp parallel reduction(+:b[0:5])	/* { dg-error "zero length array section" } */
    baz (b);
  #pragma omp parallel reduction(+:b[:10])	/* { dg-error "zero length array section" } */
    baz (b);
  #pragma omp parallel reduction(+:b)		/* { dg-error "is a zero size array" } */
    baz (b);
}