diff options
| author | dgp <dgp@users.sourceforge.net> | 2014-07-11 20:40:24 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2014-07-11 20:40:24 (GMT) |
| commit | 74d71bafde63ca49cecadc990df7b3a2d7797849 (patch) | |
| tree | 8bd801e430cfd1b95f13188249eef85d24e91a4d | |
| parent | b525ce28bebc490b2cfed08814483e7c88b796a0 (diff) | |
| download | tcl-74d71bafde63ca49cecadc990df7b3a2d7797849.zip tcl-74d71bafde63ca49cecadc990df7b3a2d7797849.tar.gz tcl-74d71bafde63ca49cecadc990df7b3a2d7797849.tar.bz2 | |
Suppress valgrind warnings about uninitialized values.
| -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 */ |