[Bug fortran/91589] New: [9/10 Regression] ICE in gfc_conv_component_ref, at fortran/trans-expr.c:2447

[gscfq@t-online.de]

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

            Bug ID: 91589
           Summary: [9/10 Regression] ICE in gfc_conv_component_ref, at
                    fortran/trans-expr.c:2447
           Product: gcc
           Version: 10.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

Changed between 20181028 and 20181104 :


$ cat z1.f90
program p
   type t
      integer :: a
   end type
   type(t) :: x = t(1)
   call sub (x%a%a)
end


$ gfortran-9-20181028 -c z1.f90
z1.f90:6:16:

    6 |    call sub (x%a%a)
      |                1
Error: Syntax error in argument list at (1)


$ gfortran-10-20190825 -c z1.f90
z1.f90:6:0:

    6 |    call sub (x%a%a)
      |
internal compiler error: tree check: expected record_type or union_type or
qual_union_type, have integer_type in gfc_conv_component_ref, at
fortran/trans-expr.c:2443
0x5defd6 tree_check_failed(tree_node const*, char const*, int, char const*,
...)
        ../../gcc/tree.c:9925
0x72987c tree_check3(tree_node*, char const*, int, char const*, tree_code,
tree_code, tree_code)
        ../../gcc/tree.h:3303
0x72987c gfc_conv_component_ref
        ../../gcc/fortran/trans-expr.c:2443
0x73a89b gfc_conv_variable
        ../../gcc/fortran/trans-expr.c:2811
0x73561a gfc_conv_expr(gfc_se*, gfc_expr*)
        ../../gcc/fortran/trans-expr.c:8595
0x73f55a gfc_conv_expr_reference(gfc_se*, gfc_expr*, bool)
        ../../gcc/fortran/trans-expr.c:8695
0x731711 gfc_conv_procedure_call(gfc_se*, gfc_symbol*, gfc_actual_arglist*,
gfc_expr*, vec<tree_node*, va_gc, vl_embed>*)
        ../../gcc/fortran/trans-expr.c:5845
0x782c9a gfc_trans_call(gfc_code*, bool, tree_node*, tree_node*, bool)
        ../../gcc/fortran/trans-stmt.c:406
0x6eeb44 trans_code
        ../../gcc/fortran/trans.c:1920
0x7252dd gfc_generate_function_code(gfc_namespace*)
        ../../gcc/fortran/trans-decl.c:6779
0x6a093e translate_all_program_units
        ../../gcc/fortran/parse.c:6134
0x6a093e gfc_parse_file()
        ../../gcc/fortran/parse.c:6373
0x6eabff gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:204