gered/picoc
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Fixed a couple of problems with floating point number printing.

Browse source 
Numbers outside the range 0 - 1e7 wouldn't print correct values.


git-svn-id: http://picoc.googlecode.com/svn/trunk@356 21eae674-98b7-11dd-bd71-f92a316d2d60
This commit is contained in:
zik.saleeba 2009-10-29 21:43:36 +00:00
parent 172e6e5e8b
commit b7eb4bee92
2 changed files with 8 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
clibrary.c
View file

@ -1,3 +1,5 @@
#include <math.h>
#include "picoc.h" #include "picoc.h"
struct OutputStream CStdOut; struct OutputStream CStdOut;
@ -128,17 +130,17 @@ void PrintFP(double Num, struct OutputStream *Stream)
} }
if (Num >= 1e7) if (Num >= 1e7)
Exponent = math_log(Num) / LOG10E; Exponent = math_log10(Num);
else if (Num <= 1e-7 && Num != 0.0) else if (Num <= 1e-7 && Num != 0.0)
Exponent = math_log(Num) / LOG10E - 0.999999999; Exponent = math_log10(Num) - 0.999999999;
Num /= math_pow(10.0, Exponent); Num /= math_pow(10.0, Exponent);
PrintInt((int)Num, 0, FALSE, FALSE, Stream); PrintInt((int)Num, 0, FALSE, FALSE, Stream);
PrintCh('.', Stream); PrintCh('.', Stream);
Num = (Num - (int)Num) * 10; Num = (Num - (int)Num) * 10;
if (abs(Num) >= 1e-7) if (math_abs(Num) >= 1e-7)
{ {
for (MaxDecimal = 6; MaxDecimal > 0 && abs(Num) >= 1e-7; Num = (Num - (int)(Num + 1e-7)) * 10, MaxDecimal--) for (MaxDecimal = 6; MaxDecimal > 0 && math_abs(Num) >= 1e-7; Num = (Num - (int)(Num + 1e-7)) * 10, MaxDecimal--)
PrintCh('0' + (int)(Num + 1e-7), Stream); PrintCh('0' + (int)(Num + 1e-7), Stream);
} }
else else

1
platform.h
View file

@ -113,6 +113,7 @@ extern int ExitBuf[];
#endif #endif
#define math_abs(x) (((x) < 0) ? (-(x)) : (x))
#ifdef NEED_MATH_LIBRARY #ifdef NEED_MATH_LIBRARY
extern double math_sin(double x); extern double math_sin(double x);
extern double math_cos(double x); extern double math_cos(double x);