diff options
| author | stanton <stanton@noemail.net> | 1999-03-04 01:01:56 (GMT) |
|---|---|---|
| committer | stanton <stanton@noemail.net> | 1999-03-04 01:01:56 (GMT) |
| commit | 95643123c099dd1c533d74dc3a61b23b25b72f37 (patch) | |
| tree | 04ec477faa3d4c429f33eba6eade67aaa22ac0ee /generic/tclDecls.h | |
| parent | df86c1e5a7ae7a03962e24f8fe28e8cc39ba34c4 (diff) | |
| download | tcl-95643123c099dd1c533d74dc3a61b23b25b72f37.zip tcl-95643123c099dd1c533d74dc3a61b23b25b72f37.tar.gz tcl-95643123c099dd1c533d74dc3a61b23b25b72f37.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.
FossilOrigin-Name: 3ab6dc531fdb331487941048f3ceaeaa4a52f08c
Diffstat (limited to 'generic/tclDecls.h')
| -rw-r--r-- | generic/tclDecls.h | 23 |
1 files changed, 11 insertions, 12 deletions
diff --git a/generic/tclDecls.h b/generic/tclDecls.h index 420618f..8c65c35 100644 --- a/generic/tclDecls.h +++ b/generic/tclDecls.h @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclDecls.h,v 1.1 1999/03/03 00:38:39 stanton Exp $ + * RCS: @(#) $Id: tclDecls.h,v 1.2 1999/03/04 01:01:57 stanton Exp $ */ #ifndef _TCLDECLS @@ -579,10 +579,9 @@ EXTERN Tcl_Channel Tcl_OpenTcpServer _ANSI_ARGS_((Tcl_Interp * interp, Tcl_TcpAcceptProc * acceptProc, ClientData callbackData)); /* 185 */ -EXTERN void Tcl_Panic _ANSI_ARGS_(TCL_VARARGS(char *,format)); +EXTERN void panic _ANSI_ARGS_(TCL_VARARGS(char *,format)); /* 186 */ -EXTERN void Tcl_PanicVA _ANSI_ARGS_((char * format, - va_list argList)); +EXTERN void panicVA _ANSI_ARGS_((char * format, va_list argList)); /* 187 */ EXTERN char * Tcl_ParseVar _ANSI_ARGS_((Tcl_Interp * interp, char * string, char ** termPtr)); @@ -1050,8 +1049,8 @@ typedef struct TclStubs { Tcl_Channel (*tcl_OpenFileChannel) _ANSI_ARGS_((Tcl_Interp * interp, char * fileName, char * modeString, int permissions)); /* 182 */ Tcl_Channel (*tcl_OpenTcpClient) _ANSI_ARGS_((Tcl_Interp * interp, int port, char * address, char * myaddr, int myport, int async)); /* 183 */ Tcl_Channel (*tcl_OpenTcpServer) _ANSI_ARGS_((Tcl_Interp * interp, int port, char * host, Tcl_TcpAcceptProc * acceptProc, ClientData callbackData)); /* 184 */ - void (*tcl_Panic) _ANSI_ARGS_(TCL_VARARGS(char *,format)); /* 185 */ - void (*tcl_PanicVA) _ANSI_ARGS_((char * format, va_list argList)); /* 186 */ + void (*panic) _ANSI_ARGS_(TCL_VARARGS(char *,format)); /* 185 */ + void (*panicVA) _ANSI_ARGS_((char * format, va_list argList)); /* 186 */ char * (*tcl_ParseVar) _ANSI_ARGS_((Tcl_Interp * interp, char * string, char ** termPtr)); /* 187 */ char * (*tcl_PkgPresent) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, int exact)); /* 188 */ char * (*tcl_PkgPresentEx) _ANSI_ARGS_((Tcl_Interp * interp, char * name, char * version, int exact, ClientData * clientDataPtr)); /* 189 */ @@ -1890,13 +1889,13 @@ extern TclStubs *tclStubsPtr; #define Tcl_OpenTcpServer(interp, port, host, acceptProc, callbackData) \ (tclStubsPtr->tcl_OpenTcpServer)(interp, port, host, acceptProc, callbackData) /* 184 */ #endif -#ifndef Tcl_Panic -#define Tcl_Panic \ - (tclStubsPtr->tcl_Panic) /* 185 */ +#ifndef panic +#define panic \ + (tclStubsPtr->panic) /* 185 */ #endif -#ifndef Tcl_PanicVA -#define Tcl_PanicVA(format, argList) \ - (tclStubsPtr->tcl_PanicVA)(format, argList) /* 186 */ +#ifndef panicVA +#define panicVA(format, argList) \ + (tclStubsPtr->panicVA)(format, argList) /* 186 */ #endif #ifndef Tcl_ParseVar #define Tcl_ParseVar(interp, string, termPtr) \ |