summaryrefslogtreecommitdiffstats
path: root/generic/tclTest.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2019-07-31 08:51:37 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2019-07-31 08:51:37 (GMT)
commitec84d91a805145aa911a00d4b5f53a8e4513276d (patch)
tree31b731828830c63fb6a6dc6e5d32cc74dc5df7f3 /generic/tclTest.c
parentd4d4aa830739f769c305b523fc4c7000c451845e (diff)
parent3ab4e9ca24a8f7e98e3f7e3040130ba4e3caf2dc (diff)
downloadtcl-ec84d91a805145aa911a00d4b5f53a8e4513276d.zip
tcl-ec84d91a805145aa911a00d4b5f53a8e4513276d.tar.gz
tcl-ec84d91a805145aa911a00d4b5f53a8e4513276d.tar.bz2
Merge 8.6
Diffstat (limited to 'generic/tclTest.c')
-rw-r--r--generic/tclTest.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c
index 4eb8519..9ad8244 100644
--- a/generic/tclTest.c
+++ b/generic/tclTest.c
@@ -2404,11 +2404,11 @@ ExitProcOdd(
void *clientData) /* Integer value to print. */
{
char buf[16 + TCL_INTEGER_SPACE];
- size_t len;
+ int len;
- sprintf(buf, "odd %" TCL_Z_MODIFIER "d\n", (size_t)PTR2INT(clientData));
+ sprintf(buf, "odd %d\n", (int)PTR2INT(clientData));
len = strlen(buf);
- if (len != (size_t) write(1, buf, len)) {
+ if (len != (int) write(1, buf, len)) {
Tcl_Panic("ExitProcOdd: unable to write to stdout");
}
}
@@ -2418,11 +2418,11 @@ ExitProcEven(
void *clientData) /* Integer value to print. */
{
char buf[16 + TCL_INTEGER_SPACE];
- size_t len;
+ int len;
- sprintf(buf, "even %" TCL_Z_MODIFIER "d\n", (size_t)PTR2INT(clientData));
+ sprintf(buf, "even %d\n", (int)PTR2INT(clientData));
len = strlen(buf);
- if (len != (size_t) write(1, buf, len)) {
+ if (len != (int) write(1, buf, len)) {
Tcl_Panic("ExitProcEven: unable to write to stdout");
}
}