diff options
| author | hobbs <hobbs> | 2004-07-21 01:30:56 (GMT) |
|---|---|---|
| committer | hobbs <hobbs> | 2004-07-21 01:30:56 (GMT) |
| commit | 35aaaabee5bfe6153316c0c218f181a6ece932b8 (patch) | |
| tree | 485b0b4f6b33aad1eb86cc5ec0ddf7c71966fd7c /generic/tclInt.h | |
| parent | 40d5cf5ccfdcafa74b7aa04c28227e8185509c99 (diff) | |
| download | tcl-35aaaabee5bfe6153316c0c218f181a6ece932b8.zip tcl-35aaaabee5bfe6153316c0c218f181a6ece932b8.tar.gz tcl-35aaaabee5bfe6153316c0c218f181a6ece932b8.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:
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() |