_mp_xalloc
extern short *_mp_xalloc(int, char *);
c->val = _mp_xalloc(a->len, "m_sub");
cval = _mp_xalloc(a->len + 1, "m_add");
r->val = _mp_xalloc(1, "m_div1");
r->val = _mp_xalloc(r->len, "m_div2");
qval = _mp_xalloc(a -> len - n + 1, "m_div3");
x.val = _mp_xalloc(xlen, "m_out");
q->val = _mp_xalloc(qlen, "s_div");
x.val = _mp_xalloc(x.len, "mp_msqrt");
c->val = _mp_xalloc(c->len, "m_mult");
short *xalloc(int nint, char *s) { return (_mp_xalloc(nint, s)); }
d->val = _mp_xalloc(1, "mp_pow");
x.val = _mp_xalloc(1, "mp_rpow");
y.val = _mp_xalloc(y.len, "mp_rpow2");
a->val = _mp_xalloc(1, "mp_itom1");
a->val = _mp_xalloc(1, "mp_itom2");
b->val = _mp_xalloc(i, "_mp_move");