[ruby-dev:32287] Re: round missing (mswin32)

なかだです。

At Wed, 14 Nov 2007 10:03:01 +0900,
pegacorn wrote in [ruby-dev:32284]:
> C言語の話なのかどうかわかりませんが、以下のような話があります。
> 
> 端数処理 - Wikipedia:
> http://ja.wikipedia.org/wiki/%E7%AB%AF%E6%95%B0%E5%87%A6%E7%90%86#.E3.81.9D.E3.81.AE.E4.BB.96.E3.81.AE.E4.B8.B8.E3.82.81.E9.96.A2.E6.95.B0
> > 多くの環境にroundという関数があるが、環境によって動作が異なるので、
> > 使用には注意が必要である。

modf()のほうがいいですかねぇ。


Index: numeric.c
===================================================================
--- numeric.c	(revision 13918)
+++ numeric.c	(working copy)
@@ -70,11 +70,10 @@ round(double x)
     double f;
 
-    if (x > 0.0) {
-	f = floor(x);
-	x = f + (x - f >= 0.5);
-    }
-    else if (x < 0.0) {
-	f = ceil(x);
-	x = f - (f - x >= 0.5);
+    f = modf(x, &x);
+    if (f >= 0.5) {
+	x += 1.0;
+    }
+    else if (f <= -0.5) {
+	x -= 1.0;
     }
     return x;


-- 
--- 僕の前にBugはない。
--- 僕の後ろにBugはできる。
    中田 伸悦