diff options
author | hobbs <hobbs@noemail.net> | 2004-07-21 01:30:56 (GMT) |
---|---|---|
committer | hobbs <hobbs@noemail.net> | 2004-07-21 01:30:56 (GMT) |
commit | c8c8ac6faa6c1e23ed232c07d17abf871019332f (patch) | |
tree | 485b0b4f6b33aad1eb86cc5ec0ddf7c71966fd7c /generic/tclInt.h | |
parent | b33dda57bb359216c7a2aab539c536e5d7903ae2 (diff) | |
download | tcl-c8c8ac6faa6c1e23ed232c07d17abf871019332f.zip tcl-c8c8ac6faa6c1e23ed232c07d17abf871019332f.tar.gz tcl-c8c8ac6faa6c1e23ed232c07d17abf871019332f.tar.bz2 |
* generic/tclEvent.c: Correct threaded obj allocator to
* generic/tclInt.h: fully cleanup on exit and allow for
* generic/tclThreadAlloc.c: reinitialization. [Bug #736426]
* unix/tclUnixThrd.c: (mistachkin, kenny)
* win/tclWinThrd.c:
FossilOrigin-Name: 12bdd26d68349a144e518c4ffc10d6d5a59fb459
Diffstat (limited to 'generic/tclInt.h')
-rw-r--r-- | generic/tclInt.h | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 95129b6..c3c0904 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -12,7 +12,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclInt.h,v 1.118.2.6 2004/06/22 11:55:35 vasiljevic Exp $ + * RCS: @(#) $Id: tclInt.h,v 1.118.2.7 2004/07/21 01:30:57 hobbs Exp $ */ #ifndef _TCLINT @@ -2138,6 +2138,9 @@ EXTERN Tcl_Obj *TclPtrIncrVar _ANSI_ARGS_((Tcl_Interp *interp, Var *varPtr, EXTERN Tcl_Obj *TclThreadAllocObj _ANSI_ARGS_((void)); EXTERN void TclThreadFreeObj _ANSI_ARGS_((Tcl_Obj *)); +EXTERN void TclFinalizeThreadAlloc _ANSI_ARGS_((void)); +EXTERN void TclpFreeAllocMutex _ANSI_ARGS_((Tcl_Mutex* mutex)); + # define TclAllocObjStorage(objPtr) \ (objPtr) = TclThreadAllocObj() |