newsize &= ~(newsize & (1 + ~newsize));	/* get proper power of 2 */
..
Newxz(a, PERL_HV_ARRAY_ALLOC_BYTES(newsize), char);