diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-10-14 19:02:37 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-10-14 19:02:37 (GMT) |
| commit | fe266ed796bfcc848b411947c9529c5eb683dd1f (patch) | |
| tree | f84009e6cf8fbdf467b5b4ee68182626bfc7847f /generic/tclDictObj.c | |
| parent | 358e59a4d232f4b4eaa0fac600c24a915928aed1 (diff) | |
| parent | bd2bdd6f8a4571b486ba30fbf686af3eb82ee6bc (diff) | |
| download | tcl-fe266ed796bfcc848b411947c9529c5eb683dd1f.zip tcl-fe266ed796bfcc848b411947c9529c5eb683dd1f.tar.gz tcl-fe266ed796bfcc848b411947c9529c5eb683dd1f.tar.bz2 | |
Bug 3576509: Better fix, which helps for all Tcl_DictObjGet() calls in Tcl's source code.
Diffstat (limited to 'generic/tclDictObj.c')
| -rw-r--r-- | generic/tclDictObj.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclDictObj.c b/generic/tclDictObj.c index 691fab9..b5c7ac0 100644 --- a/generic/tclDictObj.c +++ b/generic/tclDictObj.c @@ -954,6 +954,7 @@ Tcl_DictObjGet( if (dictPtr->typePtr != &tclDictType) { int result = SetDictFromAny(interp, dictPtr); if (result != TCL_OK) { + *valuePtrPtr = NULL; return result; } } |