679506c383
The following testcase FAILs, because the UDR combiner is invoked incorrectly. lower_omp_rec_clauses expects that when it sets DECL_VALUE_EXPR/DECL_HAS_VALUE_EXPR_P for both the placeholder and the var that everything will be properly regimplified, but as the variable in question is a PARM_DECL rather than VAR_DECL, lower_omp_regimplify_p doesn't say that it should be regimplified and so it is not. 2021-06-23 Jakub Jelinek <jakub@redhat.com> PR middle-end/101167 * omp-low.c (lower_omp_regimplify_p): Regimplify also PARM_DECLs and RESULT_DECLs that have DECL_HAS_VALUE_EXPR_P set. * testsuite/libgomp.c-c++-common/task-reduction-15.c: New test.
61 lines
865 B
C
61 lines
865 B
C
/* PR middle-end/101167 */
|
|
|
|
extern
|
|
#ifdef __cplusplus
|
|
"C"
|
|
#endif
|
|
void abort (void);
|
|
|
|
struct S { int a, b, c[2]; };
|
|
|
|
void
|
|
init (struct S *x)
|
|
{
|
|
x->a = 0;
|
|
x->b = 0;
|
|
x->c[0] = 0;
|
|
x->c[1] = 0;
|
|
}
|
|
|
|
void
|
|
merge (struct S *x, struct S *y)
|
|
{
|
|
x->a += y->a;
|
|
x->b += y->b;
|
|
}
|
|
|
|
#pragma omp declare reduction (+: struct S : merge (&omp_out, &omp_in)) initializer (init (&omp_priv))
|
|
|
|
void
|
|
foo (struct S x)
|
|
{
|
|
#pragma omp taskgroup task_reduction (+: x)
|
|
{
|
|
#pragma omp task in_reduction (+: x)
|
|
{
|
|
x.a++;
|
|
x.b++;
|
|
}
|
|
#pragma omp task in_reduction (+: x)
|
|
{
|
|
x.a += 4;
|
|
x.b += 14;
|
|
}
|
|
#pragma omp task in_reduction (+: x)
|
|
{
|
|
x.a += 9;
|
|
x.b += 19;
|
|
}
|
|
}
|
|
if (x.a != 56 || x.b != 86)
|
|
abort ();
|
|
}
|
|
|
|
int
|
|
main ()
|
|
{
|
|
struct S x = { 42, 52 };
|
|
#pragma omp parallel master num_threads(3)
|
|
foo (x);
|
|
return 0;
|
|
}
|