int* XS_unpack_intPtr _(( SV *rv ));
void XS_pack_intPtr _(( SV *st, int *ia ));
void XS_release_intPtr _(( int *ia ));