diff options
author | apnadkarni <apnmbx-wits@yahoo.com> | 2023-04-21 06:16:53 (GMT) |
---|---|---|
committer | apnadkarni <apnmbx-wits@yahoo.com> | 2023-04-21 06:16:53 (GMT) |
commit | c7f27e3c8788c57a0e58d4b31140a4c4652a422f (patch) | |
tree | b75c4e99c0169e29c90064020a7e6b69e081544c /generic/tclIOUtil.c | |
parent | e86259d193d2c7ad6628755161cc75a706e194cb (diff) | |
download | tcl-c7f27e3c8788c57a0e58d4b31140a4c4652a422f.zip tcl-c7f27e3c8788c57a0e58d4b31140a4c4652a422f.tar.gz tcl-c7f27e3c8788c57a0e58d4b31140a4c4652a422f.tar.bz2 |
Fix warnings generated on disable8api builds
Diffstat (limited to 'generic/tclIOUtil.c')
-rw-r--r-- | generic/tclIOUtil.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/generic/tclIOUtil.c b/generic/tclIOUtil.c index f2f91a7..cec6ad3 100644 --- a/generic/tclIOUtil.c +++ b/generic/tclIOUtil.c @@ -521,7 +521,7 @@ TclFSCwdPointerEquals( if (tsdPtr->cwdPathPtr == *pathPtrPtr) { return 1; } else { - size_t len1, len2; + Tcl_Size len1, len2; const char *str1, *str2; str1 = Tcl_GetStringFromObj(tsdPtr->cwdPathPtr, &len1); @@ -663,7 +663,7 @@ FsUpdateCwd( Tcl_Obj *cwdObj, void *clientData) { - size_t len = 0; + Tcl_Size len = 0; const char *str = NULL; ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&fsDataKey); @@ -1324,7 +1324,7 @@ TclFSNormalizeToUniquePath( { FilesystemRecord *fsRecPtr, *firstFsRecPtr; - size_t i; + Tcl_Size i; int isVfsPath = 0; const char *path; @@ -1686,7 +1686,7 @@ Tcl_FSEvalFileEx( const char *encodingName) /* Either the name of an encoding or NULL to use the utf-8 encoding. */ { - size_t length; + Tcl_Size length; int result = TCL_ERROR; Tcl_StatBuf statBuf; Tcl_Obj *oldScriptFile; @@ -1952,7 +1952,7 @@ EvalFileCallback( * Record information about where the error occurred. */ - size_t length; + Tcl_Size length; const char *pathString = Tcl_GetStringFromObj(pathPtr, &length); const unsigned int limit = 150; int overflow = (length > limit); @@ -2794,7 +2794,7 @@ Tcl_FSGetCwd( * infinite loop bug when trying to normalize tsdPtr->cwdPathPtr. */ - size_t len1, len2; + Tcl_Size len1, len2; const char *str1, *str2; str1 = Tcl_GetStringFromObj(tsdPtr->cwdPathPtr, &len1); |