[ruby-dev:2172] Re: [Proposal] Math#min/Math#max

前田です。

In message "[ruby-dev:2133] Re: [Proposal] Math#min/Math#max"
Shugo Maeda <[e-mail]> wrote:

|Javaだとdoubleの引数を二つ取るメソッドなのですが、せっかくRuby
|で可変引数を使えるので、enum_{min|max}を使ったのですが、確かに
|Mathではないですよね...。
|Need_Floatを使って数値のみの比較をするメソッドにすれば良いでしょうか。

試しに実装してみました。
でもこれだとMath::min(1,2)は1.0になりますね。
その方がMathのメソッドらしいのかな。

速度は思ったほど速くないみたいです。
Need_FloatでFloatのインスタンスを生成しているからでしょうか。
# NUM2DBLで速くなるかと思ったのですが、NUM2DBLはrb_Floatを
# 呼んでいるのですね。

-- 
前田 修吾

--- math.c.orig	Tue Apr  7 00:17:54 1998
+++ math.c	Tue Apr  7 21:20:32 1998
@@ -114,6 +114,48 @@
     return float_new(d = ldexp(RFLOAT(x)->value, NUM2INT(n)));
 }
 
+static VALUE
+math_min(argc, argv, obj)
+    int argc;
+    VALUE *argv, obj;
+{
+    int i;
+    VALUE min = Qnil;
+
+    for (i = 0; i < argc; i++) {
+	Need_Float(argv[i]);
+	if (NIL_P(min)) {
+	    min = argv[i];
+	}
+	else {
+	    if (RFLOAT(argv[i])->value < RFLOAT(min)->value)
+		min = argv[i];
+	}
+    }
+    return min;
+}
+
+static VALUE
+math_max(argc, argv, obj)
+    int argc;
+    VALUE *argv, obj;
+{
+    int i;
+    VALUE max = Qnil;
+
+    for (i = 0; i < argc; i++) {
+	Need_Float(argv[i]);
+	if (NIL_P(max)) {
+	    max = argv[i];
+	}
+	else {
+	    if (RFLOAT(argv[i])->value > RFLOAT(max)->value)
+		max = argv[i];
+	}
+    }
+    return max;
+}
+
 void
 Init_Math()
 {
@@ -143,4 +185,7 @@
 
     rb_define_module_function(mMath, "frexp", math_frexp, 1);
     rb_define_module_function(mMath, "ldexp", math_ldexp, 2);
+
+    rb_define_module_function(mMath, "max", math_max, -1);
+    rb_define_module_function(mMath, "min", math_min, -1);
 }