aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorusa <usa@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2007-07-05 07:38:41 +0000
committerusa <usa@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2007-07-05 07:38:41 +0000
commita0d50fa3c494ea5afb98c05be049a0cde6fde28d (patch)
tree8861b51f7fd9fa15bc9d86a5c808a0e417efe161
parentb553a34c63da315637afeced46afd05d33f7c623 (diff)
downloadruby-a0d50fa3c494ea5afb98c05be049a0cde6fde28d.tar.gz
* numeric.c (int_pow): fix previous nubu's commit.
* test/ruby/test_fixnum.rb: new test. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@12698 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
-rw-r--r--ChangeLog6
-rw-r--r--numeric.c11
-rw-r--r--test/ruby/test_fixnum.rb26
3 files changed, 39 insertions, 4 deletions
diff --git a/ChangeLog b/ChangeLog
index dc496a3f0f..4a8fc9ee7c 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+Thu Jul 5 16:37:34 2007 NAKAMURA Usaku <usa@ruby-lang.org>
+
+ * numeric.c (int_pow): fix previous nubu's commit.
+
+ * test/ruby/test_fixnum.rb: new test.
+
Thu Jul 5 15:56:06 2007 Nobuyoshi Nakada <nobu@ruby-lang.org>
* numeric.c (int_pow): even number multiplication never be negative.
diff --git a/numeric.c b/numeric.c
index eba69debb8..c331030d63 100644
--- a/numeric.c
+++ b/numeric.c
@@ -2281,7 +2281,10 @@ int_pow(long x, unsigned long y)
long z = 1;
if (neg) x = -x;
- if (y & 1) z = x;
+ if (y & 1)
+ z = x;
+ else
+ neg = 0;
y &= ~1;
do {
while (y % 2 == 0) {
@@ -2289,8 +2292,8 @@ int_pow(long x, unsigned long y)
if (x2 < x || !POSFIXABLE(x2)) {
VALUE v;
bignum:
- v = rb_big_pow(rb_int2big(neg ? -x : x), LONG2NUM(y));
- if (z != 1) v = rb_big_mul(rb_int2big(z), v);
+ v = rb_big_pow(rb_int2big(x), LONG2NUM(y));
+ if (z != 1) v = rb_big_mul(rb_int2big(neg ? -z : z), v);
return v;
}
x = x2;
@@ -2304,7 +2307,7 @@ int_pow(long x, unsigned long y)
z = xz;
}
} while (--y);
- if (neg && (y & 1)) z = -z;
+ if (neg) z = -z;
return LONG2NUM(z);
}
diff --git a/test/ruby/test_fixnum.rb b/test/ruby/test_fixnum.rb
new file mode 100644
index 0000000000..57999d4b03
--- /dev/null
+++ b/test/ruby/test_fixnum.rb
@@ -0,0 +1,26 @@
+require 'test/unit'
+
+class TestFixnum < Test::Unit::TestCase
+ def setup
+ @verbose = $VERBOSE
+ $VERBOSE = nil
+ end
+
+ def teardown
+ $VERBOSE = @verbose
+ end
+
+ def test_pow
+ [1, 2, 2**64, 2**63*3, 2**64*3].each do |y|
+ [1, 3].each do |x|
+ z1 = x**y
+ z2 = (-x)**y
+ if y % 2 == 1
+ assert_equal(z2, -z1)
+ else
+ assert_equal(z2, z1)
+ end
+ end
+ end
+ end
+end