view release on metacpan or  search on metacpan

typemap  view on Meta::CPAN

TYPEMAP
int64_t		T_I64
uint64_t	T_U64
EV::Etcd	T_PTROBJ
EV::Etcd::Watch	T_PTROBJ
EV::Etcd::Keepalive	T_PTROBJ
EV::Etcd::Observe	T_PTROBJ

INPUT
T_PTROBJ
    if (SvROK($arg) && sv_derived_from($arg, \"${ntype}\")) {
        IV tmp = SvIV((SV*)SvRV($arg));
        $var = INT2PTR($type, tmp);
    } else {
        croak(\"$var is not of type ${ntype}\");
    }
T_I64
    $var = SvI64($arg);
T_U64
    $var = SvU64($arg);

OUTPUT
T_PTROBJ
    sv_setref_pv($arg, \"${ntype}\", (void*)$var);