void * TclBNRealloc( void *p, size_t s) { return (void *) Tcl_Realloc((char *) p, (unsigned int) s); }
static void *crash_realloc(void *p, int n){ return (void *)Tcl_Realloc(p, (size_t)n); }
char *kit::realloc(char *ptr, int size) { return Tcl_Realloc(ptr, size); }