diff mbox

[committed] PR fortran/50201 -- quadmath_snprintf isn't weak

Message ID 20151205233613.GA86703@troutmask.apl.washington.edu
State New
Headers show

Commit Message

Steve Kargl Dec. 5, 2015, 11:36 p.m. UTC
Committed to trunk and 5-bracnh after testing.

2015-12-05  Juoko Orava <jouko.orava@iki.fi>

    PR fortran/50201
    * io/write_float.def: Avoid marking quadmath_snprintf as an untyped
    weak reference, which fixing linking with -static.
diff mbox

Patch

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