libgomp/testsuite/libgomp.c++/pr49043.C


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

// PR c++/49043
// { dg-options "-std=c++0x" }
// { dg-do run }

extern "C" void abort ();

int
main ()
{
  int r = 0;
  #pragma omp parallel for reduction (+:r)
    for (int a = 0; a < 10; ++a)
      {
	auto func = [=] () { return a; };
	r += func ();
      }
  if (r != 45)
    abort ();
}