1071d4279SBram MoolenaarTYPEMAP 2071d4279SBram MoolenaarVIWIN T_VIOBJNOMUNGE 3071d4279SBram MoolenaarVIBUF T_VIOBJNOMUNGE 4071d4279SBram Moolenaar 5071d4279SBram MoolenaarINPUT 6071d4279SBram MoolenaarT_VIOBJNOMUNGE 7071d4279SBram Moolenaar if (sv_isa($arg, \"${ntype}\")) { 8071d4279SBram Moolenaar IV tmp = SvIV((SV*)SvRV($arg)); 9*be747344SBram Moolenaar $var = INT2PTR($type, tmp); 10071d4279SBram Moolenaar if (!tmp) 11071d4279SBram Moolenaar croak(\"$ntype no longer exists\"); 12071d4279SBram Moolenaar } 13071d4279SBram Moolenaar else 14071d4279SBram Moolenaar croak(\"$var is not of type ${ntype}\") 15