[Patch, fortran] Implementation of F2018 SELECT RANK

[Steve Kargl]

On Sat, Aug 31, 2019 at 06:34:43PM +0100, Paul Richard Thomas wrote:
> Hi Steve,
> 
> 
> > > > If an error occurs, should this set m = MATCH_ERROR and goto cleanup?
> > > > OR, set m = MATCH_ERROR, free expr1 and expr2 and return m?
> > > > IOW, if an error occurs, why should gfortran continue to match select rank?
> 
> This prevents or reduces the deluge of errors that come from the cases
> and the case blocks.
> 

I'm not oppose to either a fatal_error here or reducing -fmax-error
from its current default of 25 (a value I arbitrarily chose years ago)
to 1.

-- 
Steve