diff options
| author | daniel <danieruru@gmail.com> | 2013-01-24 00:51:49 +0900 |
|---|---|---|
| committer | daniel <danieruru@gmail.com> | 2013-01-24 00:51:49 +0900 |
| commit | a8751e28e68d0f8662f240153655f3e43cd955fd (patch) | |
| tree | 51ac31d7110f179bd20969313d4f0f2affcd308d /libvxi11client | |
| parent | 3d93dca40deb1c8484a865a85a548b8417b4559f (diff) | |
add default values for waitforlock
Diffstat (limited to 'libvxi11client')
| -rw-r--r-- | libvxi11client/perlbits/Client.xs | 14 | ||||
| -rw-r--r-- | libvxi11client/perlbits/VXI11-Client.t | 8 |
2 files changed, 11 insertions, 11 deletions
diff --git a/libvxi11client/perlbits/Client.xs b/libvxi11client/perlbits/Client.xs index 5e8130f..0de2df3 100644 --- a/libvxi11client/perlbits/Client.xs +++ b/libvxi11client/perlbits/Client.xs @@ -10,7 +10,7 @@ typedef VXI11Context* VXI11__Client; MODULE = VXI11::Client PACKAGE = VXI11::Client -PROTOTYPES: ENABLE +PROTOTYPES: DISABLE int vxi_startinterruptserver() @@ -35,7 +35,7 @@ vxi_abort(context) RETVAL int -vxi_clear(context,waitforlock) +vxi_clear(context,waitforlock = 0) VXI11::Client context bool waitforlock CODE: @@ -68,7 +68,7 @@ vxi_destroy_intr_chan(context) RETVAL int -vxi_docmd(context, cmd, waitforlock) +vxi_docmd(context, cmd, waitforlock = 0) VXI11::Client context unsigned long cmd bool waitforlock @@ -96,7 +96,7 @@ vxi_wait_for_interrupt() int -vxi_local(context, waitforlock) +vxi_local(context, waitforlock = 0) VXI11::Client context bool waitforlock CODE: @@ -105,7 +105,7 @@ vxi_local(context, waitforlock) RETVAL int -vxi_lock(context, waitforlock) +vxi_lock(context, waitforlock = 0) VXI11::Client context bool waitforlock CODE: @@ -152,7 +152,7 @@ vxi_readstatusbyte(context, OUTLIST error, OUTLIST statusbyte, waitforlock) error = ret; int -vxi_remote(context, waitforlock) +vxi_remote(context, waitforlock = 0) VXI11::Client context bool waitforlock CODE: @@ -161,7 +161,7 @@ vxi_remote(context, waitforlock) RETVAL int -vxi_trigger(context, waitforlock) +vxi_trigger(context, waitforlock = 0) VXI11::Client context bool waitforlock CODE: diff --git a/libvxi11client/perlbits/VXI11-Client.t b/libvxi11client/perlbits/VXI11-Client.t index 2691ed2..8d24475 100644 --- a/libvxi11client/perlbits/VXI11-Client.t +++ b/libvxi11client/perlbits/VXI11-Client.t @@ -36,10 +36,10 @@ is($instr->vxi_enable_srq("myhandle"), 1, "Enable interrupts"); is($instr->vxi_disable_srq(), 1, "Disable interrupts"); is($instr->vxi_destroy_intr_chan(), 1, "Destroy intr channel"); is($instr->vxi_abort(), 1, "Abort"); -is($instr->vxi_clear(0), 1, "Clear"); -is($instr->vxi_trigger(0), 1, "Trigger"); -is($instr->vxi_local(0), 1, "Local"); -is($instr->vxi_remote(0), 1, "Remote"); +is($instr->vxi_clear(), 1, "Clear"); +is($instr->vxi_trigger(), 1, "Trigger"); +is($instr->vxi_local(), 1, "Local"); +is($instr->vxi_remote(), 1, "Remote"); is($instr->vxi_unlock(), 1, "Unlock"); is($instr->vxi_close(), 1, "Close"); |