diff options
Diffstat (limited to 'libvxi11client/perlglue.c')
-rw-r--r-- | libvxi11client/perlglue.c | 73 |
1 files changed, 0 insertions, 73 deletions
diff --git a/libvxi11client/perlglue.c b/libvxi11client/perlglue.c deleted file mode 100644 index 697a480..0000000 --- a/libvxi11client/perlglue.c +++ /dev/null @@ -1,73 +0,0 @@ -#include "perlglue.h" -#include "libvxi11client.h" -#include <stdbool.h> - -#define INTERRUPTHANDLE "libvxi11client" - -static void interruptcallback(void) { - -} - -int vopen(char* address, char* device) { - return vxi11_open(address, device); -} - -int vabort(void) { - return vxi11_abort(); -} - -int vtrigger(bool waitforlock) { - return vxi11_trigger(waitforlock); -} - -int vclear(bool waitforlock) { - return vxi11_clear(waitforlock); -} - -int vwrite(char* data, unsigned int len, bool waitlock, bool end) { - return vxi11_write(data, len, waitlock, end); -} - -int vread(char* buffer, unsigned int bufferlen, bool waitlock, bool termchrset, char termchr) { - return vxi11_read(buffer, bufferlen, waitlock, termchrset, termchr); -} - -int vlock(bool waitforlock) { - return vxi11_lock(waitforlock); -} - -int vunlock(void) { - return vxi11_unlock(); -} - -int vlocal(bool waitforlock) { - return vxi11_local(waitforlock); -} - -int vremote(bool waitforlock) { - return vxi11_remote(waitforlock); -} - -int vreadstatusbyte(bool waitforlock) { - return vxi11_readstatusbyte(waitforlock); -} - -int vcreate_intr_chan(void) { - return vxi11_create_intr_chan(); -} - -int vdestroy_intr_chan(void) { - return vxi11_destroy_intr_chan(); -} - -int venable_srq(bool enable) { - return vxi11_enable_srq(enable, INTERRUPTHANDLE, interruptcallback); -} - -int vdocmd(unsigned long cmd, bool waitforlock) { - return vxi11_docmd(cmd, waitforlock); -} - -int vclose(void) { - return vxi11_close(); -} |