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

when printing floats in "e"-format, trailing zeros are significant!

Browse source
This commit is contained in:
ceriel 1987-02-11 12:47:45 +00:00
parent 0f49b18986
commit f18da9078c
1 changed files with 16 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

26
lang/basic/lib/print.c
View file

@ -31,25 +31,31 @@ _str(f,buffer)
double f; double f;
char *buffer; char *buffer;
{ {
char *c; register char *c = buffer;
c= buffer; int eformat = 0;
if( f>=0){ if( f>=0){
if( f> 1.0e8) if( f> 1.0e8) {
eformat = 1;
sprintf(buffer," %e",f); sprintf(buffer," %e",f);
}
else sprintf(buffer," %f",f); else sprintf(buffer," %f",f);
c++; c++;
}else { }else {
if(-f> 1.0e8) if(-f> 1.0e8) {
eformat = 1;
sprintf(buffer,"-%e",-f); sprintf(buffer,"-%e",-f);
}
else sprintf(buffer,"-%f",-f); else sprintf(buffer,"-%f",-f);
} }
for( ; *c && *c!= ' ';c++) ; if (! eformat) {
c--; for( ; *c && *c!= ' ';c++) ;
while( c>buffer && *c== '0') c--;
{ while( c>buffer && *c== '0')
*c= 0;c--; {
*c= 0;c--;
}
if( *c=='.') *c=0;
} }
if( *c=='.') *c=0;
strcat(buffer," "); strcat(buffer," ");
} }
_prfnum(f) _prfnum(f)