------- Comment #6 from sgk at troutmask dot apl dot washington dot edu
2010-06-02 04:36 -------
Subject: Re: [4.6 Regression] STOP parsing rejects valid code
On Wed, Jun 02, 2010 at 04:17:56AM -0000, jvdelisle at gcc dot gnu dot org
wrote:
>
> I plan to commit the following as simple and obvious. Sorry for the breakage.
>
> Index: match.c
> ===================================================================
> --- match.c (revision 160130)
> +++ match.c (working copy)
> @@ -2018,10 +2018,11 @@
> goto cleanup;
> if (m == MATCH_NO)
> goto syntax;
> +
> + if (gfc_match_eos () != MATCH_YES)
> + goto syntax;
> }
>
> - if (gfc_match_eos () != MATCH_YES)
> - goto syntax;
>
> if (gfc_pure (NULL))
> {
>
I assume that you will add appropriate testcases as well.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44371
