summaryrefslogtreecommitdiff
path: root/libvxi11client/perlglue.c
diff options
context:
space:
mode:
Diffstat (limited to 'libvxi11client/perlglue.c')
-rw-r--r--libvxi11client/perlglue.c73
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();
-}