diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2025-04-01 08:13:35 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2025-04-01 08:13:35 (GMT) |
commit | 79ed51d25a48dce0d084a2c57f199821e58eac99 (patch) | |
tree | 8de2f1cd37877eb5773cd0106a1de4e42703d936 /unix/tclUnixFile.c | |
parent | b915f649c229620e5a17add0e25b85ee99c9c91d (diff) | |
parent | 254025c6d682cfde6e1cada371c419af7c60087b (diff) | |
download | tcl-79ed51d25a48dce0d084a2c57f199821e58eac99.zip tcl-79ed51d25a48dce0d084a2c57f199821e58eac99.tar.gz tcl-79ed51d25a48dce0d084a2c57f199821e58eac99.tar.bz2 |
Fix some -Wconversion warnings
Diffstat (limited to 'unix/tclUnixFile.c')
-rw-r--r-- | unix/tclUnixFile.c | 34 |
1 files changed, 17 insertions, 17 deletions
diff --git a/unix/tclUnixFile.c b/unix/tclUnixFile.c index 2b0b5b0..91e9ffb 100644 --- a/unix/tclUnixFile.c +++ b/unix/tclUnixFile.c @@ -317,7 +317,7 @@ TclpMatchInDirectory( return TCL_OK; } - d = TclOSopendir(native); /* INTL: Native. */ + d = TclOSopendir(native); /* INTL: Native. */ if (d == NULL) { Tcl_DStringFree(&ds); if (interp != NULL) { @@ -431,10 +431,10 @@ TclpMatchInDirectory( static int NativeMatchType( - Tcl_Interp *interp, /* Interpreter to receive errors. */ - const char *nativeEntry, /* Native path to check. */ - const char *nativeName, /* Native filename to check. */ - Tcl_GlobTypeData *types) /* Type description to match against. */ + Tcl_Interp *interp, /* Interpreter to receive errors. */ + const char *nativeEntry, /* Native path to check. */ + const char *nativeName, /* Native filename to check. */ + Tcl_GlobTypeData *types) /* Type description to match against. */ { Tcl_StatBuf buf; @@ -1237,13 +1237,13 @@ TclOSfstat( Tcl_StatBuf *statBuf = (Tcl_StatBuf *)cygstat; int result = fstat(fd, &buf); - statBuf->st_mode = buf.st_mode; - statBuf->st_ino = buf.st_ino; + statBuf->st_mode = (unsigned short)buf.st_mode; + statBuf->st_ino = (unsigned short)buf.st_ino; statBuf->st_dev = buf.st_dev; statBuf->st_rdev = buf.st_rdev; statBuf->st_nlink = buf.st_nlink; - statBuf->st_uid = buf.st_uid; - statBuf->st_gid = buf.st_gid; + statBuf->st_uid = (short)buf.st_uid; + statBuf->st_gid = (short)buf.st_gid; statBuf->st_size = buf.st_size; statBuf->st_atime = buf.st_atime; statBuf->st_mtime = buf.st_mtime; @@ -1260,13 +1260,13 @@ TclOSstat( Tcl_StatBuf *statBuf = (Tcl_StatBuf *)cygstat; int result = stat(name, &buf); - statBuf->st_mode = buf.st_mode; - statBuf->st_ino = buf.st_ino; + statBuf->st_mode = (unsigned short)buf.st_mode; + statBuf->st_ino = (unsigned short)buf.st_ino; statBuf->st_dev = buf.st_dev; statBuf->st_rdev = buf.st_rdev; statBuf->st_nlink = buf.st_nlink; - statBuf->st_uid = buf.st_uid; - statBuf->st_gid = buf.st_gid; + statBuf->st_uid = (short)buf.st_uid; + statBuf->st_gid = (short)buf.st_gid; statBuf->st_size = buf.st_size; statBuf->st_atime = buf.st_atime; statBuf->st_mtime = buf.st_mtime; @@ -1283,13 +1283,13 @@ TclOSlstat( Tcl_StatBuf *statBuf = (Tcl_StatBuf *)cygstat; int result = lstat(name, &buf); - statBuf->st_mode = buf.st_mode; - statBuf->st_ino = buf.st_ino; + statBuf->st_mode = (unsigned short)buf.st_mode; + statBuf->st_ino = (unsigned short)buf.st_ino; statBuf->st_dev = buf.st_dev; statBuf->st_rdev = buf.st_rdev; statBuf->st_nlink = buf.st_nlink; - statBuf->st_uid = buf.st_uid; - statBuf->st_gid = buf.st_gid; + statBuf->st_uid = (short)buf.st_uid; + statBuf->st_gid = (short)buf.st_gid; statBuf->st_size = buf.st_size; statBuf->st_atime = buf.st_atime; statBuf->st_mtime = buf.st_mtime; |