[Bug fortran/88227] New: ICE in gfc_convert_boz, at fortran/target-memory.c:788

[gscfq@t-online.de]

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

            Bug ID: 88227
           Summary: ICE in gfc_convert_boz, at fortran/target-memory.c:788
           Product: gcc
           Version: 9.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

With -m32 down to at least gfortran-5 :


$ cat z1.f90
program p
   print *, dble(b'1010101001101')
end


$ cat z2.f90
program p
   print *, real(b'1010101001101')
end


$ gfortran-9-20181125 -m32 -fdefault-real-8 -c z2.f90
$ gfortran-9-20181125 -m64 -fdefault-real-8 -c z1.f90
$
$ gfortran-9-20181125 -m32 -fdefault-real-8 -c z1.f90
f951: internal compiler error: Segmentation fault
0xb2bcff crash_signal
        ../../gcc/toplev.c:326
0x6b1ba9 mode_to_bytes(machine_mode)
        ../../gcc/machmode.h:520
0x6b1ba9 if_nonpoly<scalar_int_mode::measurement_type,
scalar_int_mode::measurement_type,
poly_int_traits<scalar_int_mode::measurement_type>::is_poly>::type
GET_MODE_SIZE<scalar_int_mode>(scalar_int_mode const&)
        ../../gcc/machmode.h:617
0x6b1ba9 size_integer
        ../../gcc/fortran/target-memory.c:42
0x6b2ffc gfc_convert_boz(gfc_expr*, gfc_typespec*)
        ../../gcc/fortran/target-memory.c:788
0x69cb60 convert_boz
        ../../gcc/fortran/simplify.c:226
0x6a88a3 gfc_simplify_dble(gfc_expr*)
        ../../gcc/fortran/simplify.c:2222
0x62dedf do_simplify
        ../../gcc/fortran/intrinsic.c:4480
0x6385be gfc_intrinsic_func_interface(gfc_expr*, int)
        ../../gcc/fortran/intrinsic.c:4875
0x68f961 resolve_unknown_f
        ../../gcc/fortran/resolve.c:2875
0x68f961 resolve_function
        ../../gcc/fortran/resolve.c:3213
0x68c1cd gfc_resolve_expr(gfc_expr*)
        ../../gcc/fortran/resolve.c:6832
0x68420b gfc_resolve_code(gfc_code*, gfc_namespace*)
        ../../gcc/fortran/resolve.c:11262
0x693edf gfc_resolve_blocks(gfc_code*, gfc_namespace*)
        ../../gcc/fortran/resolve.c:10302
0x684399 gfc_resolve_code(gfc_code*, gfc_namespace*)
        ../../gcc/fortran/resolve.c:11252
0x68702f resolve_codes
        ../../gcc/fortran/resolve.c:16704
0x6870fe gfc_resolve(gfc_namespace*)
        ../../gcc/fortran/resolve.c:16739
0x674e87 resolve_all_program_units
        ../../gcc/fortran/parse.c:6064
0x674e87 gfc_parse_file()
        ../../gcc/fortran/parse.c:6314
0x6bdaff gfc_be_parse_file
        ../../gcc/fortran/f95-lang.c:204