diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-04-26 15:53:40 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-04-26 15:53:40 (GMT) |
| commit | cd51753d86cde24e24f0fa1c6edf6821ba25d0aa (patch) | |
| tree | d4ba6b39c3f40354edd6a8bf89eb6c5573528925 /win | |
| parent | f227a5d1ff1c36d3bc5eca3f7378d5064d59d4eb (diff) | |
| download | tcl-cd51753d86cde24e24f0fa1c6edf6821ba25d0aa.zip tcl-cd51753d86cde24e24f0fa1c6edf6821ba25d0aa.tar.gz tcl-cd51753d86cde24e24f0fa1c6edf6821ba25d0aa.tar.bz2 | |
More size_t -> Tcl_Size changes, which were missed before. Also (experimental) make the wrapper macro's produce compiler warnings is Tcl_Size is not used.
Diffstat (limited to 'win')
| -rw-r--r-- | win/tclWinFCmd.c | 2 | ||||
| -rw-r--r-- | win/tclWinFile.c | 10 | ||||
| -rw-r--r-- | win/tclWinInit.c | 2 | ||||
| -rw-r--r-- | win/tclWinPipe.c | 2 |
4 files changed, 8 insertions, 8 deletions
diff --git a/win/tclWinFCmd.c b/win/tclWinFCmd.c index 391c119..37f0834 100644 --- a/win/tclWinFCmd.c +++ b/win/tclWinFCmd.c @@ -1536,7 +1536,7 @@ GetWinFileAttributes( * We test for, and fix that case, here. */ - size_t len; + Tcl_Size len; const char *str = Tcl_GetStringFromObj(fileName, &len); if (len < 4) { diff --git a/win/tclWinFile.c b/win/tclWinFile.c index 0410356..bcd0920 100644 --- a/win/tclWinFile.c +++ b/win/tclWinFile.c @@ -921,7 +921,7 @@ TclpMatchInDirectory( DWORD attr; WIN32_FILE_ATTRIBUTE_DATA data; - size_t len = 0; + Tcl_Size len = 0; const char *str = Tcl_GetStringFromObj(norm, &len); native = (const WCHAR *)Tcl_FSGetNativePath(pathPtr); @@ -943,7 +943,7 @@ TclpMatchInDirectory( WIN32_FIND_DATAW data; const char *dirName; /* UTF-8 dir name, later with pattern * appended. */ - size_t dirLength; + Tcl_Size dirLength; int matchSpecialDots; Tcl_DString ds; /* Native encoding of dir, also used * temporarily for other things. */ @@ -2796,7 +2796,7 @@ TclpObjNormalizePath( */ Tcl_Obj *tmpPathPtr; - size_t len; + Tcl_Size len; tmpPathPtr = Tcl_NewStringObj(Tcl_DStringValue(&ds), nextCheckpoint); @@ -2885,7 +2885,7 @@ TclWinVolumeRelativeNormalize( * also on drive C. */ - size_t cwdLen; + Tcl_Size cwdLen; const char *drive = Tcl_GetStringFromObj(useThisCwd, &cwdLen); char drive_cur = path[0]; @@ -3022,7 +3022,7 @@ TclNativeCreateNativeRep( WCHAR *nativePathPtr = NULL; const char *str; Tcl_Obj *validPathPtr; - size_t len; + Tcl_Size len; WCHAR *wp; if (TclFSCwdIsNative()) { diff --git a/win/tclWinInit.c b/win/tclWinInit.c index ec27837..510b6df 100644 --- a/win/tclWinInit.c +++ b/win/tclWinInit.c @@ -131,7 +131,7 @@ TclpInitLibraryPath( Tcl_Obj *pathPtr; char installLib[LIBRARY_SIZE]; const char *bytes; - size_t length; + Tcl_Size length; TclNewObj(pathPtr); diff --git a/win/tclWinPipe.c b/win/tclWinPipe.c index da24306..d9cee73 100644 --- a/win/tclWinPipe.c +++ b/win/tclWinPipe.c @@ -3191,7 +3191,7 @@ TclpOpenTemporaryFile( char *namePtr; HANDLE handle; DWORD flags = FILE_ATTRIBUTE_TEMPORARY; - size_t length; + Tcl_Size length; int counter, counter2; Tcl_DString buf; |