[PATCH] PR fortran/24636 -- reduce noise from STOP

[Thomas Koenig]

On Wed, Nov 02, 2005 at 10:26:21AM -0800, Steve Kargl wrote:
> Bubblestrapped and regression tested on amd64-*-freebsd.
> 
> This patch make the STOP statement more in line with g77.

Can you explain why

> -          if (m == MATCH_NO)
> -            goto syntax;
> +          if (m == MATCH_NO && stop_code != -1)
> +	    goto syntax;

is necessary?  The way I understand the code, gfc_match_eos() should
have returned MATCH_YES for a single STOP statement earlier, so this
could never be reached for a simple 'STOP'.  Or am I missing something here?

	Thomas