diff options
author | dgp <dgp@noemail.net> | 2014-07-11 20:40:24 (GMT) |
---|---|---|
committer | dgp <dgp@noemail.net> | 2014-07-11 20:40:24 (GMT) |
commit | d9e795830444607eba3955206e9cd5363911931a (patch) | |
tree | eb3ee2c1692a9cdfff0bdcc8c34232941d6c39a4 /generic/tclDictObj.c | |
parent | bcc5dae3be8341fef44c9aab16134be373e1e1d2 (diff) | |
download | tcl-d9e795830444607eba3955206e9cd5363911931a.zip tcl-d9e795830444607eba3955206e9cd5363911931a.tar.gz tcl-d9e795830444607eba3955206e9cd5363911931a.tar.bz2 |
Suppress valgrind warnings about uninitialized values.
FossilOrigin-Name: 37640d60e2bcb5d0bba78efbe5078a8cc0c4011f
Diffstat (limited to 'generic/tclDictObj.c')
-rw-r--r-- | generic/tclDictObj.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/generic/tclDictObj.c b/generic/tclDictObj.c index 3c0ddd8..15fbe1e 100644 --- a/generic/tclDictObj.c +++ b/generic/tclDictObj.c @@ -405,6 +405,7 @@ DupDictInternalRep( */ DICT(copyPtr) = newDict; + copyPtr->internalRep.twoPtrValue.ptr2 = NULL; copyPtr->typePtr = &tclDictType; } @@ -720,6 +721,7 @@ SetDictFromAny( dict->chain = NULL; dict->refcount = 1; DICT(objPtr) = dict; + objPtr->internalRep.twoPtrValue.ptr2 = NULL; objPtr->typePtr = &tclDictType; return TCL_OK; @@ -1390,6 +1392,7 @@ Tcl_NewDictObj(void) dict->chain = NULL; dict->refcount = 1; DICT(dictPtr) = dict; + dictPtr->internalRep.twoPtrValue.ptr2 = NULL; dictPtr->typePtr = &tclDictType; return dictPtr; #endif @@ -1439,6 +1442,7 @@ Tcl_DbNewDictObj( dict->chain = NULL; dict->refcount = 1; DICT(dictPtr) = dict; + dictPtr->internalRep.twoPtrValue.ptr2 = NULL; dictPtr->typePtr = &tclDictType; return dictPtr; #else /* !TCL_MEM_DEBUG */ |