allow for three digits in exponent

This commit is contained in:
ceriel 1988-07-01 11:56:08 +00:00
parent 6ade1e3215
commit c2af3d7faa

View file

@ -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);