* Promoted precision in Float->String transformations.
git-svn-id: svn://svn.zoy.org/elk/trunk@178 55e467fa-43c5-0310-a8a2-de718669efc6
This commit is contained in:
parent
c4fbd1b8f2
commit
ab40058bed
|
@ -105,10 +105,10 @@ Object Fixnum_To_String (Object x, int radix) {
|
|||
}
|
||||
|
||||
char *Flonum_To_String (Object x) {
|
||||
static char buf[32];
|
||||
static char buf[64];
|
||||
char *p;
|
||||
|
||||
sprintf (buf, "%.15g", FLONUM(x)->val);
|
||||
sprintf (buf, "%.31g", FLONUM(x)->val);
|
||||
for (p = buf; *p; p++)
|
||||
if (*p == '.' || *p == 'e' || *p == 'N' || *p == 'i')
|
||||
return buf;
|
||||
|
|
Loading…
Reference in New Issue