summaryrefslogtreecommitdiffstats
path: root/generic/tclStubs.c
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tclStubs.c')
-rw-r--r--generic/tclStubs.c22
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 */