summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2011-08-18 06:47:51 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2011-08-18 06:47:51 (GMT)
commita6250b7467b38acdb154e904cd9903bab188810d (patch)
tree55eff3f3a1abf7dec86fd3947941fec40f83e1f1
parent96af7fcd51a853aac2eb09b6de444a9789e04638 (diff)
downloadtcl-a6250b7467b38acdb154e904cd9903bab188810d.zip
tcl-a6250b7467b38acdb154e904cd9903bab188810d.tar.gz
tcl-a6250b7467b38acdb154e904cd9903bab188810d.tar.bz2
A few more compiler warnings
-rw-r--r--generic/tclIOCmd.c2
-rw-r--r--unix/tclUnixFCmd.c6
2 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclIOCmd.c b/generic/tclIOCmd.c
index 44c2738..7d54156 100644
--- a/generic/tclIOCmd.c
+++ b/generic/tclIOCmd.c
@@ -779,7 +779,7 @@ Tcl_ExecObjCmd(dummy, interp, objc, objv)
argv = argStorage;
argc = objc - skip;
- if ((argc + 1) > sizeof(argv) / sizeof(argv[0])) {
+ if ((argc + 1) > (int)(sizeof(argv) / sizeof(argv[0]))) {
argv = (CONST char **) ckalloc((unsigned)(argc + 1) * sizeof(char *));
}
diff --git a/unix/tclUnixFCmd.c b/unix/tclUnixFCmd.c
index 1fbe384..50e1921 100644
--- a/unix/tclUnixFCmd.c
+++ b/unix/tclUnixFCmd.c
@@ -536,10 +536,10 @@ CopyFile(src, dst, statBufPtr)
buffer = ckalloc(blockSize);
while (1) {
nread = read(srcFd, buffer, blockSize);
- if ((nread == -1) || (nread == 0)) {
+ if ((nread == (size_t) -1) || (nread == 0)) {
break;
}
- if (write(dstFd, buffer, nread) != nread) {
+ if (write(dstFd, buffer, nread) != (int)nread) {
nread = (size_t) -1;
break;
}
@@ -547,7 +547,7 @@ CopyFile(src, dst, statBufPtr)
ckfree(buffer);
close(srcFd);
- if ((close(dstFd) != 0) || (nread == -1)) {
+ if ((close(dstFd) != 0) || (nread == (size_t) -1)) {
unlink(dst); /* INTL: Native. */
return TCL_ERROR;
}