d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

speeded up a bit for printing 0.0

Browse source
This commit is contained in:
ceriel 1989-11-27 17:29:35 +00:00
parent 862f83571f
commit 86b6eab206
1 changed files with 6 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lang/cem/libcc/gen/ext_comp.c
View file

@ -608,18 +608,20 @@ _ext_str_cvt(e, ndigit, decpt, sign, ecvtflag)
if (pe > &buf[NDIGITS]) pe = &buf[NDIGITS]; if (pe > &buf[NDIGITS]) pe = &buf[NDIGITS];
} }
while (p <= pe) { while (p <= pe) {
if (e->exp >= 0) { if (e->exp >= 0 && e->m1 != 0) {
struct EXTEND x; struct EXTEND x;
x.m2 = 0; x.exp = e->exp; x.m2 = 0; x.exp = e->exp;
x.sign = 1; x.sign = 1;
x.m1 = e->m1>>(31-e->exp); x.m1 = e->m1>>(31-e->exp);
*p++ = (x.m1) + '0'; *p++ = (x.m1) + '0';
x.m1 = x.m1 << (31-e->exp); if (x.m1) {
add_ext(e, &x, e); x.m1 = x.m1 << (31-e->exp);
add_ext(e, &x, e);
}
} }
else *p++ = '0'; else *p++ = '0';
mul_ext(e, &ten_powers[1], e); if (e->m1) mul_ext(e, &ten_powers[1], e);
} }
if (pe >= buf) { if (pe >= buf) {
p = pe; p = pe;