[Committed] PR fortran/90988 -- Fix.

[Steve Kargl]

Committed as obvious.

The patch fixes PR fortran/90988 where a less than
informative error is emitted for invalid code with
a PUBLIC specification statement.  As a bonus fix
parsing errors for PRIVATE and PROTECTED as pointed
out in https://gcc.gnu.org/ml/fortran/2019-06/msg00144.html

2019-06-24  Steven G. Kargl  <kargl@gcc.gnu.org>

	PR Fortran/90988
	* decl.c (access_attr_decl): Use temporary variable to reduce
	unreadability of code.  Normalize jumping to return.
	(gfc_match_protected): Fix parsing error.  Add comments to 
	explain code.  Remove dead code.
	(gfc_match_private): Use temporary variable to reduce unreadability 
	of code. Fix parsing error.  Move code to test for blank PRIVATE.
	Remove dead code.
	(gfc_match_public): Move code to test for blank PUBLIC.  Fix
	parsing error.  Remove dead code.

2019-06-24  Steven G. Kargl  <kargl@gcc.gnu.org>

	PR Fortran/90988
	* gfortran.dg/pr90988_1.f90: New test.
	* gfortran.dg/pr90988_2.f90: Ditto.
	* gfortran.dg/pr90988_3.f90: Ditto.

-- 
Steve
-------------- next part --------------
A non-text attachment was scrubbed...
Name: a.diff
Type: text/x-diff
Size: 7800 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20190627/b3a90603/attachment.bin>