Fix [7b31677235]: tclOO.c: initialize fakeObject.refCount

tcltk · Oct 1, 2023 · 6c67bd0 · 6c67bd0
1 parent a568c3a
commit 6c67bd0
Showing 1 changed file with 1 addition and 0 deletions.
diff --git 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));