diff options
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclIntDecls.h | 180 | ||||
| -rw-r--r-- | generic/tclStubInit.c | 28 |
2 files changed, 54 insertions, 154 deletions
diff --git a/generic/tclIntDecls.h b/generic/tclIntDecls.h index b7a3110..4d1fff3 100644 --- a/generic/tclIntDecls.h +++ b/generic/tclIntDecls.h @@ -11,7 +11,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclIntDecls.h,v 1.82 2005/07/21 21:50:47 dkf Exp $ + * RCS: @(#) $Id: tclIntDecls.h,v 1.83 2005/08/05 23:57:35 dkf Exp $ */ #ifndef _TCLINTDECLS @@ -925,80 +925,19 @@ EXTERN struct tm * TclpLocaltime _ANSI_ARGS_((CONST time_t * clock)); /* 183 */ EXTERN struct tm * TclpGmtime _ANSI_ARGS_((CONST time_t * clock)); #endif -#ifndef TclThreadStorageLockInit_TCL_DECLARED -#define TclThreadStorageLockInit_TCL_DECLARED -/* 184 */ -EXTERN void TclThreadStorageLockInit _ANSI_ARGS_((void)); -#endif -#ifndef TclThreadStorageLock_TCL_DECLARED -#define TclThreadStorageLock_TCL_DECLARED -/* 185 */ -EXTERN void TclThreadStorageLock _ANSI_ARGS_((void)); -#endif -#ifndef TclThreadStorageUnlock_TCL_DECLARED -#define TclThreadStorageUnlock_TCL_DECLARED -/* 186 */ -EXTERN void TclThreadStorageUnlock _ANSI_ARGS_((void)); -#endif -#ifndef TclThreadStoragePrint_TCL_DECLARED -#define TclThreadStoragePrint_TCL_DECLARED -/* 187 */ -EXTERN void TclThreadStoragePrint _ANSI_ARGS_((FILE * outFile, - int flags)); -#endif -#ifndef TclThreadStorageGetHashTable_TCL_DECLARED -#define TclThreadStorageGetHashTable_TCL_DECLARED -/* 188 */ -EXTERN Tcl_HashTable * TclThreadStorageGetHashTable _ANSI_ARGS_(( - Tcl_ThreadId id)); -#endif -#ifndef TclThreadStorageInit_TCL_DECLARED -#define TclThreadStorageInit_TCL_DECLARED -/* 189 */ -EXTERN Tcl_HashTable * TclThreadStorageInit _ANSI_ARGS_((Tcl_ThreadId id, - void * reserved)); -#endif -#ifndef TclThreadStorageDataKeyInit_TCL_DECLARED -#define TclThreadStorageDataKeyInit_TCL_DECLARED -/* 190 */ -EXTERN void TclThreadStorageDataKeyInit _ANSI_ARGS_(( - Tcl_ThreadDataKey * keyPtr)); -#endif -#ifndef TclThreadStorageDataKeyGet_TCL_DECLARED -#define TclThreadStorageDataKeyGet_TCL_DECLARED -/* 191 */ -EXTERN void * TclThreadStorageDataKeyGet _ANSI_ARGS_(( - Tcl_ThreadDataKey * keyPtr)); -#endif -#ifndef TclThreadStorageDataKeySet_TCL_DECLARED -#define TclThreadStorageDataKeySet_TCL_DECLARED -/* 192 */ -EXTERN void TclThreadStorageDataKeySet _ANSI_ARGS_(( - Tcl_ThreadDataKey * keyPtr, void * data)); -#endif -#ifndef TclFinalizeThreadStorageThread_TCL_DECLARED -#define TclFinalizeThreadStorageThread_TCL_DECLARED -/* 193 */ -EXTERN void TclFinalizeThreadStorageThread _ANSI_ARGS_(( - Tcl_ThreadId id)); -#endif -#ifndef TclFinalizeThreadStorage_TCL_DECLARED -#define TclFinalizeThreadStorage_TCL_DECLARED -/* 194 */ -EXTERN void TclFinalizeThreadStorage _ANSI_ARGS_((void)); -#endif -#ifndef TclFinalizeThreadStorageData_TCL_DECLARED -#define TclFinalizeThreadStorageData_TCL_DECLARED -/* 195 */ -EXTERN void TclFinalizeThreadStorageData _ANSI_ARGS_(( - Tcl_ThreadDataKey * keyPtr)); -#endif -#ifndef TclFinalizeThreadStorageDataKey_TCL_DECLARED -#define TclFinalizeThreadStorageDataKey_TCL_DECLARED -/* 196 */ -EXTERN void TclFinalizeThreadStorageDataKey _ANSI_ARGS_(( - Tcl_ThreadDataKey * keyPtr)); -#endif +/* Slot 184 is reserved */ +/* Slot 185 is reserved */ +/* Slot 186 is reserved */ +/* Slot 187 is reserved */ +/* Slot 188 is reserved */ +/* Slot 189 is reserved */ +/* Slot 190 is reserved */ +/* Slot 191 is reserved */ +/* Slot 192 is reserved */ +/* Slot 193 is reserved */ +/* Slot 194 is reserved */ +/* Slot 195 is reserved */ +/* Slot 196 is reserved */ #ifndef TclCompEvalObj_TCL_DECLARED #define TclCompEvalObj_TCL_DECLARED /* 197 */ @@ -1368,19 +1307,19 @@ typedef struct TclIntStubs { void *reserved181; struct tm * (*tclpLocaltime) _ANSI_ARGS_((CONST time_t * clock)); /* 182 */ struct tm * (*tclpGmtime) _ANSI_ARGS_((CONST time_t * clock)); /* 183 */ - void (*tclThreadStorageLockInit) _ANSI_ARGS_((void)); /* 184 */ - void (*tclThreadStorageLock) _ANSI_ARGS_((void)); /* 185 */ - void (*tclThreadStorageUnlock) _ANSI_ARGS_((void)); /* 186 */ - void (*tclThreadStoragePrint) _ANSI_ARGS_((FILE * outFile, int flags)); /* 187 */ - Tcl_HashTable * (*tclThreadStorageGetHashTable) _ANSI_ARGS_((Tcl_ThreadId id)); /* 188 */ - Tcl_HashTable * (*tclThreadStorageInit) _ANSI_ARGS_((Tcl_ThreadId id, void * reserved)); /* 189 */ - void (*tclThreadStorageDataKeyInit) _ANSI_ARGS_((Tcl_ThreadDataKey * keyPtr)); /* 190 */ - void * (*tclThreadStorageDataKeyGet) _ANSI_ARGS_((Tcl_ThreadDataKey * keyPtr)); /* 191 */ - void (*tclThreadStorageDataKeySet) _ANSI_ARGS_((Tcl_ThreadDataKey * keyPtr, void * data)); /* 192 */ - void (*tclFinalizeThreadStorageThread) _ANSI_ARGS_((Tcl_ThreadId id)); /* 193 */ - void (*tclFinalizeThreadStorage) _ANSI_ARGS_((void)); /* 194 */ - void (*tclFinalizeThreadStorageData) _ANSI_ARGS_((Tcl_ThreadDataKey * keyPtr)); /* 195 */ - void (*tclFinalizeThreadStorageDataKey) _ANSI_ARGS_((Tcl_ThreadDataKey * keyPtr)); /* 196 */ + void *reserved184; + void *reserved185; + void *reserved186; + void *reserved187; + void *reserved188; + void *reserved189; + void *reserved190; + void *reserved191; + void *reserved192; + void *reserved193; + void *reserved194; + void *reserved195; + void *reserved196; int (*tclCompEvalObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr)); /* 197 */ int (*tclObjGetFrame) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, CallFrame ** framePtrPtr)); /* 198 */ void *reserved199; @@ -2024,58 +1963,19 @@ extern TclIntStubs *tclIntStubsPtr; #define TclpGmtime \ (tclIntStubsPtr->tclpGmtime) /* 183 */ #endif -#ifndef TclThreadStorageLockInit -#define TclThreadStorageLockInit \ - (tclIntStubsPtr->tclThreadStorageLockInit) /* 184 */ -#endif -#ifndef TclThreadStorageLock -#define TclThreadStorageLock \ - (tclIntStubsPtr->tclThreadStorageLock) /* 185 */ -#endif -#ifndef TclThreadStorageUnlock -#define TclThreadStorageUnlock \ - (tclIntStubsPtr->tclThreadStorageUnlock) /* 186 */ -#endif -#ifndef TclThreadStoragePrint -#define TclThreadStoragePrint \ - (tclIntStubsPtr->tclThreadStoragePrint) /* 187 */ -#endif -#ifndef TclThreadStorageGetHashTable -#define TclThreadStorageGetHashTable \ - (tclIntStubsPtr->tclThreadStorageGetHashTable) /* 188 */ -#endif -#ifndef TclThreadStorageInit -#define TclThreadStorageInit \ - (tclIntStubsPtr->tclThreadStorageInit) /* 189 */ -#endif -#ifndef TclThreadStorageDataKeyInit -#define TclThreadStorageDataKeyInit \ - (tclIntStubsPtr->tclThreadStorageDataKeyInit) /* 190 */ -#endif -#ifndef TclThreadStorageDataKeyGet -#define TclThreadStorageDataKeyGet \ - (tclIntStubsPtr->tclThreadStorageDataKeyGet) /* 191 */ -#endif -#ifndef TclThreadStorageDataKeySet -#define TclThreadStorageDataKeySet \ - (tclIntStubsPtr->tclThreadStorageDataKeySet) /* 192 */ -#endif -#ifndef TclFinalizeThreadStorageThread -#define TclFinalizeThreadStorageThread \ - (tclIntStubsPtr->tclFinalizeThreadStorageThread) /* 193 */ -#endif -#ifndef TclFinalizeThreadStorage -#define TclFinalizeThreadStorage \ - (tclIntStubsPtr->tclFinalizeThreadStorage) /* 194 */ -#endif -#ifndef TclFinalizeThreadStorageData -#define TclFinalizeThreadStorageData \ - (tclIntStubsPtr->tclFinalizeThreadStorageData) /* 195 */ -#endif -#ifndef TclFinalizeThreadStorageDataKey -#define TclFinalizeThreadStorageDataKey \ - (tclIntStubsPtr->tclFinalizeThreadStorageDataKey) /* 196 */ -#endif +/* Slot 184 is reserved */ +/* Slot 185 is reserved */ +/* Slot 186 is reserved */ +/* Slot 187 is reserved */ +/* Slot 188 is reserved */ +/* Slot 189 is reserved */ +/* Slot 190 is reserved */ +/* Slot 191 is reserved */ +/* Slot 192 is reserved */ +/* Slot 193 is reserved */ +/* Slot 194 is reserved */ +/* Slot 195 is reserved */ +/* Slot 196 is reserved */ #ifndef TclCompEvalObj #define TclCompEvalObj \ (tclIntStubsPtr->tclCompEvalObj) /* 197 */ diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c index df0bc64..5efadc4 100644 --- a/generic/tclStubInit.c +++ b/generic/tclStubInit.c @@ -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: tclStubInit.c,v 1.120 2005/07/21 21:50:48 dkf Exp $ + * RCS: @(#) $Id: tclStubInit.c,v 1.121 2005/08/05 23:57:36 dkf Exp $ */ #include "tclInt.h" @@ -268,19 +268,19 @@ TclIntStubs tclIntStubs = { NULL, /* 181 */ TclpLocaltime, /* 182 */ TclpGmtime, /* 183 */ - TclThreadStorageLockInit, /* 184 */ - TclThreadStorageLock, /* 185 */ - TclThreadStorageUnlock, /* 186 */ - TclThreadStoragePrint, /* 187 */ - TclThreadStorageGetHashTable, /* 188 */ - TclThreadStorageInit, /* 189 */ - TclThreadStorageDataKeyInit, /* 190 */ - TclThreadStorageDataKeyGet, /* 191 */ - TclThreadStorageDataKeySet, /* 192 */ - TclFinalizeThreadStorageThread, /* 193 */ - TclFinalizeThreadStorage, /* 194 */ - TclFinalizeThreadStorageData, /* 195 */ - TclFinalizeThreadStorageDataKey, /* 196 */ + NULL, /* 184 */ + NULL, /* 185 */ + NULL, /* 186 */ + NULL, /* 187 */ + NULL, /* 188 */ + NULL, /* 189 */ + NULL, /* 190 */ + NULL, /* 191 */ + NULL, /* 192 */ + NULL, /* 193 */ + NULL, /* 194 */ + NULL, /* 195 */ + NULL, /* 196 */ TclCompEvalObj, /* 197 */ TclObjGetFrame, /* 198 */ NULL, /* 199 */ |