From f55d6c9298a37f7954cac446ea3c55dbe8d142b3 Mon Sep 17 00:00:00 2001 From: shigek Date: Tue, 11 May 2004 14:30:05 +0000 Subject: Fix for 'incomplete bug fix' for 1.41. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@6291 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ext/bigdecimal/bigdecimal.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'ext/bigdecimal/bigdecimal.c') 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 */ -- cgit v1.2.3