[Patch, Fortran] Reject OpenMP parallelization for DO CONCURRENT

[Jakub Jelinek]

On Sun, May 11, 2014 at 08:28:12PM +0200, Tobias Burnus wrote:
> While it would be nice to support "!$OMP do" for "do concurrent"
> loops, the OpenMP spec does not support it, yet. (Syntactically, it
> is a not a that simple feature as do concurrent can optionally have
> a MASK=, which has to be evaluated before the loop.)
> 
> Thus, this patch avoids an ICE by simply rejecting this feature.
> That's also in line with the other compilers I tried: they either
> ICE or reject it with an error message.
> 
> Note: The patch is based on Jakub's OpenMP4 patch (i.e. it uses
> "name" instead of the hard-coded "!$omp do").
> 
> Build and regtested on x86-64-gnu-linux.
> OK for the trunk? (When/if OpenMP4 support is backported, I think
> this patch should also be included.)
> 
> Tobias

> 2014-05-11  Tobias Burnus  <burnus@net-b.de>
> 
> 	PR fortran/60127
> 	* openmp.c (resolve_omp_do): Reject do concurrent loops.
> 
> 2014-05-11  Tobias Burnus  <burnus@net-b.de>
> 
> 	PR fortran/60127
> 	* gfortran.dg/gomp/omp_do_concurrent.f90: New.

Ok, thanks.

	Jakub