SIGFIGS
bufsize = (ndigits > 0) ? ndigits : SIGFIGS;
for (ndigits = SIGFIGS; s0[ndigits - 1] == '0'; ndigits--)
bufsize = (ndigits > 0) ? ndigits : SIGFIGS;
for (ndigits = SIGFIGS; s0[ndigits - 1] == '0'; ndigits--)