gomp - equivalence for threadprivate data

[Tobias Burnus]

Hi Tim,

Tim Prince wrote:
> I've attached a cut-down example of the way a well-known legacy
> application violates OpenMP standard.
>   
I had do add something like:
      dimension x1(1), vx1(1)
then it compiled with successfully (and at least by default without
warning) using

- Sun Fortran 95 8.3 Linux_i386 2007/05/03 "sunf95"
- Open64 Compiler Suite: Version 4.1 "openf95"
- Intel Fortran Version 11.0    Build 20080930
- PathScale(TM) Compiler Suite: Version 3.1
- pgf95 7.1-6 64-bit

While it fails with gfortran 4.4:

  Error: EQUIVALENCE attribute conflicts with THREADPRIVATE attribute in
'ix1' at (1)

Maybe one should indeed add it (though I would prefer a compile-time
warning).

Tobias