projects
/
ir-tcl-moved-to-github.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Better log messages.
[ir-tcl-moved-to-github.git]
/
ir-tcl.h
diff --git
a/ir-tcl.h
b/ir-tcl.h
index
6dd74ff
..
36fdf3a
100644
(file)
--- a/
ir-tcl.h
+++ b/
ir-tcl.h
@@
-24,7
+24,14
@@
* OF THIS SOFTWARE.
*
* $Log: ir-tcl.h,v $
* OF THIS SOFTWARE.
*
* $Log: ir-tcl.h,v $
- * Revision 1.11 1995-09-21 13:11:52 adam
+ * Revision 1.13 1996-02-19 15:41:54 adam
+ * Better log messages.
+ * Minor improvement of connect method.
+ *
+ * Revision 1.12 1996/02/05 17:58:04 adam
+ * Ported ir-tcl to use the beta releases of tcl7.5/tk4.1.
+ *
+ * Revision 1.11 1995/09/21 13:11:52 adam
* Support of dynamic loading.
* Test script uses load command if necessary.
*
* Support of dynamic loading.
* Test script uses load command if necessary.
*
@@
-60,12
+67,26
@@
#ifndef IR_TCL_H
#define IR_TCL_H
#ifndef IR_TCL_H
#define IR_TCL_H
+#if 0
+#define IRTCL_GENERIC_FILES 1
+#else
+#define IRTCL_GENERIC_FILES 0
+#endif
+
int Irtcl_Init (Tcl_Interp *interp);
int Irtcl_Init (Tcl_Interp *interp);
+#if IRTCL_GENERIC_FILES
+void ir_select_add (Tcl_File file, void *obj);
+void ir_select_add_write (Tcl_File file, void *obj);
+void ir_select_remove (Tcl_File file, void *obj);
+void ir_select_remove_write (Tcl_File file, void *obj);
+#else
void ir_select_add (int fd, void *obj);
void ir_select_add_write (int fd, void *obj);
void ir_select_remove (int fd, void *obj);
void ir_select_remove_write (int fd, void *obj);
void ir_select_add (int fd, void *obj);
void ir_select_add_write (int fd, void *obj);
void ir_select_remove (int fd, void *obj);
void ir_select_remove_write (int fd, void *obj);
+#endif
+
void ir_select_read (ClientData clientData);
void ir_select_write (ClientData clientData);
void ir_select_read (ClientData clientData);
void ir_select_write (ClientData clientData);