matz	2007-11-16 23:41:11 +0900 (Fri, 16 Nov 2007)

  New Revision: 13950

  Modified files:
    trunk/ChangeLog
    trunk/bignum.c

  Log:
    * bignum.c (rb_big_odd_p): new method added.  a patch from Tadashi
      Saito <shiba AT mail2.accsnet.ne.jp>.  [ruby-dev:32305]
    
    * bignum.c (rb_big_even_p): ditto.

  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/ChangeLog?r1=13950&r2=13949
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/bignum.c?r1=13950&r2=13949

Index: ChangeLog
===================================================================
--- ChangeLog	(revision 13949)
+++ ChangeLog	(revision 13950)
@@ -1,3 +1,10 @@
+Fri Nov 16 23:31:18 2007  Yukihiro Matsumoto  <matz@r...>
+
+	* bignum.c (rb_big_odd_p): new method added.  a patch from Tadashi
+	  Saito <shiba AT mail2.accsnet.ne.jp>.  [ruby-dev:32305]
+
+	* bignum.c (rb_big_even_p): ditto.
+
 Fri Nov 16 17:41:34 2007  Nobuyoshi Nakada  <nobu@r...>
 
 	* ext/iconv/iconv.c (Document-class): moved the simplest example to
Index: bignum.c
===================================================================
--- bignum.c	(revision 13949)
+++ bignum.c	(revision 13950)
@@ -2432,6 +2432,38 @@
 }
 
 /*
+ *  call-seq:
+ *     big.odd? -> true or false
+ *
+ *  Returns <code>true</code> if <i>big</i> is an odd number.
+ */
+
+static VALUE
+rb_big_odd_p(VALUE num)
+{
+    if (BDIGITS(num)[0] & 1) {
+       return Qtrue;
+    }
+    return Qfalse;
+}
+
+/*
+ *  call-seq:
+ *     big.even? -> true or false
+ *
+ *  Returns <code>true</code> if <i>big</i> is an even number.
+ */
+
+static VALUE
+rb_big_even_p(VALUE num)
+{
+    if (BDIGITS(num)[0] & 1) {
+       return Qfalse;
+    }
+    return Qtrue;
+}
+
+/*
  *  Bignum objects hold integers outside the range of
  *  Fixnum. Bignum objects are created
  *  automatically when integer calculations would otherwise overflow a
@@ -2484,6 +2516,8 @@
     rb_define_method(rb_cBignum, "to_f", rb_big_to_f, 0);
     rb_define_method(rb_cBignum, "abs", rb_big_abs, 0);
     rb_define_method(rb_cBignum, "size", rb_big_size, 0);
+    rb_define_method(rb_cBignum, "odd?", rb_big_odd_p, 0);
+    rb_define_method(rb_cBignum, "even?", rb_big_even_p, 0);
 
     power_cache_init();
 }

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml