[Bug tree-optimization/79894] New: [5/6/7 Regression] ICE in gfc_add_modify_loc, at fortran/trans.c:159

[marxin at gcc dot gnu.org]

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

            Bug ID: 79894
           Summary: [5/6/7 Regression] ICE in gfc_add_modify_loc, at
                    fortran/trans.c:159
           Product: gcc
           Version: 7.0
            Status: UNCONFIRMED
          Keywords: ice-on-valid-code
          Severity: normal
          Priority: P3
         Component: tree-optimization
          Assignee: unassigned at gcc dot gnu.org
          Reporter: marxin at gcc dot gnu.org
                CC: rguenth at gcc dot gnu.org
  Target Milestone: ---

Starting from r217421, we ICE on:

$ gcc
/home/marxin/Programming/gcc/gcc/testsuite/gfortran.dg/complex_intrinsic_6.f90 
-c
/home/marxin/Programming/gcc/gcc/testsuite/gfortran.dg/complex_intrinsic_6.f90:35:0:

   z4 = asin(z4) ! { dg-error "Fortran 2008: COMPLEX argument" }

internal compiler error: in gfc_add_modify_loc, at fortran/trans.c:159
0x73e520 gfc_add_modify_loc(unsigned int, stmtblock_t*, tree_node*, tree_node*)
        ../../gcc/fortran/trans.c:158
0x7783b1 gfc_trans_scalar_assign(gfc_se*, gfc_se*, gfc_typespec, bool, bool,
bool)
        ../../gcc/fortran/trans-expr.c:8793
0x7899ea gfc_trans_assignment_1
        ../../gcc/fortran/trans-expr.c:10064
0x73ec87 trans_code
        ../../gcc/fortran/trans.c:1817
0x76fce8 gfc_generate_function_code(gfc_namespace*)
        ../../gcc/fortran/trans-decl.c:6306
0x6f7890 translate_all_program_units
        ../../gcc/fortran/parse.c:6070
0x6f7890 gfc_parse_file()
        ../../gcc/fortran/parse.c:6270
0x73b80f gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:204