diff options
author | nagachika <nagachika@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2011-12-21 15:42:41 +0000 |
---|---|---|
committer | nagachika <nagachika@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2011-12-21 15:42:41 +0000 |
commit | 4af11279c6887aa40fa9463df5d90f443356a864 (patch) | |
tree | 0e460976b2d2a92b9a9b958dfb14d920054a8fff /ext/bigdecimal/bigdecimal.c | |
parent | b3369100b668e279217240ab7ef4ad8b03443e4a (diff) | |
download | ruby-4af11279c6887aa40fa9463df5d90f443356a864.tar.gz |
* ext/bigdecimal/bigdecimal.c (VpMult, VpCtoV, VpSqrt): remove assined
but unused variables.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@34095 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/bigdecimal/bigdecimal.c')
-rw-r--r-- | ext/bigdecimal/bigdecimal.c | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/ext/bigdecimal/bigdecimal.c b/ext/bigdecimal/bigdecimal.c index 8cb02d07e9..17461cd341 100644 --- a/ext/bigdecimal/bigdecimal.c +++ b/ext/bigdecimal/bigdecimal.c @@ -4242,7 +4242,7 @@ VpMult(Real *c, Real *a, Real *b) { size_t MxIndA, MxIndB, MxIndAB, MxIndC; size_t ind_c, i, ii, nc; - size_t ind_as, ind_ae, ind_bs, ind_be; + size_t ind_as, ind_ae, ind_bs; BDIGIT carry; BDIGIT_DBL s; Real *w; @@ -4305,17 +4305,14 @@ VpMult(Real *c, Real *a, Real *b) ind_as = MxIndA - nc; ind_ae = MxIndA; ind_bs = MxIndB; - ind_be = MxIndB - nc; } else if(nc <= MxIndA) { /* The middle rectangular of the Fig. */ ind_as = MxIndA - nc; ind_ae = MxIndA -(nc - MxIndB); ind_bs = MxIndB; - ind_be = 0; } else if(nc > MxIndA) { /* The right triangle of the Fig. */ ind_as = 0; ind_ae = MxIndAB - nc - 1; ind_bs = MxIndB -(nc - MxIndA); - ind_be = 0; } for(i = ind_as; i <= ind_ae; ++i) { @@ -5039,7 +5036,6 @@ VP_EXPORT int VpCtoV(Real *a, const char *int_chr, size_t ni, const char *frac, size_t nf, const char *exp_chr, size_t ne) { size_t i, j, ind_a, ma, mi, me; - size_t loc; SIGNED_VALUE e, es, eb, ef; int sign, signe, exponent_overflow; @@ -5136,7 +5132,6 @@ VpCtoV(Real *a, const char *int_chr, size_t ni, const char *frac, size_t nf, con j = 0; } } - loc = 1; /* get fraction part */ @@ -5385,7 +5380,7 @@ VpSqrt(Real *y, Real *x) { Real *f = NULL; Real *r = NULL; - size_t y_prec, f_prec; + size_t y_prec; SIGNED_VALUE n, e; SIGNED_VALUE prec; ssize_t nr; @@ -5422,7 +5417,6 @@ VpSqrt(Real *y, Real *x) nr = 0; y_prec = y->MaxPrec; - f_prec = f->MaxPrec; prec = x->exponent - (ssize_t)y_prec; if (x->exponent > 0) |