re PR fortran/78026 (ICE in gfc_resolve_omp_declare_simd, at fortran/openmp.c:5190)
authorJakub Jelinek <jakub@gcc.gnu.org>
Thu, 27 Oct 2016 19:55:12 +0000 (21:55 +0200)
committerJakub Jelinek <jakub@gcc.gnu.org>
Thu, 27 Oct 2016 19:55:12 +0000 (21:55 +0200)
commit6f21288f8c3579ec7ae47615e76ba1e6ad25551f
tree8eace66a9ed3bade23fd586a126fba2b7fcd0e9f
parent47ffb5d95eb5c5514dae306b7c8e4308f1f001a2
re PR fortran/78026 (ICE in gfc_resolve_omp_declare_simd, at fortran/openmp.c:5190)

PR fortran/78026
* parse.c (decode_statement): Don't create namespace for possible
select type here and destroy it afterwards.
(parse_select_type_block): Set gfc_current_ns to new_st.ext.block.ns.
(parse_executable, gfc_parse_file): Formatting fixes.
* match.c (gfc_match_select_type): Create namespace for select type
here, only after matching select type.  Formatting fixes.  Free that
namespace if not returning MATCH_YES, after gfc_undo_symbols,
otherwise remember it in new_st.ext.block.ns and switch to parent
namespace anyway.

* gfortran.dg/gomp/pr78026.f03: New test.
* gfortran.dg/select_type_38.f03: New test.

From-SVN: r241630
gcc/fortran/ChangeLog
gcc/fortran/match.c
gcc/fortran/parse.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/gomp/pr78026.f03 [new file with mode: 0644]
gcc/testsuite/gfortran.dg/select_type_38.f03 [new file with mode: 0644]