[Bug fortran/55932] [F03] ICE for structure constructor with scalar allocatable component

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

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=55932

janus at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |ice-on-valid-code
                 CC|                            |janus at gcc dot gnu.org
            Summary|DDT's default structure     |[F03] ICE for structure
                   |constructor does not work   |constructor with scalar
                   |with having allocatable     |allocatable component
                   |member variables            |

--- Comment #3 from janus at gcc dot gnu.org ---
Slightly compactified test case:

  IMPLICIT NONE 
  TYPE :: test_typ
      REAL, ALLOCATABLE :: a
  END TYPE
  TYPE(test_typ) :: my_test_typ
  my_test_typ = test_typ(1.0)
END


The backtrace with 4.9 trunk is:


internal compiler error: in fold_convert_loc, at fold-const.c:1994
   my_test_typ = test_typ(1.0)
 ^
0x7969df fold_convert_loc(unsigned int, tree_node*, tree_node*)
    /home/jweil/gcc49/trunk/gcc/fold-const.c:1993
0x6429c2 gfc_trans_scalar_assign(gfc_se*, gfc_se*, gfc_typespec, bool, bool,
bool)
    /home/jweil/gcc49/trunk/gcc/fortran/trans-expr.c:6991
0x648b8f gfc_trans_subcomponent_assign
    /home/jweil/gcc49/trunk/gcc/fortran/trans-expr.c:6052
0x648b8f gfc_trans_structure_assign
    /home/jweil/gcc49/trunk/gcc/fortran/trans-expr.c:6099
0x649ad2 gfc_conv_structure(gfc_se*, gfc_expr*, int)
    /home/jweil/gcc49/trunk/gcc/fortran/trans-expr.c:6126
0x64769c gfc_conv_expr(gfc_se*, gfc_expr*)
    /home/jweil/gcc49/trunk/gcc/fortran/trans-expr.c:6285
0x64c0c6 gfc_trans_assignment_1
    /home/jweil/gcc49/trunk/gcc/fortran/trans-expr.c:7946
0x61e795 trans_code
    /home/jweil/gcc49/trunk/gcc/fortran/trans.c:1623
0x63dee2 gfc_generate_function_code(gfc_namespace*)
    /home/jweil/gcc49/trunk/gcc/fortran/trans-decl.c:5605
0x5de510 translate_all_program_units
    /home/jweil/gcc49/trunk/gcc/fortran/parse.c:4536
0x5de510 gfc_parse_file()
    /home/jweil/gcc49/trunk/gcc/fortran/parse.c:4733
0x61adb5 gfc_be_parse_file
    /home/jweil/gcc49/trunk/gcc/fortran/f95-lang.c:188