diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-10-23 14:33:58 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-10-23 14:33:58 (GMT) |
commit | d068a5439521392f3c0e90a2d51e7b2769399359 (patch) | |
tree | 12fa95547b59c55da6140fd5a15945d6a894aebe /unix/tclUnixFile.c | |
parent | 52f3af0bcf937dece6a0a7cc8d6dc254af41f21b (diff) | |
parent | b986f3138510aaaf704b87f39e2815ad6e3fa5ac (diff) | |
download | tcl-d068a5439521392f3c0e90a2d51e7b2769399359.zip tcl-d068a5439521392f3c0e90a2d51e7b2769399359.tar.gz tcl-d068a5439521392f3c0e90a2d51e7b2769399359.tar.bz2 |
Merge 8.7. But - in stead - remove all deprecated API from libtommath 1.2.0: Starting with Tcl 9.0 we don't support libtommath's deprecated API any more.
Diffstat (limited to 'unix/tclUnixFile.c')
-rw-r--r-- | unix/tclUnixFile.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/unix/tclUnixFile.c b/unix/tclUnixFile.c index 3589253..0cc4031 100644 --- a/unix/tclUnixFile.c +++ b/unix/tclUnixFile.c @@ -270,7 +270,8 @@ TclpMatchInDirectory( Tcl_Encoding encoding = Tcl_GetEncoding(interp ,NULL); Tcl_DStringInit(&dsOrig); - dirName = TclGetStringFromObj(fileNamePtr, &dirLength); + dirName = TclGetString(fileNamePtr); + dirLength = fileNamePtr->length; Tcl_DStringAppend(&dsOrig, dirName, dirLength); /* |