Remove reallocate logic in VpMult only used for VpSqrt

Author: tompng

ext/bigdecimal/bigdecimal.c

@@ -4976,7 +4976,6 @@ VpMult(Real *c, Real *a, Real *b)
     size_t ind_as, ind_ae, ind_bs;
     DECDIG carry;
     DECDIG_DBL s;
-    Real *w;
 
     if (!VpIsDefOP(c, a, b, OP_SW_MULT)) return 0; /* No significant digit */
 
@@ -4996,29 +4995,19 @@ VpMult(Real *c, Real *a, Real *b)
     }
     if (b->Prec > a->Prec) {
 	/* Adjust so that digits(a)>digits(b) */
-	w = a;
+	Real *w = a;
 	a = b;
 	b = w;
     }
-    w = NULL;
     MxIndA = a->Prec - 1;
     MxIndB = b->Prec - 1;
     MxIndAB = a->Prec + b->Prec - 1;
 
-    // Only VpSqrt calls VpMult with insufficient precision
-    if (c->MaxPrec < VPMULT_RESULT_PREC(a, b)) {
-        w = c;
-        c = NewZeroNolimit(1, VPMULT_RESULT_PREC(a, b) * BASE_FIG);
-    }
-
     /* set LHSV c info */
 
     c->exponent = a->exponent;    /* set exponent */
     VpSetSign(c, VpGetSign(a) * VpGetSign(b));    /* set sign  */
-    if (!AddExponent(c, b->exponent)) {
-        if (w) rbd_free_struct(c);
-        return 0;
-    }
+    if (!AddExponent(c, b->exponent)) return 0;
     carry = 0;
     nc = ind_c = MxIndAB;
     memset(c->frac, 0, (nc + 1) * sizeof(DECDIG));        /* Initialize c  */
@@ -5066,11 +5055,6 @@ VpMult(Real *c, Real *a, Real *b)
 	}
     }
     VpNmlz(c);
-    if (w != NULL) {        /* free work variable */
-        VpAsgn(w, c, 10);
-        rbd_free_struct(c);
-        c = w;
-    }
 
 Exit:
     return c->Prec*BASE_FIG;