|
|
Boost-Commit : |
From: john_at_[hidden]
Date: 2007-10-27 07:32:31
Author: johnmaddock
Date: 2007-10-27 07:32:30 EDT (Sat, 27 Oct 2007)
New Revision: 40500
URL: http://svn.boost.org/trac/boost/changeset/40500
Log:
Set expected error limits for HP Tru64.
Prevent very extreme-value round-trip tests from being run.
Text files modified:
trunk/libs/math/test/test_bessel_j.cpp | 18 +++++++++++++++++-
trunk/libs/math/test/test_bessel_y.cpp | 17 +++++++++++++++++
trunk/libs/math/test/test_gamma.cpp | 10 ++++++++++
trunk/libs/math/test/test_ibeta.cpp | 10 ++++++++++
trunk/libs/math/test/test_ibeta_inv.cpp | 4 ++--
trunk/libs/math/test/test_ibeta_inv_ab.cpp | 4 ++--
trunk/libs/math/test/test_igamma_inv.cpp | 2 +-
trunk/libs/math/test/test_igamma_inva.cpp | 2 +-
trunk/libs/math/test/test_roots.cpp | 2 +-
9 files changed, 61 insertions(+), 8 deletions(-)
Modified: trunk/libs/math/test/test_bessel_j.cpp
==============================================================================
--- trunk/libs/math/test/test_bessel_j.cpp (original)
+++ trunk/libs/math/test/test_bessel_j.cpp 2007-10-27 07:32:30 EDT (Sat, 27 Oct 2007)
@@ -88,7 +88,23 @@
largest_type, // test type(s)
".*J.*Tricky.*", // test data group
".*", 3000, 500); // test function
-
+ //
+ // HP Tru64:
+ //
+ add_expected_result(
+ ".*Tru64.*", // compiler
+ ".*", // stdlib
+ ".*", // platform
+ "double", // test type(s)
+ ".*Tricky.*", // test data group
+ ".*", 100000, 100000); // test function
+ add_expected_result(
+ ".*Tru64.*", // compiler
+ ".*", // stdlib
+ ".*", // platform
+ largest_type, // test type(s)
+ ".*Tricky large.*", // test data group
+ ".*", 3000, 1000); // test function
//
// Mac OS X:
//
Modified: trunk/libs/math/test/test_bessel_y.cpp
==============================================================================
--- trunk/libs/math/test/test_bessel_y.cpp (original)
+++ trunk/libs/math/test/test_bessel_y.cpp 2007-10-27 07:32:30 EDT (Sat, 27 Oct 2007)
@@ -75,6 +75,23 @@
largest_type, // test type(s)
".*Y[01Nv].*", // test data group
".*", 400, 200); // test function
+ //
+ // Tru64:
+ //
+ add_expected_result(
+ ".*Tru64.*", // compiler
+ ".*", // stdlib
+ ".*", // platform
+ largest_type, // test type(s)
+ ".*(Y[nv]|y).*Random.*", // test data group
+ ".*", 30000, 30000); // test function
+ add_expected_result(
+ ".*Tru64.*", // compiler
+ ".*", // stdlib
+ ".*", // platform
+ largest_type, // test type(s)
+ ".*Y[01Nv].*", // test data group
+ ".*", 400, 200); // test function
//
// Mac OS X rates are very slightly higher:
Modified: trunk/libs/math/test/test_gamma.cpp
==============================================================================
--- trunk/libs/math/test/test_gamma.cpp (original)
+++ trunk/libs/math/test/test_gamma.cpp 2007-10-27 07:32:30 EDT (Sat, 27 Oct 2007)
@@ -175,6 +175,16 @@
"tgamma1pm1.*", // test data group
"boost::math::tgamma1pm1", 200, 80); // test function
//
+ // Tru64:
+ //
+ add_expected_result(
+ ".*Tru64.*", // compiler
+ ".*", // stdlib
+ ".*", // platform
+ "real_concept", // test type(s)
+ "factorials", // test data group
+ "boost::math::lgamma", 50, 20); // test function
+ //
// Sun OS:
//
add_expected_result(
Modified: trunk/libs/math/test/test_ibeta.cpp
==============================================================================
--- trunk/libs/math/test/test_ibeta.cpp (original)
+++ trunk/libs/math/test/test_ibeta.cpp 2007-10-27 07:32:30 EDT (Sat, 27 Oct 2007)
@@ -140,6 +140,16 @@
"(?i).*large.*", // test data group
".*", 200000, 10000); // test function
//
+ // Tru64:
+ //
+ add_expected_result(
+ ".*Tru64.*", // compiler
+ ".*", // stdlib
+ ".*", // platform
+ largest_type, // test type(s)
+ "(?i).*large.*", // test data group
+ ".*", 100000, 10000); // test function
+ //
// Sun OS:
//
add_expected_result(
Modified: trunk/libs/math/test/test_ibeta_inv.cpp
==============================================================================
--- trunk/libs/math/test/test_ibeta_inv.cpp (original)
+++ trunk/libs/math/test/test_ibeta_inv.cpp 2007-10-27 07:32:30 EDT (Sat, 27 Oct 2007)
@@ -187,7 +187,7 @@
//
if(data[i][5] == 0)
BOOST_CHECK_EQUAL(boost::math::ibeta_inv(data[i][0], data[i][1], data[i][5]), value_type(0));
- else if((1 - data[i][5] > 0.001) && (fabs(data[i][5]) >= boost::math::tools::min_value<value_type>()))
+ else if((1 - data[i][5] > 0.001) && (fabs(data[i][5]) >= boost::math::tools::min_value<value_type>()) && (fabs(data[i][5]) >= boost::math::tools::min_value<double>()))
{
value_type inv = boost::math::ibeta_inv(data[i][0], data[i][1], data[i][5]);
BOOST_CHECK_CLOSE(data[i][2], inv, precision);
@@ -197,7 +197,7 @@
if(data[i][6] == 0)
BOOST_CHECK_EQUAL(boost::math::ibetac_inv(data[i][0], data[i][1], data[i][6]), value_type(1));
- else if((1 - data[i][6] > 0.001) && (fabs(data[i][6]) >= boost::math::tools::min_value<value_type>()))
+ else if((1 - data[i][6] > 0.001) && (fabs(data[i][6]) >= boost::math::tools::min_value<value_type>()) && (fabs(data[i][6]) >= boost::math::tools::min_value<double>()))
{
value_type inv = boost::math::ibetac_inv(data[i][0], data[i][1], data[i][6]);
BOOST_CHECK_CLOSE(data[i][2], inv, precision);
Modified: trunk/libs/math/test/test_ibeta_inv_ab.cpp
==============================================================================
--- trunk/libs/math/test/test_ibeta_inv_ab.cpp (original)
+++ trunk/libs/math/test/test_ibeta_inv_ab.cpp 2007-10-27 07:32:30 EDT (Sat, 27 Oct 2007)
@@ -137,7 +137,7 @@
BOOST_CHECK_EQUAL(boost::math::ibeta_inva(data[i][1], data[i][2], data[i][5]), boost::math::tools::max_value<value_type>());
BOOST_CHECK_EQUAL(boost::math::ibeta_invb(data[i][0], data[i][2], data[i][5]), boost::math::tools::min_value<value_type>());
}
- else if((1 - data[i][5] > 0.001) && (fabs(data[i][5]) >= boost::math::tools::min_value<value_type>()))
+ else if((1 - data[i][5] > 0.001) && (fabs(data[i][5]) >= boost::math::tools::min_value<value_type>()) && (fabs(data[i][5]) >= boost::math::tools::min_value<double>()))
{
value_type inv = boost::math::ibeta_inva(data[i][1], data[i][2], data[i][5]);
BOOST_CHECK_CLOSE(data[i][0], inv, precision);
@@ -155,7 +155,7 @@
BOOST_CHECK_EQUAL(boost::math::ibetac_inva(data[i][1], data[i][2], data[i][6]), boost::math::tools::min_value<value_type>());
BOOST_CHECK_EQUAL(boost::math::ibetac_invb(data[i][0], data[i][2], data[i][6]), boost::math::tools::max_value<value_type>());
}
- else if((1 - data[i][6] > 0.001) && (fabs(data[i][6]) >= boost::math::tools::min_value<value_type>()))
+ else if((1 - data[i][6] > 0.001) && (fabs(data[i][6]) >= boost::math::tools::min_value<value_type>()) && (fabs(data[i][6]) >= boost::math::tools::min_value<double>()))
{
value_type inv = boost::math::ibetac_inva(data[i][1], data[i][2], data[i][6]);
BOOST_CHECK_CLOSE(data[i][0], inv, precision);
Modified: trunk/libs/math/test/test_igamma_inv.cpp
==============================================================================
--- trunk/libs/math/test/test_igamma_inv.cpp (original)
+++ trunk/libs/math/test/test_igamma_inv.cpp 2007-10-27 07:32:30 EDT (Sat, 27 Oct 2007)
@@ -222,7 +222,7 @@
//
if(data[i][5] == 0)
BOOST_CHECK_EQUAL(boost::math::gamma_p_inv(data[i][0], data[i][5]), value_type(0));
- else if((1 - data[i][5] > 0.001) && (fabs(data[i][5]) >= boost::math::tools::min_value<value_type>()))
+ else if((1 - data[i][5] > 0.001) && (fabs(data[i][5]) >= boost::math::tools::min_value<value_type>()) && (fabs(data[i][5]) >= boost::math::tools::min_value<double>()))
{
value_type inv = boost::math::gamma_p_inv(data[i][0], data[i][5]);
BOOST_CHECK_CLOSE(data[i][1], inv, precision);
Modified: trunk/libs/math/test/test_igamma_inva.cpp
==============================================================================
--- trunk/libs/math/test/test_igamma_inva.cpp (original)
+++ trunk/libs/math/test/test_igamma_inva.cpp 2007-10-27 07:32:30 EDT (Sat, 27 Oct 2007)
@@ -165,7 +165,7 @@
if(data[i][3] == 0)
BOOST_CHECK_EQUAL(boost::math::gamma_q_inva(data[i][1], data[i][3]), boost::math::tools::min_value<value_type>());
- else if((1 - data[i][3] > 0.001) && (fabs(data[i][3]) >= boost::math::tools::min_value<value_type>()))
+ else if((1 - data[i][3] > 0.001) && (fabs(data[i][3]) >= boost::math::tools::min_value<value_type>()) && (fabs(data[i][3]) >= boost::math::tools::min_value<double>()))
{
value_type inv = boost::math::gamma_q_inva(data[i][1], data[i][3]);
BOOST_CHECK_CLOSE(data[i][0], inv, precision);
Modified: trunk/libs/math/test/test_roots.cpp
==============================================================================
--- trunk/libs/math/test/test_roots.cpp (original)
+++ trunk/libs/math/test/test_roots.cpp 2007-10-27 07:32:30 EDT (Sat, 27 Oct 2007)
@@ -244,7 +244,7 @@
BOOST_CHECK_EQUAL(inverse_ibeta_newton(data[i][0], data[i][1], data[i][5]), value_type(0));
BOOST_CHECK_EQUAL(inverse_ibeta_bisect(data[i][0], data[i][1], data[i][5]), value_type(0));
}
- else if((1 - data[i][5] > 0.001) && (fabs(data[i][5]) >= boost::math::tools::min_value<value_type>()))
+ else if((1 - data[i][5] > 0.001) && (fabs(data[i][5]) >= boost::math::tools::min_value<value_type>()) && (fabs(data[i][5]) >= boost::math::tools::min_value<double>()))
{
value_type inv = inverse_ibeta_halley(data[i][0], data[i][1], data[i][5]);
BOOST_CHECK_CLOSE(data[i][2], inv, precision);
Boost-Commit list run by bdawes at acm.org, david.abrahams at rcn.com, gregod at cs.rpi.edu, cpdaniel at pacbell.net, john at johnmaddock.co.uk