From 7a3f794da0fbfacb99c0721271990d39c9885928 Mon Sep 17 00:00:00 2001 From: odaira Date: Wed, 27 Apr 2016 20:00:57 +0000 Subject: * configure.in (rb_cv_lgamma_r_pm0): check if lgamma_r(+0.0) returns positive infinity, in addition to lgamma_r(-0.0). AIX returns an incorrect result of negative infinity. * math.c (ruby_lgamma_r): handle +0.0, in addition to -0.0. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@54803 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- configure.in | 18 ++++++++++++------ 1 file changed, 12 insertions(+), 6 deletions(-) (limited to 'configure.in') diff --git a/configure.in b/configure.in index 292e40ce1a..1042b0329c 100644 --- a/configure.in +++ b/configure.in @@ -2503,7 +2503,7 @@ main(int argc, char **argv) AS_IF([test "x$rb_cv_atan2_inf_c99" = xyes], [AC_DEFINE(ATAN2_INF_C99)]) AS_IF([test "x$ac_cv_func_lgamma_r" = xyes], [ - AC_CACHE_CHECK(whether lgamma_r handles -0.0, rb_cv_lgamma_r_m0, [ + AC_CACHE_CHECK(whether lgamma_r handles +0.0 and -0.0, rb_cv_lgamma_r_pm0, [ AC_TRY_RUN([ @%:@include @%:@ifdef HAVE_UNISTD_H @@ -2519,22 +2519,28 @@ AS_IF([test "x$ac_cv_func_lgamma_r" = xyes], [ int main(int argc, char **argv) { - int sign; + int sign = 0; double x = lgamma_r(-0.0, &sign); /* should be [+inf, -1] */ if (x <= 0) return EXIT_FAILURE; if (!isinf(x)) return EXIT_FAILURE; if (sign != -1) return EXIT_FAILURE; + + /* should be [+inf, 1] */ + x = lgamma_r(+0.0, &sign); + if (x <= 0) return EXIT_FAILURE; + if (!isinf(x)) return EXIT_FAILURE; + if (sign != 1) return EXIT_FAILURE; return EXIT_SUCCESS; } ], - [rb_cv_lgamma_r_m0=yes], - [rb_cv_lgamma_r_m0=no], - [rb_cv_lgamma_r_m0=yes] + [rb_cv_lgamma_r_pm0=yes], + [rb_cv_lgamma_r_pm0=no], + [rb_cv_lgamma_r_pm0=yes] ) ]) - AS_IF([test "x$rb_cv_lgamma_r_m0" = xno], [AC_DEFINE(LGAMMA_R_M0_FIX)]) + AS_IF([test "x$rb_cv_lgamma_r_pm0" = xno], [AC_DEFINE(LGAMMA_R_PM0_FIX)]) ]) # Some platform need -lrt for clock_gettime, but the other don't. -- cgit v1.2.3