summaryrefslogtreecommitdiff
path: root/libvxi11client/perlbits/Client.xs
diff options
context:
space:
mode:
authordaniel <danieruru@gmail.com>2013-01-25 23:09:40 +0900
committerdaniel <danieruru@gmail.com>2013-01-25 23:09:40 +0900
commite3d04285a9460a8ab13e9725fc2febf1be63a4d9 (patch)
tree50878fe2c72bf8a3164357810d1cce576b9075d7 /libvxi11client/perlbits/Client.xs
parent008d5f4b9f3cad2d5fe350fa525b8a2135b97785 (diff)
docmd and better termination fix
Diffstat (limited to 'libvxi11client/perlbits/Client.xs')
-rw-r--r--libvxi11client/perlbits/Client.xs9
1 files changed, 7 insertions, 2 deletions
diff --git a/libvxi11client/perlbits/Client.xs b/libvxi11client/perlbits/Client.xs
index 0de2df3..48571d9 100644
--- a/libvxi11client/perlbits/Client.xs
+++ b/libvxi11client/perlbits/Client.xs
@@ -68,12 +68,17 @@ vxi_destroy_intr_chan(context)
RETVAL
int
-vxi_docmd(context, cmd, waitforlock = 0)
+vxi_docmd_long(context, datain, datainlen, OUTLIST dataout, outbufferlen, OUTLIST dataoutlen, cmd, waitforlock = 0)
VXI11::Client context
+ char* datain
+ int datainlen
+ char* dataout
+ int outbufferlen
+ int dataoutlen
unsigned long cmd
bool waitforlock
CODE:
- RETVAL = vxi11_docmd(context, cmd, waitforlock);
+ RETVAL = vxi11_docmd(context, datain, datainlen, dataout, outbufferlen, &dataoutlen, cmd, waitforlock);
OUTPUT:
RETVAL