diff options
| author | daniel <danieruru@gmail.com> | 2013-01-24 00:15:16 +0900 |
|---|---|---|
| committer | daniel <danieruru@gmail.com> | 2013-01-24 00:15:16 +0900 |
| commit | d31d69b338c7fef5583ec705c1e748c2a2aeaba6 (patch) | |
| tree | eeaf75d97ac96b8b3d49027cd930068864500d86 /libvxi11client/perlbits/testscript.pl | |
| parent | 609cb1e17a9ab8edf1ccab42574b44bc1439aeb7 (diff) | |
named
Diffstat (limited to 'libvxi11client/perlbits/testscript.pl')
| -rw-r--r-- | libvxi11client/perlbits/testscript.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libvxi11client/perlbits/testscript.pl b/libvxi11client/perlbits/testscript.pl index 5af15d3..7bcfda6 100644 --- a/libvxi11client/perlbits/testscript.pl +++ b/libvxi11client/perlbits/testscript.pl @@ -18,9 +18,9 @@ my ($error, $statusbyte) = $instr->vxi_readstatusbyte(0); printf "status byte is " . $statusbyte . "\n"; $instr->vxi_create_intr_chan(); -$instr->vxi_enable_srq(1, "myhandle"); +$instr->vxi_enable_srq("myhandle"); vxi_wait_for_interrupt(); -$instr->vxi_enable_srq(0, ""); +$instr->vxi_disable_srq(); $instr->vxi_destroy_intr_chan(); $instr->vxi_abort(); $instr->vxi_clear(0); |