summaryrefslogtreecommitdiffstats
path: root/generic/tclStubs.c
diff options
context:
space:
mode:
authorstanton <stanton>1999-03-04 01:01:57 (GMT)
committerstanton <stanton>1999-03-04 01:01:57 (GMT)
commit8074a699cc242dd75d90b2f676eecd35a41b525c (patch)
tree04ec477faa3d4c429f33eba6eade67aaa22ac0ee /generic/tclStubs.c
parentfd1dfeea2918db576ed45426a57111aa09b7ed83 (diff)
downloadtcl-8074a699cc242dd75d90b2f676eecd35a41b525c.zip
tcl-8074a699cc242dd75d90b2f676eecd35a41b525c.tar.gz
tcl-8074a699cc242dd75d90b2f676eecd35a41b525c.tar.bz2
* generic/tcl.decls: Added Mac specific declarations.
* generic/tclStubs.c: * generic/tclStubInit.c: Added undefs for all of the TCL_MEM_DEBUG macros to avoid conflicts with the stub names. * generic/tclStubInit.c: * generic/tclInt.h: * generic/tclInt.decls: Moved some declarations out of the generic and into the platform specific sections. Added missing declarations and Mac specific declarations. * generic/tclInt.h: * generic/tclDate.c: * generic/tclClock.c: Created a new opaque TclpTime_t type so generic functions that depend on the format of time_t can appear in the generic header files. * generic/tclStubInit.c: * generic/tclPanic.c: * generic/tcl.h: * generic/tcl.decls: renamed Tcl_Panic back to panic to avoid incompatibilities in a patch release.
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 */