diff options
Diffstat (limited to 'libvxi11client/perlbits')
| -rw-r--r-- | libvxi11client/perlbits/VXI11-Client.t | 3 | ||||
| -rw-r--r-- | libvxi11client/perlbits/typemap | 1 |
2 files changed, 3 insertions, 1 deletions
diff --git a/libvxi11client/perlbits/VXI11-Client.t b/libvxi11client/perlbits/VXI11-Client.t index d156ffb..de10ecf 100644 --- a/libvxi11client/perlbits/VXI11-Client.t +++ b/libvxi11client/perlbits/VXI11-Client.t @@ -8,7 +8,7 @@ use strict; use warnings; -use Test::More tests => 3; +use Test::More tests => 5; BEGIN { use_ok('VXI11::Client') }; ######################### @@ -17,5 +17,6 @@ BEGIN { use_ok('VXI11::Client') }; # its man page ( perldoc Test::More ) for help writing this test script. is(&VXI11::Client::vxi11_open("roi", 0), 1); +is(&VXI11::Client::vxi11_lock(0), 1); is(&VXI11::Client::vxi11_unlock(), 1); is(&VXI11::Client::vxi11_close(), 1); diff --git a/libvxi11client/perlbits/typemap b/libvxi11client/perlbits/typemap new file mode 100644 index 0000000..4391935 --- /dev/null +++ b/libvxi11client/perlbits/typemap @@ -0,0 +1 @@ +_Bool T_IV |