godzil/ack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

speeded up a bit for converting 0.0 to string

Browse Source
This commit is contained in:
ceriel
1989-11-27 17:25:55 +00:00
parent b91af798bc
commit 862f83571f
4 changed files with 47 additions and 34 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
modules/src/flt_arith/flt_str2fl.c
View File

@@ -347,7 +347,7 @@ flt_ecvt(e, ndigit, decpt, sign)
(*decpt)++; /* because now value in [1.0, 10.0) */
}
while (p <= pe) {
if (e->flt_exp >= 0) {
if (e->flt_exp >= 0 && e->m1 != 0) {
flt_arith x;
x.m2 = 0; x.flt_exp = e->flt_exp;
@@ -355,8 +355,10 @@ flt_ecvt(e, ndigit, decpt, sign)
x.m1 = (e->m1 >> 1) & 0x7FFFFFFF;
x.m1 = x.m1>>(30-e->flt_exp);
*p++ = (x.m1) + '0';
x.m1 = x.m1 << (31-e->flt_exp);
flt_add(e, &x, e);
if (x.m1) {
x.m1 = x.m1 << (31-e->flt_exp);
flt_add(e, &x, e);
}
}
else *p++ = '0';
flt_mul(e, &s10pow[1], e);