Trailing 0s in split removed. & bug in floor fixed.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@4332 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
lann · Aug 5, 2003 · a179c38 · a179c38
1 parent 7178484
commit a179c38
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/ext/bigdecimal/bigdecimal.c b/ext/bigdecimal/bigdecimal.c
@@ -3154,6 +3154,7 @@ VpSzMantissa(Real *a,char *psz)
             }
         }
         *psz = 0;
+        while(psz[-1]=='0') *(--psz) = 0;
     } else {
         if(VpIsPosZero(a)) sprintf(psz, "0");
         else      sprintf(psz, "-0");
@@ -3728,8 +3729,9 @@ VpMidRound(Real *y, int f, int nf)
             VpNmlz(y);
             VpRdup(y,0);
         } else {
+            S_INT s = VpGetSign(y);
             VpSetOne(y);
-            VpSetSign(y,VpGetSign(y));
+            VpSetSign(y,s);
         }
     } else {
         y->frac[ix] = div;