Merge commit 'e0e7f3df46483e4505b4799f22835a17784d0e70' as 'tcliis'

1 files changed, 41 insertions, 0 deletions

diff --git a/tcliis/iistcl.h b/tcliis/iistcl.h
new file mode 100644
index 0000000..9a09bd5
--- /dev/null
+++ b/tcliis/iistcl.h
@@ -0,0 +1,41 @@
+// Copyright (C) 1999-2013
+// Smithsonian Astrophysical Observatory, Cambridge, MA, USA
+// For conditions of distribution and use, see copyright notice in "copyright"
+
+#ifndef __iistcl_h__
+#define __iistcl_h__
+
+extern "C" {
+  #include "ximtool.h"
+}
+
+extern int IISDebug;
+
+#define MAXCHANNEL 40
+
+class IIS {
+ private:
+  Tcl_Interp* interp;
+
+ public:
+  XimData xim;
+  IoChan* chan[MAXCHANNEL];
+  void (*func[MAXCHANNEL])(IoChan*, int*, void*);
+
+ public:
+  IIS(Tcl_Interp*);
+  ~IIS();
+
+  void eval(char*);
+  const char* evalstr(char*);
+  const char* result();
+  int open(int, const char*[]);
+  int close();
+  int retcur(int, const char*[]);
+  int encodewcs(int, const char*[]);
+  int debug(int, const char*[]);
+};
+
+extern IIS* iis;
+
+#endif