summaryrefslogtreecommitdiffstats
path: root/win/tclWinFile.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2023-05-09 13:06:02 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2023-05-09 13:06:02 (GMT)
commit2e02e1affdde86a1dd00fc78a73af5924c6d30a0 (patch)
treeedd17dc2eb2b5ee392bc152bec52ebad7a56461b /win/tclWinFile.c
parent8f15f094913d1b1304514e093149538bf2cfedc5 (diff)
downloadtcl-2e02e1affdde86a1dd00fc78a73af5924c6d30a0.zip
tcl-2e02e1affdde86a1dd00fc78a73af5924c6d30a0.tar.gz
tcl-2e02e1affdde86a1dd00fc78a73af5924c6d30a0.tar.bz2
Remove useless type-casts. Backport some changes from 9.0
Diffstat (limited to 'win/tclWinFile.c')
-rw-r--r--win/tclWinFile.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/win/tclWinFile.c b/win/tclWinFile.c
index f0c46f9..adc1d7d 100644
--- a/win/tclWinFile.c
+++ b/win/tclWinFile.c
@@ -170,7 +170,7 @@ static int NativeWriteReparse(const WCHAR *LinkDirectory,
static int NativeMatchType(int isDrive, DWORD attr,
const WCHAR *nativeName, Tcl_GlobTypeData *types);
static int WinIsDrive(const char *name, size_t nameLen);
-static Tcl_Size WinIsReserved(const char *path);
+static size_t WinIsReserved(const char *path);
static Tcl_Obj * WinReadLink(const WCHAR *LinkSource);
static Tcl_Obj * WinReadLinkDirectory(const WCHAR *LinkDirectory);
static int WinLink(const WCHAR *LinkSource,
@@ -1245,7 +1245,7 @@ WinIsDrive(
* (not any trailing :).
*/
-static Tcl_Size
+static size_t
WinIsReserved(
const char *path) /* Path in UTF-8 */
{
@@ -2579,14 +2579,14 @@ TclpObjNormalizePath(
*/
if (isDrive) {
- Tcl_Size len = WinIsReserved(path);
+ size_t len = WinIsReserved(path);
if (len > 0) {
/*
* Actually it does exist - COM1, etc.
*/
- Tcl_Size i;
+ size_t i;
for (i=0 ; i<len ; i++) {
WCHAR wc = ((WCHAR *)nativePath)[i];
@@ -2744,7 +2744,7 @@ TclpObjNormalizePath(
sizeof(WCHAR));
Tcl_DStringAppend(&dsNorm,
(const char *) nativeName,
- (int) (wcslen(nativeName)*sizeof(WCHAR)));
+ wcslen(nativeName)*sizeof(WCHAR));
}
}
}