52702016ad
PR c++/60228 * parser.c (cp_parser_omp_declare_reduction_exprs): If processing_template_decl, wrap the combiner or initializer into EXPR_STMT. * decl.c (start_preparsed_function): Don't start a lambda scope for DECL_OMP_DECLARE_REDUCTION_P functions. (finish_function): Don't finish a lambda scope for DECL_OMP_DECLARE_REDUCTION_P functions, nor cp_fold_function them nor cp_genericize them. * mangle.c (decl_mangling_context): Look through DECL_OMP_DECLARE_REDUCTION_P functions. * semantics.c (expand_or_defer_fn_1): For DECL_OMP_DECLARE_REDUCTION_P functions, use tentative linkage, don't keep their bodies with -fkeep-inline-functions and return false at the end. * g++.dg/gomp/openmp-simd-2.C: Don't expect bodies for DECL_OMP_DECLARE_REDUCTION_P functions. * testsuite/libgomp.c++/udr-20.C: New test. * testsuite/libgomp.c++/udr-21.C: New test. From-SVN: r278832
55 lines
1005 B
C
55 lines
1005 B
C
// PR c++/60228
|
|
// { dg-additional-options "-std=c++11" }
|
|
|
|
extern "C" void abort ();
|
|
|
|
struct A
|
|
{
|
|
typedef int T;
|
|
#pragma omp declare reduction (y : T : [&omp_out, &omp_in]() { omp_out += omp_in; return 0; }()) initializer (omp_priv = [omp_orig]() { return omp_orig; }())
|
|
static void foo ();
|
|
};
|
|
|
|
template <typename T>
|
|
struct B
|
|
{
|
|
#pragma omp declare reduction (y : T : [&omp_out, &omp_in]() { omp_out += omp_in; return 0; }()) initializer (omp_priv = [omp_orig]() { return omp_orig; }())
|
|
static void foo ();
|
|
};
|
|
|
|
void
|
|
A::foo ()
|
|
{
|
|
int r = 0, s = 0;
|
|
#pragma omp parallel for reduction (y : r, s)
|
|
for (int i = 0; i < 64; i++)
|
|
{
|
|
r++;
|
|
s += i;
|
|
}
|
|
if (r != 64 || s != (64 * 63) / 2)
|
|
abort ();
|
|
}
|
|
|
|
template <typename T>
|
|
void
|
|
B<T>::foo ()
|
|
{
|
|
T r = 0, s = 0;
|
|
#pragma omp parallel for reduction (y : r, s)
|
|
for (int i = 0; i < 64; i++)
|
|
{
|
|
r++;
|
|
s += i;
|
|
}
|
|
if (r != 64 || s != (64 * 63) / 2)
|
|
abort ();
|
|
}
|
|
|
|
int
|
|
main ()
|
|
{
|
|
A::foo ();
|
|
B<short>::foo ();
|
|
}
|