[patch, fortran, openmp] PR43711 - report unexpected junk after OMP statements

[Daniel Franke]

Attached patch turns errors as 

$> gfortran-4.5 -fopenmp pr43711.f90 
pr43711.f90:14.12:

      !$omp end sections nowait nowait
            1
Error: Unclassifiable OpenMP directive at (1)

into

$ gfortran-svn -fopenmp pr43711.f90 
pr43711.f90:14.31:

      !$omp end sections nowait nowait
                               1
Error: Unexpected junk after NOWAIT clause at (1)

Which is slightly more helpful.


gcc/fortran/:
2010-05-11  Daniel Franke  <franke.daniel@gmail.com>

	PR fortran/43711
	* openmp.c (gfc_match_omp_taskwait): Report unexpected characters
	after OMP statement.
	(gfc_match_omp_critical): Likewise.
	(gfc_match_omp_flush): Likewise.
	(gfc_match_omp_workshare): Likewise.
	(gfc_match_omp_master): Likewise.
	(gfc_match_omp_ordered): Likewise.
	(gfc_match_omp_atomic): Likewise.
	(gfc_match_omp_barrier): Likewise.
	(gfc_match_omp_end_nowait): Likewise.

gcc/testsuite/:
2010-05-11  Daniel Franke  <franke.daniel@gmail.com>

	PR fortran/43711
	* gfortran.dg/gomp/pr43711.f90: New.


Regression tested on i686-pc-linnux-gnu.
Ok for trunk?

	Daniel

-------------- next part --------------
A non-text attachment was scrubbed...
Name: pr43771.diff
Type: text/x-patch
Size: 3190 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/gcc-patches/attachments/20100511/f302b624/attachment.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: pr43711.f90
Type: text/x-fortran
Size: 496 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/gcc-patches/attachments/20100511/f302b624/attachment-0001.bin>