[Bug fortran/91729] ICE in gfc_match_select_rank, at fortran/match.c:6586

[pault at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=91729

--- Comment #3 from Paul Thomas <pault at gcc dot gnu.org> ---
Author: pault
Date: Mon Sep 23 09:19:10 2019
New Revision: 276051

URL: https://gcc.gnu.org/viewcvs?rev=276051&root=gcc&view=rev
Log:
2019-09-23  Paul Thomas  <pa...@gcc.gnu.org>

        PR fortran/91729
        * match.c (gfc_match_select_rank): Initialise 'as' to NULL.
        Check for a symtree in the selector expression before trying to
        assign a value to 'as'. Revert to gfc_error and go to cleanup
        after setting a MATCH_ERROR.

2019-09-23  Paul Thomas  <pa...@gcc.gnu.org>

        PR fortran/91729
        * gfortran.dg/select_rank_2.f90 : Add two more errors in foo2.
        * gfortran.dg/select_rank_3.f90 : New test.


Added:
    trunk/gcc/testsuite/gfortran.dg/select_rank_3.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/match.c
    trunk/gcc/testsuite/ChangeLog
    trunk/gcc/testsuite/gfortran.dg/select_rank_2.f90