Committed to trunk and 5-bracnh after testing. 2015-12-05 Juoko Orava <jouko.or...@iki.fi>
PR fortran/50201 * io/write_float.def: Avoid marking quadmath_snprintf as an untyped weak reference, which fixing linking with -static. -- Steve
Index: libgfortran/io/write_float.def =================================================================== --- libgfortran/io/write_float.def (revision 231314) +++ libgfortran/io/write_float.def (working copy) @@ -938,7 +938,7 @@ snprintf (buffer, size, "%+-#.*Le", (pre #if defined(GFC_REAL_16_IS_FLOAT128) #define DTOA2Q(prec,val) \ -__qmath_(quadmath_snprintf) (buffer, size, "%+-#.*Qe", (prec), (val)) +quadmath_snprintf (buffer, size, "%+-#.*Qe", (prec), (val)) #endif #define FDTOA(suff,prec,val) TOKENPASTE(FDTOA2,suff)(prec,val) @@ -953,7 +953,7 @@ snprintf (buffer, size, "%+-#.*Lf", (pre #if defined(GFC_REAL_16_IS_FLOAT128) #define FDTOA2Q(prec,val) \ -__qmath_(quadmath_snprintf) (buffer, size, "%+-#.*Qf", \ +quadmath_snprintf (buffer, size, "%+-#.*Qf", \ (prec), (val)) #endif