allow for three digits in exponent

diff --git a/lang/cem/libcc/stdio/fltpr.c b/lang/cem/libcc/stdio/fltpr.c
index fbfdaa7..7d45a2f 100644 (file)
--- a/lang/cem/libcc/stdio/fltpr.c
+++ b/lang/cem/libcc/stdio/fltpr.c
@@ -57,6 +57,10 @@ char *_pscien(r,s,n,b) float r; register char *s; {
        } else {
                *s++ = '+' ;
        }
+       if (dp >= 100) {
+               *s++ = '0' + (dp / 100);
+               dp %= 100;
+       }
        *s++ = '0' + (dp/10);
        *s++ = '0' + (dp%10);
        return(s);