[macruby-changes] [1718] MacRuby/branches/experimental/bignum.c

[source_changes at macosforge.org]

Revision: 1718
          http://trac.macosforge.org/projects/ruby/changeset/1718
Author:   lsansonetti at apple.com
Date:     2009-06-03 20:36:50 -0700 (Wed, 03 Jun 2009)
Log Message:
-----------
fixed Bignum#+

Modified Paths:
--------------
    MacRuby/branches/experimental/bignum.c

Modified: MacRuby/branches/experimental/bignum.c
===================================================================
--- MacRuby/branches/experimental/bignum.c	2009-06-04 03:36:28 UTC (rev 1717)
+++ MacRuby/branches/experimental/bignum.c	2009-06-04 03:36:50 UTC (rev 1718)
@@ -1503,8 +1503,8 @@
  *  Adds big and other, returning the result.
  */
 
-VALUE
-rb_big_plus(VALUE x, VALUE y)
+static VALUE
+rb_big_plus_imp(VALUE x, SEL sel, VALUE y)
 {
     switch (TYPE(y)) {
       case T_FIXNUM:
@@ -1521,6 +1521,12 @@
     }
 }
 
+VALUE
+rb_big_plus(VALUE x, VALUE y)
+{
+    return rb_big_plus_imp(x, 0, y);
+}
+
 /*
  *  call-seq:
  *     big - other  => Numeric
@@ -2816,7 +2822,7 @@
     rb_objc_define_method(rb_cBignum, "to_s", rb_big_to_s, -1);
     rb_objc_define_method(rb_cBignum, "coerce", rb_big_coerce, 1);
     rb_objc_define_method(rb_cBignum, "-@", rb_big_uminus, 0);
-    rb_objc_define_method(rb_cBignum, "+", rb_big_plus, 1);
+    rb_objc_define_method(rb_cBignum, "+", rb_big_plus_imp, 1);
     rb_objc_define_method(rb_cBignum, "-", rb_big_minus_imp, 1);
     rb_objc_define_method(rb_cBignum, "*", rb_big_mul_imp, 1);
     rb_objc_define_method(rb_cBignum, "/", rb_big_div_imp, 1);
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macruby-changes/attachments/20090603/28b23b42/attachment.html>