summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorrmax <rmax>2008-03-14 16:32:50 (GMT)
committerrmax <rmax>2008-03-14 16:32:50 (GMT)
commit473838eabcddf5535160c095af0a1b71e68d48f7 (patch)
treebcce11adaf2714eb933e590421dcf30d5320c424 /generic
parent25c98e6ecf1d1c3c2d355c446344111dd22b1a65 (diff)
downloadtcl-473838eabcddf5535160c095af0a1b71e68d48f7.zip
tcl-473838eabcddf5535160c095af0a1b71e68d48f7.tar.gz
tcl-473838eabcddf5535160c095af0a1b71e68d48f7.tar.bz2
* generic/tclTest.c: Ignore the return value of write() when
* unix/tclUnixPipe.c: we are about to exit anyways.
Diffstat (limited to 'generic')
-rw-r--r--generic/tclTest.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c
index 76f982c..7f48903 100644
--- a/generic/tclTest.c
+++ b/generic/tclTest.c
@@ -14,7 +14,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclTest.c,v 1.113 2007/12/13 15:23:20 dgp Exp $
+ * RCS: @(#) $Id: tclTest.c,v 1.114 2008/03/14 16:32:52 rmax Exp $
*/
#define TCL_TEST
@@ -2210,7 +2210,7 @@ ExitProcOdd(
char buf[16 + TCL_INTEGER_SPACE];
sprintf(buf, "odd %d\n", PTR2INT(clientData));
- write(1, buf, strlen(buf));
+ (void)write(1, buf, strlen(buf));
}
static void
@@ -2220,7 +2220,7 @@ ExitProcEven(
char buf[16 + TCL_INTEGER_SPACE];
sprintf(buf, "even %d\n", PTR2INT(clientData));
- write(1, buf, strlen(buf));
+ (void)write(1, buf, strlen(buf));
}
/*