chiark
/
gitweb
/
~ian
/
chiark-tcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
import changes from debian archive
[chiark-tcl.git]
/
base
/
chiark-tcl.h
diff --git
a/base/chiark-tcl.h
b/base/chiark-tcl.h
index b28c2b1f5bc963e8f1daa9d7bca88109d2a8191e..a4c073a27611f4cf2ff15e572029c832df566074 100644
(file)
--- 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 <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>
#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_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, ...);
void cht_obj_updatestr_vstringls(Tcl_Obj *o, ...);
- /* const char*,
int, const char*, in
t, ..., (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);
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; \
}
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_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*/
#define CHTI_COMMANDS(cl) { cht_setup__commands(ip,cl); }
#endif /*CHIARK_TCL_H*/