[Bug fortran/66633] [5/6 regression] ICE on valid "verify_gimple failed" with OpenMP

["mikael at gcc dot gnu.org" <gcc-bugzilla at gcc dot gnu dot org>]

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

Mikael Morin <mikael at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
            Summary|ICE on valid "verify_gimple |[5/6 regression] ICE on
                   |failed" with OpenMP         |valid "verify_gimple
                   |                            |failed" with OpenMP

--- Comment #3 from Mikael Morin <mikael at gcc dot gnu.org> ---
The backtrace on the 5 branch is:

comment_1.f90:4:0:

     !$omp parallel
 ^
internal compiler error: in get_expr_operands, at tree-ssa-operands.c:910
0xb973ef get_expr_operands
        /home/mik/gcc/svn_gcc5/src/gcc/tree-ssa-operands.c:910
0xb972fb get_expr_operands
        /home/mik/gcc/svn_gcc5/src/gcc/tree-ssa-operands.c:798
0xb97806 parse_ssa_operands
        /home/mik/gcc/svn_gcc5/src/gcc/tree-ssa-operands.c:959
0xb98c77 build_ssa_operands
        /home/mik/gcc/svn_gcc5/src/gcc/tree-ssa-operands.c:974
0xb98c77 update_stmt_operands(function*, gimple_statement_base*)
        /home/mik/gcc/svn_gcc5/src/gcc/tree-ssa-operands.c:1105
0xaeb7b0 update_stmt
        /home/mik/gcc/svn_gcc5/src/gcc/gimple-ssa.h:178
0xaeb7b0 mark_def_sites
        /home/mik/gcc/svn_gcc5/src/gcc/tree-into-ssa.c:703
0xaeb7b0 mark_def_dom_walker::before_dom_children(basic_block_def*)
        /home/mik/gcc/svn_gcc5/src/gcc/tree-into-ssa.c:2300
0xf70961 dom_walker::walk(basic_block_def*)
        /home/mik/gcc/svn_gcc5/src/gcc/domwalk.c:188
0xae987a execute
        /home/mik/gcc/svn_gcc5/src/gcc/tree-into-ssa.c:2412
Please submit a full bug report,
with preprocessed source if appropriate.
Please include the complete backtrace with any bug report.
See <http://gcc.gnu.org/bugs.html> for instructions.


The 4.9 branch accepts the code, at least at revision r222077, which makes this
a regression.