Message ID | 20220104134126.GE2646553@tucnak |
---|---|
State | New |
Headers | show |
Series | [power-ieee128] libgfortran: -mabi=ieeelongdouble I/O fix | expand |
On 04.01.22 14:41, Jakub Jelinek via Fortran wrote:
> Ok for power-ieee128?
OK.
--- libgfortran/io/write_float.def.jj 2022-01-04 10:27:56.528323600 +0000 +++ libgfortran/io/write_float.def 2022-01-04 13:09:51.751534884 +0000 @@ -799,6 +799,10 @@ CALCULATE_EXP(10) #ifdef HAVE_GFC_REAL_16 CALCULATE_EXP(16) #endif + +#ifdef HAVE_GFC_REAL_17 +CALCULATE_EXP(17) +#endif #undef CALCULATE_EXP @@ -942,7 +946,7 @@ determine_en_precision (st_parameter_dt #endif #ifdef HAVE_GFC_REAL_17 case 17: - EN_PREC(16,Q) + EN_PREC(17,Q) #endif break; default: @@ -1150,7 +1154,7 @@ get_float_string (st_parameter_dt *dtp, #endif #ifdef HAVE_GFC_REAL_17 case 17: - FORMAT_FLOAT(16,Q) + FORMAT_FLOAT(17,Q) break; #endif default: