From f1b02e115d35c61d2346dd0d4eeeacdc8bceed84 Mon Sep 17 00:00:00 2001 From: Moritz Lenz Date: Tue, 15 Nov 2011 21:03:16 +0100 Subject: [PATCH] save an allocation in nqp_bigint_div the mp_div code allows NULL as remainder, so no need to allocate it --- src/ops/nqp_bigint.ops | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/src/ops/nqp_bigint.ops b/src/ops/nqp_bigint.ops index 936ac7e265..812d42bfa9 100644 --- a/src/ops/nqp_bigint.ops +++ b/src/ops/nqp_bigint.ops @@ -159,13 +159,10 @@ inline op nqp_bigint_mul(out PMC, in PMC, in PMC) :base_core { inline op nqp_bigint_div(out PMC, in PMC, in PMC) :base_core { mp_int *a = get_bigint(interp, $2); mp_int *b = get_bigint(interp, $3); - mp_int remainder; int result; - mp_init(&remainder); $1 = REPR($2)->allocate(interp, STABLE($2)); REPR($1)->initialize(interp, STABLE($1), OBJECT_BODY($1)); - result = mp_div(a, b, get_bigint(interp, $1), &remainder); - mp_clear(&remainder); + result = mp_div(a, b, get_bigint(interp, $1), NULL); if (result == MP_VAL) Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_INVALID_OPERATION, "Divide by zero");