diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2025-09-04 09:33:13 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2025-09-04 09:33:13 (GMT) |
| commit | d6f93ff4501e5cb46711b621010a5fa27a4908fc (patch) | |
| tree | eb44fff1db0454a9443fe87c7802cc2a718c1ad7 /unix/tclUnixTest.c | |
| parent | 961684edff3e9293d3f3ef918cc5e46041b7b56c (diff) | |
| download | tcl-d6f93ff4501e5cb46711b621010a5fa27a4908fc.zip tcl-d6f93ff4501e5cb46711b621010a5fa27a4908fc.tar.gz tcl-d6f93ff4501e5cb46711b621010a5fa27a4908fc.tar.bz2 | |
Fix some -Wconversion warnings
Diffstat (limited to 'unix/tclUnixTest.c')
| -rw-r--r-- | unix/tclUnixTest.c | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/unix/tclUnixTest.c b/unix/tclUnixTest.c index 46e2db9..55f49d7 100644 --- a/unix/tclUnixTest.c +++ b/unix/tclUnixTest.c @@ -32,7 +32,7 @@ */ #define MakeFile(fd) ((TclFile)INT2PTR(((int)(fd))+1)) -#define GetFd(file) (PTR2INT(file)-1) +#define GetFd(file) ((int)PTR2INT(file)-1) /* * The stuff below is used to keep track of file handlers created and @@ -380,7 +380,7 @@ TestfilewaitCmd( Tcl_AppendResult(interp, "couldn't get channel file", (char *)NULL); return TCL_ERROR; } - fd = PTR2INT(data); + fd = (int)PTR2INT(data); if (Tcl_GetIntFromObj(interp, objv[3], &timeout) != TCL_OK) { return TCL_ERROR; } @@ -615,7 +615,8 @@ TestchmodCmd( int objc, /* Number of arguments. */ Tcl_Obj *const *objv) /* Argument strings. */ { - int i, mode; + Tcl_Size i; + int mode; Tcl_DString ds; if (objc < 2) { |