1  /* PR libgomp/58756 */
       2  /* { dg-do run } */
       3  /* { dg-additional-options "-msse2" { target sse2_runtime } } */
       4  /* { dg-additional-options "-mavx" { target avx_runtime } } */
       5  
       6  extern void abort (void);
       7  int d[32 * 32];
       8  
       9  __attribute__((noinline, noclone)) int
      10  foo (int a, int b)
      11  {
      12    int j, c = 0;
      13    #pragma omp parallel for reduction(+: c)
      14      for (j = 0; j < a; j += 32)
      15        {
      16  	int l;
      17  	#pragma omp simd reduction(+: c) safelen(1)
      18  	  for (l = 0; l < b; ++l)
      19  	    c += d[j + l];
      20        }
      21    return c;
      22  }
      23  
      24  __attribute__((noinline, noclone)) int
      25  bar (int a)
      26  {
      27    int j, c = 0;
      28    #pragma omp parallel for simd reduction(+: c) safelen(1)
      29      for (j = 0; j < a; ++j)
      30        c += d[j];
      31    return c;
      32  }
      33  
      34  __attribute__((noinline)) static int
      35  baz (int a)
      36  {
      37    int j, c = 0;
      38    #pragma omp simd reduction(+: c) safelen(1)
      39      for (j = 0; j < a; ++j)
      40        c += d[j];
      41    return c;
      42  }
      43  
      44  int
      45  main ()
      46  {
      47    int i;
      48    for (i = 0; i < 32 * 32; i++)
      49      d[i] = (i & 31);
      50    if (foo (32 * 32, 32) != (31 * 32 / 2) * 32)
      51      abort ();
      52    if (bar (32 * 32) != (31 * 32 / 2) * 32)
      53      abort ();
      54    if (baz (32 * 32) != (31 * 32 / 2) * 32)
      55      abort ();
      56    return 0;
      57  }