[Patch, Fortran] PR 56081: [4.7/4.8 Regression] Seg fault ICE on select with bad case

[Steve Kargl]

On Wed, Jan 23, 2013 at 09:18:45PM +0100, Janus Weil wrote:
> 
> here is a regression fix for an ICE-on-invalid bug with SELECT CASE.
> The check to reject non-scalar selectors had been present in 4.6, but
> was apparently removed when CLASS arrays were implemented.
> 
> The patch re-inserts the check and makes sure it is not applied to
> SELECT TYPE (where class arrays are allowed).
> 
> Regtested on x86_64-unknown-linux-gnu. Ok for trunk and 4.7?
> 

The patch looks ok to me.  Thanks.

-- 
Steve