diff options
Diffstat (limited to 'generic/tclStubs.c')
| -rw-r--r-- | generic/tclStubs.c | 22 |
1 files changed, 15 insertions, 7 deletions
diff --git a/generic/tclStubs.c b/generic/tclStubs.c index 523eefd..eb1b729 100644 --- a/generic/tclStubs.c +++ b/generic/tclStubs.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclStubs.c,v 1.1 1999/03/03 00:38:43 stanton Exp $ + * RCS: @(#) $Id: tclStubs.c,v 1.2 1999/03/04 01:01:59 stanton Exp $ */ #include "tcl.h" @@ -18,11 +18,19 @@ * Undefine function macros that will interfere with the defintions below. */ -#undef Tcl_DumpActiveMemory -#undef Tcl_ValidateAllMemory #undef Tcl_Alloc #undef Tcl_Free #undef Tcl_Realloc +#undef Tcl_NewBooleanObj +#undef Tcl_NewByteArrayObj +#undef Tcl_NewDoubleObj +#undef Tcl_NewIntObj +#undef Tcl_NewListObj +#undef Tcl_NewLongObj +#undef Tcl_NewObj +#undef Tcl_NewStringObj +#undef Tcl_DumpActiveMemory +#undef Tcl_ValidateAllMemory /* * WARNING: This file is automatically generated by the tools/genStubs.tcl @@ -1767,24 +1775,24 @@ Tcl_OpenTcpServer(interp, port, host, acceptProc, callbackData) /* Slot 185 */ void -Tcl_Panic TCL_VARARGS_DEF(char *,format) +panic TCL_VARARGS_DEF(char *,format) { char * var; va_list argList; var = (char *) TCL_VARARGS_START(char *,format,argList); - (tclStubsPtr->tcl_PanicVA)(var, argList); + (tclStubsPtr->panicVA)(var, argList); va_end(argList); } /* Slot 186 */ void -Tcl_PanicVA(format, argList) +panicVA(format, argList) char * format; va_list argList; { - (tclStubsPtr->tcl_PanicVA)(format, argList); + (tclStubsPtr->panicVA)(format, argList); } /* Slot 187 */ |