static void pool_create_v_test(mps_arena_t arena, ...)
{
va_list args;
va_start(args, arena);
die(mps_pool_create_v(&amcpool, arena, mps_class_amc(), args),
"pool_create_v(amc)");
va_end(args);
}
mps_res_t mps_pool_create(mps_pool_t *mps_pool_o, mps_arena_t arena,
mps_class_t mps_class, ...)
{
mps_res_t res;
va_list varargs;
va_start(varargs, mps_class);
res = mps_pool_create_v(mps_pool_o, arena, mps_class, varargs);
va_end(varargs);
return res;
}