diff options
author | stanton <stanton> | 1999-03-04 01:01:57 (GMT) |
---|---|---|
committer | stanton <stanton> | 1999-03-04 01:01:57 (GMT) |
commit | 8074a699cc242dd75d90b2f676eecd35a41b525c (patch) | |
tree | 04ec477faa3d4c429f33eba6eade67aaa22ac0ee /generic/tclStubs.c | |
parent | fd1dfeea2918db576ed45426a57111aa09b7ed83 (diff) | |
download | tcl-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.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 */ |