[Bug fortran/69498] ICE on disjunct cases with displaced or incomplete embedded statement

[koenigni at gcc dot gnu.org]

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

--- Comment #10 from Nicolas Koenig <koenigni at gcc dot gnu.org> ---
Author: koenigni
Date: Mon Apr 10 20:58:21 2017
New Revision: 246826

URL: https://gcc.gnu.org/viewcvs?rev=246826&root=gcc&view=rev
Log:

2017-04-10  Nicolas Koenig  <koeni...@student.ethz.ch>
            Paul Thomas  <pa...@gcc.gnu.org>

        PR fortran/69498 
        * module.c (gfc_match_submodule): Add error
        if function is called in the wrong state.

2017-04-10  Nicolas Koenig  <koeni...@student.ethz.ch>

        PR fortran/69498 
        * gfortran.dg/submodule_unexp.f90: Modified test
        to account for new error.
        * gfortran.dg/submodule_twice.f90: New Test


Added:
    trunk/gcc/testsuite/gfortran.dg/submodule_twice.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/module.c
    trunk/gcc/testsuite/ChangeLog
    trunk/gcc/testsuite/gfortran.dg/submodule_unexp.f90