diff options
| author | mdejong <mdejong> | 2003-07-24 18:16:30 (GMT) |
|---|---|---|
| committer | mdejong <mdejong> | 2003-07-24 18:16:30 (GMT) |
| commit | 36f1698a072c40091f4452ae29366b10cc4be03c (patch) | |
| tree | 420611bcf77c01f467cd63a0bb099405c28b3cdb /generic/tcl.h | |
| parent | db3db9df91cdc7d1b0bdac6c9c927765ce9afd95 (diff) | |
| download | tcl-36f1698a072c40091f4452ae29366b10cc4be03c.zip tcl-36f1698a072c40091f4452ae29366b10cc4be03c.tar.gz tcl-36f1698a072c40091f4452ae29366b10cc4be03c.tar.bz2 | |
* generic/tcl.h: Revert change made on 2003-07-21
since it made the sizeof(Tcl_Obj) different for
regular vs mem debug builds.
* generic/tclInt.h: Define TclDecrRefCount in terms
of Tcl_DbDecrRefCount which removes one layer of
inderection.
* generic/tclObj.c (TclDbInitNewObj, Tcl_DbIncrRefCount,
Tcl_DbDecrRefCount, Tcl_DbIsShared):
Define ThreadSpecificData that contains a hashtable.
The table is used to ensure that a Tcl_Obj is only
acted upon in the thread that allocated it. This
checking code is enabled only when mem debug and
threads are enabled.
Diffstat (limited to 'generic/tcl.h')
| -rw-r--r-- | generic/tcl.h | 11 |
1 files changed, 1 insertions, 10 deletions
diff --git a/generic/tcl.h b/generic/tcl.h index bbe13a7..1b02611 100644 --- a/generic/tcl.h +++ b/generic/tcl.h @@ -13,7 +13,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tcl.h,v 1.161 2003/07/22 00:59:58 mdejong Exp $ + * RCS: @(#) $Id: tcl.h,v 1.162 2003/07/24 18:16:30 mdejong Exp $ */ #ifndef _TCL @@ -778,15 +778,6 @@ typedef struct Tcl_Obj { VOID *ptr2; } twoPtrValue; } internalRep; - - /* - * Thread id used to check that calls to Tcl_IncrRefCount, - * Tcl_DecrRefCount, and Tcl_IsShared are being made - * from the thread that originally allocated the Tcl_Obj. - */ -#if defined(TCL_MEM_DEBUG) && defined(TCL_THREADS) - Tcl_ThreadId allocThread; -#endif } Tcl_Obj; |