diff options
| author | dgp <dgp@noemail.net> | 2011-04-27 18:49:22 (GMT) |
|---|---|---|
| committer | dgp <dgp@noemail.net> | 2011-04-27 18:49:22 (GMT) |
| commit | 7519e312ad873a938bc61a7a5c9c598bb0574c35 (patch) | |
| tree | 74d850ee7ceb6a830457fcb77bac7e42de776ec5 /generic/tclCmdMZ.c | |
| parent | 9798f45e12e7a8e9988a85665bc368965328a5e1 (diff) | |
| download | tcl-7519e312ad873a938bc61a7a5c9c598bb0574c35.zip tcl-7519e312ad873a938bc61a7a5c9c598bb0574c35.tar.gz tcl-7519e312ad873a938bc61a7a5c9c598bb0574c35.tar.bz2 | |
TclFreeIntRep() cleanup.
FossilOrigin-Name: 53b79ea68a8a27842e45d4b2badedb5cb20edeeb
Diffstat (limited to 'generic/tclCmdMZ.c')
| -rw-r--r-- | generic/tclCmdMZ.c | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/generic/tclCmdMZ.c b/generic/tclCmdMZ.c index a4b7d1e..e4a58ed 100644 --- a/generic/tclCmdMZ.c +++ b/generic/tclCmdMZ.c @@ -1560,7 +1560,6 @@ StringIsCmd( if (stop < end) { result = 0; TclFreeIntRep(objPtr); - objPtr->typePtr = NULL; } } break; @@ -1617,7 +1616,6 @@ StringIsCmd( failat = stop - string1; TclFreeIntRep(objPtr); - objPtr->typePtr = NULL; } } else { /* |