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
