summaryrefslogtreecommitdiffstats
path: root/generic/tclOO.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2023-10-01 19:24:38 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2023-10-01 19:24:38 (GMT)
commit6c67bd02861aa2363f0e2ef8dd4639566a114351 (patch)
tree070b306b337b29035c94adafe148364a028f5f4e /generic/tclOO.c
parenta568c3a7370ca204923a22917acd5520223036f9 (diff)
downloadtcl-6c67bd02861aa2363f0e2ef8dd4639566a114351.zip
tcl-6c67bd02861aa2363f0e2ef8dd4639566a114351.tar.gz
tcl-6c67bd02861aa2363f0e2ef8dd4639566a114351.tar.bz2
Fix [7b31677235]: tclOO.c: initialize fakeObject.refCount
Diffstat (limited to 'generic/tclOO.c')
-rw-r--r--generic/tclOO.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclOO.c b/generic/tclOO.c
index c8937ef..4efdd9e 100644
--- a/generic/tclOO.c
+++ b/generic/tclOO.c
@@ -398,6 +398,7 @@ InitFoundation(
*/
fakeCls.thisPtr = &fakeObject;
+ fakeObject.refCount = 0; /* Do not increment an uninitialized value. */
fPtr->objectCls = TclOOAllocClass(interp,
AllocObject(interp, "object", (Namespace *)fPtr->ooNs, NULL));