This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Test ASAN with -DDEBUGGING (and so also with assertions enabled)
[perl5.git] / ext / XS-APItest / typemap
... / ...
CommitLineData
1XS::APItest::PtrTable T_PTROBJ
2
3const WCHAR * WPV
4U8 * T_PV
5
6INPUT
7
8WPV
9 $var = ($type)SvPV_nolen($arg);
10
11OUTPUT
12
13WPV
14 sv_setpvn($arg, (const char *)($var), sizeof(WCHAR) * (1+wcslen($var)));