[Bug fortran/82841] New: Segfault in gfc_simplify_transfer

[pault at gcc dot gnu.org]

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

            Bug ID: 82841
           Summary: Segfault in gfc_simplify_transfer
           Product: gcc
           Version: 8.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: pault at gcc dot gnu.org
  Target Milestone: ---

From: https://groups.google.com/forum/#!topic/comp.lang.fortran/NDE6JKTFbNU

   integer, parameter :: N = 2
   character(len=1) :: chr(N)
   chr = transfer(source=repeat("x",ncopies=N), mold=[ character(len=1) :: ],
size=N)
end


[pault@pc30 fortranfan]$ ~/irun/bin/gfortran -static-libgfortran  f*2.f90
f951: internal compiler error: Segmentation fault
0xcb6d8f crash_signal
        ../../trunk/gcc/toplev.c:324
0x791330 gfc_simplify_transfer(gfc_expr*, gfc_expr*, gfc_expr*)
        ../../trunk/gcc/fortran/simplify.c:6589
0x71de22 do_simplify
        ../../trunk/gcc/fortran/intrinsic.c:4407
0x7282b6 gfc_intrinsic_func_interface(gfc_expr*, int)
        ../../trunk/gcc/fortran/intrinsic.c:4777
0x77d11c resolve_unknown_f
        ../../trunk/gcc/fortran/resolve.c:2865
0x77d11c resolve_function
        ../../trunk/gcc/fortran/resolve.c:3174
0x779a1d gfc_resolve_expr(gfc_expr*)
        ../../trunk/gcc/fortran/resolve.c:6702
0x77237f gfc_resolve_code(gfc_code*, gfc_namespace*)
        ../../trunk/gcc/fortran/resolve.c:11060
0x77498f resolve_codes
        ../../trunk/gcc/fortran/resolve.c:16406
0x774a5e gfc_resolve(gfc_namespace*)
        ../../trunk/gcc/fortran/resolve.c:16441
0x763414 resolve_all_program_units
        ../../trunk/gcc/fortran/parse.c:6030
0x763414 gfc_parse_file()
        ../../trunk/gcc/fortran/parse.c:6280
0x7a72ff gfc_be_parse_file
        ../../trunk/gcc/fortran/f95-lang.c:204