[Bug fortran/56081] [4.7/4.8 Regression] Seg fault ICE on select with bad case

[janus at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=56081

--- Comment #9 from janus at gcc dot gnu.org 2013-01-23 21:38:44 UTC ---
Author: janus
Date: Wed Jan 23 21:38:40 2013
New Revision: 195412

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=195412
Log:
2013-01-23  Janus Weil  <janus@gcc.gnu.org>

    PR fortran/56081
    * resolve.c (resolve_select): Add argument 'select_type', reject
    non-scalar expressions.
    (resolve_select_type,resolve_code): Pass new argument to
    'resolve_select'.


2013-01-23  Janus Weil  <janus@gcc.gnu.org>

    PR fortran/56081
    * gfortran.dg/select_8.f90: New.

Added:
    trunk/gcc/testsuite/gfortran.dg/select_8.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/resolve.c
    trunk/gcc/testsuite/ChangeLog