summaryrefslogtreecommitdiff
path: root/ext/bigdecimal/bigdecimal.c
diff options
context:
space:
mode:
authorshigek <shigek@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2004-05-11 14:30:05 +0000
committershigek <shigek@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2004-05-11 14:30:05 +0000
commit833fd608781b7fb5d1bd06814f431329bb9e232a (patch)
tree18cec79685b31f986ead299f1dc359db61f2f70e /ext/bigdecimal/bigdecimal.c
parent7b8641ce8858720ce8b1f4a46ef0204913832187 (diff)
Fix for 'incomplete bug fix' for 1.41.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@6291 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/bigdecimal/bigdecimal.c')
-rw-r--r--ext/bigdecimal/bigdecimal.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/bigdecimal/bigdecimal.c b/ext/bigdecimal/bigdecimal.c
index 2af1da06ef..402e13cc5c 100644
--- a/ext/bigdecimal/bigdecimal.c
+++ b/ext/bigdecimal/bigdecimal.c
@@ -2311,7 +2311,6 @@ VpSubAbs(Real *a, Real *b, Real *c)
/* each of the last few digits of the b because the a has no */
/* corresponding digits to be subtracted. */
if(b_pos + word_shift > a_pos) {
- borrow = 1;
while(b_pos + word_shift > a_pos) {
--c_pos;
if(b_pos > 0) {
@@ -2320,6 +2319,7 @@ VpSubAbs(Real *a, Real *b, Real *c)
--word_shift;
c->frac[c_pos] = BASE - borrow;
}
+ borrow = 1;
}
}
/* Just assign the last few digits of a to c because b has no */