view src/typemap @ 9177:ee0564e3257d v7.4.1872

commit https://github.com/vim/vim/commit/c4bc0e6542185b659d2a165b635f9561549071ea Author: Bram Moolenaar <Bram@vim.org> Date: Thu Jun 2 13:54:49 2016 +0200 patch 7.4.1872 Problem: Still build problem with old version of Perl. Solution: Also define SvREFCNT_inc_void_NN if needed. (Ken Takata)
author Christian Brabandt <cb@256bit.org>
date Thu, 02 Jun 2016 14:00:08 +0200
parents dec4338a7da2
children
line wrap: on
line source

TYPEMAP
VIWIN	T_VIOBJNOMUNGE
VIBUF	T_VIOBJNOMUNGE

INPUT
T_VIOBJNOMUNGE
	if (sv_isa($arg, \"${ntype}\")) {
	    IV tmp = SvIV((SV*)SvRV($arg));
	    $var = INT2PTR($type, tmp);
	    if (!tmp)
		croak(\"$ntype no longer exists\");
	}
	else
	    croak(\"$var is not of type ${ntype}\")