Function xs_mont2_exp_SW

modules/crypt/arith/mont.c:57–69

}

void
xs_mont2_exp_SW(xsMachine *the)
{
	txBigInt *a, *e, *m, *r;
	int param;

	a = xsmcToBigInt(xsArg(0));
	e = xsmcToBigInt(xsArg(1));
	m = xsmcToBigInt(xsArg(2));
	param = xsmcToInteger(xsArg(3));
	r = fxBigInt_mont_exp_SW(the, NULL, a, e, m, param);
	xsmcSetBigInt(xsResult, r);
}