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

bug fix

Browse source
This commit is contained in:
ceriel 1987-02-06 14:50:57 +00:00
parent 77f33b6762
commit 254364ca11
1 changed files with 8 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
lang/cem/libcc/gen/ecvt.c
View file

@ -61,13 +61,15 @@ cvt(value, ndigit, decpt, sign, ecvtflag)
pb = buf;
while (pe > buf1) *pb++ = *--pe;
}
else if (value > 0) {
fractpart = value;
while ((value = value*10) < 1) {
fractpart = value;
pointpos--;
}
else {
pb = &buf[0];
if (value > 0) {
fractpart = value;
while ((value = value*10) < 1) {
fractpart = value;
pointpos--;
}
}
}
pe = &buf[ndigit];
if (! ecvtflag) {