diff options
author | dgp <dgp@users.sourceforge.net> | 2019-08-26 15:55:03 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2019-08-26 15:55:03 (GMT) |
commit | 9b14adeeea423c1bb5f7204eec18ffdff0df0381 (patch) | |
tree | cc9713b5ab812b49fdb40c3b05bee50428c789c0 /generic/tclTest.c | |
parent | c5da22ebff9ceadd0cdba231ffea95d4ae6891dd (diff) | |
parent | 3718091236ee12146de730e2d5d733a3ee6ce77f (diff) | |
download | tcl-9b14adeeea423c1bb5f7204eec18ffdff0df0381.zip tcl-9b14adeeea423c1bb5f7204eec18ffdff0df0381.tar.gz tcl-9b14adeeea423c1bb5f7204eec18ffdff0df0381.tar.bz2 |
merge 8.6
Diffstat (limited to 'generic/tclTest.c')
-rw-r--r-- | generic/tclTest.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c index 1a4d7bf..473368c 100644 --- a/generic/tclTest.c +++ b/generic/tclTest.c @@ -2384,11 +2384,11 @@ ExitProcOdd( ClientData clientData) /* Integer value to print. */ { char buf[16 + TCL_INTEGER_SPACE]; - size_t len; + int len; - sprintf(buf, "odd %d\n", 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"); } } @@ -2398,11 +2398,11 @@ ExitProcEven( ClientData clientData) /* Integer value to print. */ { char buf[16 + TCL_INTEGER_SPACE]; - size_t len; + int len; - sprintf(buf, "even %d\n", 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"); } } |