if (log10_function)
if (isfinite (value) && value != 0.0)
weak_extern2 (FLOOR) weak_extern2 (LOG10) weak_extern2 (FABS)intAPPEND (FUNC_PREFIX, ecvt_r) (value, ndigit, decpt, sign, buf, len)     FLOAT_TYPE value;     int ndigit, *decpt, *sign;     char *buf;     size_t len;{  FLOAT_TYPE (*log10_function) (FLOAT_TYPE) = &LOG10;  if (log10_function)    {      /* Use the reasonable code if -lm is included.  */      ndigit -= (int) FLOOR (LOG10 (FABS (value)));      if (ndigit < 0)	ndigit = 0;    }  else    {      /* Slow code that doesn't require -lm functions.  */      FLOAT_TYPE d;      for (d = value < 0.0 ? - value : value;	   ndigit > 0 && d >= 10.0;	   d *= 0.1)	--ndigit;    }  return APPEND (FUNC_PREFIX, fcvt_r) (value, ndigit, decpt, sign, buf, len);}