From ae4025f3ade3c5c91ebf6ebed30191719419ddf7 Mon Sep 17 00:00:00 2001
From: akr <akr@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 8 Feb 2008 14:53:09 +0000
Subject: * missing/lgamma_r.c (lgamma_r): use smaller argument for sin
 function.

git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@15407 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 missing/lgamma_r.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'missing')

diff --git a/missing/lgamma_r.c b/missing/lgamma_r.c
index 856cc8328..d4402c67b 100644
--- a/missing/lgamma_r.c
+++ b/missing/lgamma_r.c
@@ -56,7 +56,7 @@ lgamma_r(double x, int *signp)
             return 1.0/zero;
         }
         *signp = (fmod(i, 2.0) != 0.0) ? 1 : -1;
-        s = sin(PI * x);
+        s = sin(PI * f);
         if (s < 0) s = -s;
         return LOG_PI - log(s) - loggamma(1 - x);
     }
-- 
cgit