X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=chiark-tcl.git;a=blobdiff_plain;f=base%2Fchiark-tcl.h;h=a4c073a27611f4cf2ff15e572029c832df566074;hp=b28c2b1f5bc963e8f1daa9d7bca88109d2a8191e;hb=f4f510031c838d545e4cb0bc6552f5c4dce44097;hpb=c1d91496221c3816863d258fc79660615e2e884a

diff --git a/base/chiark-tcl.h b/base/chiark-tcl.h
index b28c2b1..a4c073a 100644
--- a/base/chiark-tcl.h
+++ b/base/chiark-tcl.h
@@ -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*/