diff options
| author | dgp <dgp@users.sourceforge.net> | 2011-04-25 17:51:14 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2011-04-25 17:51:14 (GMT) |
| commit | 34fcfa780b6ed1022239c614a3e2235a88bc3696 (patch) | |
| tree | 34e6cabc16d61e279baf7e0d225ac6dffec43f68 /generic/tclPathObj.c | |
| parent | 8b8a05a0fbdb61efa8af4699fd8ea2f15d09e3de (diff) | |
| download | tcl-34fcfa780b6ed1022239c614a3e2235a88bc3696.zip tcl-34fcfa780b6ed1022239c614a3e2235a88bc3696.tar.gz tcl-34fcfa780b6ed1022239c614a3e2235a88bc3696.tar.bz2 | |
TclFreeIntRep() related cleanup.
Diffstat (limited to 'generic/tclPathObj.c')
| -rw-r--r-- | generic/tclPathObj.c | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/generic/tclPathObj.c b/generic/tclPathObj.c index 01a297b..d9e3973 100644 --- a/generic/tclPathObj.c +++ b/generic/tclPathObj.c @@ -1156,7 +1156,6 @@ Tcl_FSConvertToPathType( UpdateStringOfFsPath(pathPtr); } FreeFsPathInternalRep(pathPtr); - pathPtr->typePtr = NULL; } return Tcl_ConvertToType(interp, pathPtr, &tclFsPathType); @@ -1175,7 +1174,6 @@ Tcl_FSConvertToPathType( * UpdateStringOfFsPath(pathPtr); * } * FreeFsPathInternalRep(pathPtr); - * pathPtr->typePtr = NULL; * return Tcl_ConvertToType(interp, pathPtr, &tclFsPathType); * } * } @@ -1903,7 +1901,6 @@ Tcl_FSGetNormalizedPath( UpdateStringOfFsPath(pathPtr); } FreeFsPathInternalRep(pathPtr); - pathPtr->typePtr = NULL; if (Tcl_ConvertToType(interp, pathPtr, &tclFsPathType) != TCL_OK) { return NULL; } @@ -2214,7 +2211,6 @@ TclFSEnsureEpochOk( UpdateStringOfFsPath(pathPtr); } FreeFsPathInternalRep(pathPtr); - pathPtr->typePtr = NULL; if (SetFsPathFromAny(NULL, pathPtr) != TCL_OK) { return TCL_ERROR; } |