[Bug fortran/43711] Unformitive error message for two NOWAIT in OpenMP directive

["dfranke at gcc dot gnu dot org" <gcc-bugzilla@gcc.gnu.org>]

------- Comment #2 from dfranke at gcc dot gnu dot org  2010-05-07 17:41 -------
(In reply to comment #1)
> I believe, this is eventually the same as PR32365.

Stupid me. There's actually an easy fix for this one:

Index: openmp.c
===================================================================
--- openmp.c    (revision 159154)
+++ openmp.c    (working copy)
@@ -54,6 +54,8 @@ gfc_match_omp_eos (void)
       return MATCH_YES;
     }

+  gfc_error("Unexpected junk at end of OMP statement at %C");
+
   gfc_current_locus = old_loc;
   return MATCH_NO;
 }


This gives:
$> gfortran-svn -g -Wall -W -fopenmp pr43711.f90 
pr43711.f90:8.33:

      !$omp end sections nowait nowait
                                 1
Error: Unexpected junk at end of OMP statement at (1)


-- 

dfranke at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         AssignedTo|unassigned at gcc dot gnu   |dfranke at gcc dot gnu dot
                   |dot org                     |org
             Status|UNCONFIRMED                 |ASSIGNED
     Ever Confirmed|0                           |1
   Last reconfirmed|0000-00-00 00:00:00         |2010-05-07 17:41:39
               date|                            |


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=43711