chiark / gitweb /
import changes from debian archive
[chiark-tcl.git] / base / chiark-tcl.h
index b28c2b1f5bc963e8f1daa9d7bca88109d2a8191e..a4c073a27611f4cf2ff15e572029c832df566074 100644 (file)
@@ -30,6 +30,7 @@
 #include <sys/uio.h>
 #include <sys/un.h>
 #include <arpa/inet.h>
+#include <limits.h>
 
 #ifndef _TCL /* if someone already included some tcl.h, use that */
 #include <tcl.h>
@@ -105,12 +106,8 @@ int cht_newfdposixerr(Tcl_Interp *ip, int fd, const char *m);
 void cht_objfreeir(Tcl_Obj *o);
 int cht_get_urandom(Tcl_Interp *ip, Byte *buffer, int l);
 
-void cht_obj_updatestr_array(Tcl_Obj *o, const Byte *array, int l);
-void cht_obj_updatestr_array_prefix(Tcl_Obj *o, const Byte *byte,
-                               int l, const char *prefix);
-
 void cht_obj_updatestr_vstringls(Tcl_Obj *o, ...);
-  /* const char*, int, const char*, int, ..., (const char*)0 */
+  /* const char*, size_t, const char*, size_t, ..., (const char*)0 */
 void cht_obj_updatestr_string_len(Tcl_Obj *o, const char *str, int l);
 void cht_obj_updatestr_string(Tcl_Obj *o, const char *str);
 
@@ -223,11 +220,12 @@ int cht_enum1_lookup_cached_func(Tcl_Interp *ip, Tcl_Obj *o,
     initd= 1;                                                               \
     return TCL_OK;                                                          \
   }
-    
+
 #define CHTI_OTHER(e)                                                   \
   { extern void cht_prepare_##e(Tcl_Interp *ip); cht_prepare_##e(ip); }
 
 #define CHTI_TYPE(ot)      { Tcl_RegisterObjType(&(ot)); }
+
 #define CHTI_COMMANDS(cl)  { cht_setup__commands(ip,cl); }
 
 #endif /*CHIARK_TCL_H*/