[gomp] Handle array reductions plus various fortran reduction handling fixes

[Richard Henderson]

On Fri, Oct 14, 2005 at 05:22:47PM -0400, Jakub Jelinek wrote:
> Ok, will rework with HONOR_INFINITIES (TYPE_MODE (type)) then, ok?

Sure.

> So you prefer a langhook, or extend OMP_CLAUSE_REDUCTION, so that
> FE would already attach both the initialization and merging code
> to the clause and omplower pass would just insert that into
> the stmt list and gimplify?
...
> Allocatables are explicitely forbidden in reduction list by the OpenMP
> standard.

If allocatables are forbidden, then indeed I can't think of a way
to get a named variable that's not contiguous.  So I think you
could just do

  t := var
  while (type(t) is array)
    t := t[min-index]
  addr := &t

and then use your loop.



r~