[gomp] Fix reduction initialization

[Richard Henderson]

On Tue, Oct 11, 2005 at 05:10:57PM -0400, Jakub Jelinek wrote:
> 	* omp-low.c (expand_rec_input_clauses): Fix a typo.
> libgomp/
> 	* testsuite/libgomp.dg/reduction-1.c: New test.
> 	* testsuite/libgomp.dg/reduction-2.c: New test.
> 	* testsuite/libgomp.dg/reduction-3.c: New test.

Doh.  Ok.


> +    if (omp_get_thread_num () == 0)
> +      {
> +        i = 16;
> +        k ^= (1 << 16);
> +        d += 32.0;
> +      }
> +#pragma omp barrier

Probably clearer as #pragma omp single


r~