mpq_t *		MPQ
mpz_t *		MPZ
mpf_t * 	MPF
mpfr_t *	MPFR

INPUT
MPQ
            $var = INT2PTR($type, SvIV(SvRV($arg)))
MPZ
            $var = INT2PTR($type, SvIV(SvRV($arg)))
MPF
            $var = INT2PTR($type, SvIV(SvRV($arg)))
MPFR
            $var = INT2PTR($type, SvIV(SvRV($arg)))