*/
mp *mprand(mp *d, unsigned b, grand *r, mpw or)
{
size_t sz = (b + 7) >> 3;
arena *a = (d && (d->f & MP_BURN)) ? arena_secure : arena_global;
*/
mp *mprand(mp *d, unsigned b, grand *r, mpw or)
{
size_t sz = (b + 7) >> 3;
arena *a = (d && (d->f & MP_BURN)) ? arena_secure : arena_global;