X-Git-Url: https://git.ucc.asn.au/?p=ipdf%2Fcode.git;a=blobdiff_plain;f=src%2Ftests%2Frealops.cpp;h=dd45aa8dbd58a36f27bdaae9ff6bdc100144808b;hp=61d747cb13e29e672c6d366203e325b2964d3c7f;hb=1d179b93f6a1b2a4fe3823c26fba862c24bc5d6e;hpb=11724d8d8161e2c02e9278aed0e765de3ca436b4 diff --git a/src/tests/realops.cpp b/src/tests/realops.cpp index 61d747c..dd45aa8 100644 --- a/src/tests/realops.cpp +++ b/src/tests/realops.cpp @@ -12,7 +12,7 @@ using namespace IPDF; static double g_totalerror = 0; -bool NotEqual(double a, double b, double threshold=1e-1) +bool NotEqual(double a, double b, double threshold=1e-4) { double error = fabs(a-b); g_totalerror += error; @@ -22,6 +22,7 @@ bool NotEqual(double a, double b, double threshold=1e-1) int main(int argc, char ** argv) { srand(time(NULL)); + DebugRealInfo(); unsigned failures = 0; for (unsigned i = 0; i < TEST_CASES; ++i) @@ -115,7 +116,18 @@ int main(int argc, char ** argv) { failures++; Warn("a /= b = %f should be %f, a before op was %f", Double(a), da, Double(abeforeop)); + } + if (NotEqual(Double(a*0.0 + 1.0), da*0.0 + 1.0)) + { + failures++; + Warn("a * 0 = %f should be %f, a before op was %f", Double(a), da, Double(abeforeop)); } + + if (NotEqual(Double(a=b), da=db)) + { + failures++; + Warn("a = b = %f should be %f, a before op was %f", Double(a), da, Double(abeforeop)); + } if (failures > old_failures) {