From a40a92f04c6b3edeede0afcd939c17cff66f7d11 Mon Sep 17 00:00:00 2001
From: shigek <shigek@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Sun, 29 Jun 2003 13:20:08 +0000
Subject: Bug in '/' fixed by Tadashi Saito.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@4016 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ext/bigdecimal/bigdecimal.c | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'ext')

diff --git a/ext/bigdecimal/bigdecimal.c b/ext/bigdecimal/bigdecimal.c
index f1bd1e2320..b8b1a068e2 100644
--- a/ext/bigdecimal/bigdecimal.c
+++ b/ext/bigdecimal/bigdecimal.c
@@ -683,8 +683,10 @@ BigDecimal_div(VALUE self, VALUE r)
     /* c xxxxx
        r 00000yyyyy  ==> (y/b)*BASE >= HALF_BASE
      */
-    /* Round up ? */
-    VpInternalRound(c,0,c->frac[c->Prec-1],(VpBaseVal()*res->frac[0])/div->frac[0]);
+    /* Round */
+    if(VpIsDef(c)) {
+       VpInternalRound(c,0,c->frac[c->Prec-1],(VpBaseVal()*res->frac[0])/div->frac[0]);
+    }
     return ToValue(c);
 }
 
-- 
cgit v1.2.3