https://gcc.gnu.org/bugzilla/show_bug.cgi?id=49627
G. Steinmetz <gs...@t-online.de> changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |gs...@t-online.de
--- Comment #6 from G. Steinmetz <gs...@t-online.de> ---
While pr65757 is solved, this still gives an ICE in my environment
in combination with a variable :
$ cat z1.f90
program test
real(16) :: x = 2466840987.123067e0_16
print *, nint(x, 16)
end
$ gfortran-9-20181021 -c z1.f90
z1.f90:3:0:
3 | print *, nint(x, 16)
|
internal compiler error: in build_round_expr, at fortran/trans-intrinsic.c:396
0x702fec build_round_expr
../../gcc/fortran/trans-intrinsic.c:396
0x702fec build_fix_expr
../../gcc/fortran/trans-intrinsic.c:420
0x7030ca gfc_conv_intrinsic_int
../../gcc/fortran/trans-intrinsic.c:550
0x711947 gfc_conv_intrinsic_function(gfc_se*, gfc_expr*)
../../gcc/fortran/trans-intrinsic.c:9202
0x6f7d04 gfc_conv_function_expr
../../gcc/fortran/trans-expr.c:6864
0x6ec45a gfc_conv_expr(gfc_se*, gfc_expr*)
../../gcc/fortran/trans-expr.c:7998
0x6f1e05 gfc_conv_expr_reference(gfc_se*, gfc_expr*, bool)
../../gcc/fortran/trans-expr.c:8143
0x7182b7 gfc_trans_transfer(gfc_code*)
../../gcc/fortran/trans-io.c:2584
0x6bdbc7 trans_code
../../gcc/fortran/trans.c:2038
0x715dae build_dt
../../gcc/fortran/trans-io.c:2026
0x6bdba7 trans_code
../../gcc/fortran/trans.c:2010
0x6e51c4 gfc_generate_function_code(gfc_namespace*)
../../gcc/fortran/trans-decl.c:6505
0x673426 translate_all_program_units
../../gcc/fortran/parse.c:6125
0x673426 gfc_parse_file()
../../gcc/fortran/parse.c:6328
0x6ba3ff gfc_be_parse_file
../../gcc/fortran/f95-lang.c:204
Works with a parameter/constant instead :
$ cat z2.f90
program test
real(16), parameter :: x = 2466840987.123067e0_16
print *, nint(x, 16)
end
$ gfortran-9-20181021 -static-libgfortran z2.f90
$ a.out
2466840987
