diff options
| author | dgp <dgp@users.sourceforge.net> | 2011-10-31 17:06:31 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2011-10-31 17:06:31 (GMT) |
| commit | cf9df921f620da4fa43f83f17cee6b789c910002 (patch) | |
| tree | 4dc6dab0786e1ed7df03bb95f5447f08f2c66792 /generic/tclInt.h | |
| parent | 5ca626b4e6d4c45aa0ba1798b382251f70625de7 (diff) | |
| parent | f756b0c2a727168bdc397f67c905951991e35a32 (diff) | |
| download | tcl-cf9df921f620da4fa43f83f17cee6b789c910002.zip tcl-cf9df921f620da4fa43f83f17cee6b789c910002.tar.gz tcl-cf9df921f620da4fa43f83f17cee6b789c910002.tar.bz2 | |
3414754 Fix the PATHFLAGS != 0 intrep normalizing trailing slashes.
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 854404f..e1ce6d5 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -2741,7 +2741,7 @@ MODULE_SCOPE int TclpMatchFiles(Tcl_Interp *interp, char *separators, Tcl_DString *dirPtr, char *pattern, char *tail); MODULE_SCOPE int TclpObjNormalizePath(Tcl_Interp *interp, Tcl_Obj *pathPtr, int nextCheckpoint); -MODULE_SCOPE void TclpNativeJoinPath(Tcl_Obj *prefix, char *joining); +MODULE_SCOPE void TclpNativeJoinPath(Tcl_Obj *prefix, const char *joining); MODULE_SCOPE Tcl_Obj * TclpNativeSplitPath(Tcl_Obj *pathPtr, int *lenPtr); MODULE_SCOPE Tcl_PathType TclpGetNativePathType(Tcl_Obj *pathPtr, int *driveNameLengthPtr, Tcl_Obj **driveNameRef); |