diff options
| author | dgp <dgp@users.sourceforge.net> | 2004-04-30 20:06:35 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2004-04-30 20:06:35 (GMT) |
| commit | b35ec627d06b2a09c7691d6b36b2b5b4f11c455b (patch) | |
| tree | ae2a40772b982fe11a4e2c70f86601c465020d24 /generic | |
| parent | 736312a51b0efbaf7f69c6b7b7c17a16bc6ab373 (diff) | |
| download | tcl-b35ec627d06b2a09c7691d6b36b2b5b4f11c455b.zip tcl-b35ec627d06b2a09c7691d6b36b2b5b4f11c455b.tar.gz tcl-b35ec627d06b2a09c7691d6b36b2b5b4f11c455b.tar.bz2 | |
* generic/tclInt.h: Replaced Kevin Kenny's temporary
* generic/tclThreadAlloc.c: fix for Bug 945447 with a cleaner,
more permanent replacement.
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclInt.h | 5 | ||||
| -rwxr-xr-x | generic/tclThreadAlloc.c | 10 |
2 files changed, 5 insertions, 10 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 1c7b74c..ff89229 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.154 2004/04/25 20:16:31 dgp Exp $ + * RCS: @(#) $Id: tclInt.h,v 1.155 2004/04/30 20:06:43 dgp Exp $ */ #ifndef _TCLINT @@ -2175,6 +2175,9 @@ EXTERN void TclDbInitNewObj _ANSI_ARGS_((Tcl_Obj *objPtr)); EXTERN Tcl_Obj *TclThreadAllocObj _ANSI_ARGS_((void)); EXTERN void TclThreadFreeObj _ANSI_ARGS_((Tcl_Obj *)); +EXTERN Tcl_Mutex *TclpNewAllocMutex _ANSI_ARGS_((void)); +EXTERN void *TclpGetAllocCache _ANSI_ARGS_((void)); +EXTERN void TclpSetAllocCache _ANSI_ARGS_((void *)); # define TclAllocObjStorage(objPtr) \ (objPtr) = TclThreadAllocObj() diff --git a/generic/tclThreadAlloc.c b/generic/tclThreadAlloc.c index 4f8905f..70a7980 100755 --- a/generic/tclThreadAlloc.c +++ b/generic/tclThreadAlloc.c @@ -11,21 +11,13 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclThreadAlloc.c,v 1.10 2004/04/30 17:45:31 kennykb Exp $ + * RCS: @(#) $Id: tclThreadAlloc.c,v 1.11 2004/04/30 20:06:44 dgp Exp $ */ #if defined(TCL_THREADS) && defined(USE_THREAD_ALLOC) #include "tclInt.h" -#ifdef WIN32 -#include "tclWinInt.h" -#else -extern Tcl_Mutex *TclpNewAllocMutex(void); -extern void *TclpGetAllocCache(void); -extern void TclpSetAllocCache(void *); -#endif - /* * If range checking is enabled, an additional byte will be allocated * to store the magic number at the end of the requested memory. |