home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
perl502b.zip
/
ext
/
DPI
/
typemap
< prev
Wrap
Text File
|
1996-02-21
|
439b
|
18 lines
DPIString T_DPISTR
DPIPacket T_DPIPKT
DPIPointer T_PTR
#############################################################################
INPUT
T_DPISTR
$var.ptr = SvPV($arg, $var.len)
T_DPIPKT
$var.ptr = SvPV($arg, $var.len)
#############################################################################
OUTPUT
T_DPISTR
sv_setpvn((SV*)$arg, $var.ptr, $var.len);
T_DPIPKT
sv_setpvn((SV*)$arg, $var, DPI_PACKET_LEN($var));