XS::APItest::PtrTable		T_PTROBJ

const WCHAR *			WPV

INPUT

WPV
        $var = ($type)SvPV_nolen($arg);

OUTPUT

WPV
        sv_setpvn($arg, (const char *)($var), sizeof(WCHAR) * (1+wcslen($var)));