Mercurial > repo

view perl-5.22.2/os2/OS2/typemap @ 8045:a16537d2fe07

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<xfix> tar xf perl-5.22.2.tar.gz # Ah, whatever, I\'m doing it anyway
author HackBot
date Sat, 14 May 2016 14:54:38 +0000
parents
children
line wrap: on
line source

BOOL			T_IV
ULONG			T_UV
HINI			T_UV
HAB			T_UV
HWND			T_UV
ATOM			T_UV
HATOMTBL		T_UV
HSWITCH			T_UV
ULONG			T_UV
USHORT			T_UV
LONG			T_IV
SHORT			T_IV

PSZ			T_PVNULL
PCSZ			T_PVNULLC

#############################################################################
INPUT
T_PVNULL
	$var = ( SvOK($arg) ? ($type)SvPV_nolen($arg) : NULL )
T_PVNULLC
	$var = ( SvOK($arg) ? ($type)SvPV_nolen($arg) : NULL )
#############################################################################
OUTPUT
T_PVNULL
	sv_setpv((SV*)$arg, $var);
T_PVNULLC
	NOTIMPLEMENTED