From 254364ca11a9e3b499cb2d20b9abf15483e71ef8 Mon Sep 17 00:00:00 2001 From: ceriel Date: Fri, 6 Feb 1987 14:50:57 +0000 Subject: [PATCH] bug fix --- lang/cem/libcc/gen/ecvt.c | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) diff --git a/lang/cem/libcc/gen/ecvt.c b/lang/cem/libcc/gen/ecvt.c index 478d54238..3d5147670 100644 --- a/lang/cem/libcc/gen/ecvt.c +++ b/lang/cem/libcc/gen/ecvt.c @@ -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) { + else { + pb = &buf[0]; + if (value > 0) { fractpart = value; - pointpos--; + while ((value = value*10) < 1) { + fractpart = value; + pointpos--; + } } - pb = &buf[0]; } pe = &buf[ndigit]; if (! ecvtflag) { -- 2.34.1