diff options
author | hobbs <hobbs@noemail.net> | 2002-02-28 00:38:49 (GMT) |
---|---|---|
committer | hobbs <hobbs@noemail.net> | 2002-02-28 00:38:49 (GMT) |
commit | 64f37bb0e89595c32f5341544aeff15024edd796 (patch) | |
tree | b13a33f7affb8b37a067fd9faec791a031099003 /generic/tclTest.c | |
parent | 06eaf49faf0c78c6e060a8c474fffeb50757f3dc (diff) | |
download | tcl-64f37bb0e89595c32f5341544aeff15024edd796.zip tcl-64f37bb0e89595c32f5341544aeff15024edd796.tar.gz tcl-64f37bb0e89595c32f5341544aeff15024edd796.tar.bz2 |
* generic/tclTest.c (TestStatProc[123]): correct harmless UMRs.
FossilOrigin-Name: d738ccd46605bb2719d2a441f9fde1c3f84d4228
Diffstat (limited to 'generic/tclTest.c')
-rw-r--r-- | generic/tclTest.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c index 4c34d31..e80818e 100644 --- a/generic/tclTest.c +++ b/generic/tclTest.c @@ -13,7 +13,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.45 2002/02/15 23:42:12 kennykb Exp $ + * RCS: @(#) $Id: tclTest.c,v 1.46 2002/02/28 00:38:49 hobbs Exp $ */ #define TCL_TEST @@ -4404,6 +4404,7 @@ TestStatProc1(path, buf) CONST char *path; struct stat *buf; { + memset(buf, 0, sizeof(struct stat)); buf->st_size = 1234; return ((strstr(path, "testStat1%.fil") == NULL) ? -1 : 0); } @@ -4414,6 +4415,7 @@ TestStatProc2(path, buf) CONST char *path; struct stat *buf; { + memset(buf, 0, sizeof(struct stat)); buf->st_size = 2345; return ((strstr(path, "testStat2%.fil") == NULL) ? -1 : 0); } @@ -4424,6 +4426,7 @@ TestStatProc3(path, buf) CONST char *path; struct stat *buf; { + memset(buf, 0, sizeof(struct stat)); buf->st_size = 3456; return ((strstr(path, "testStat3%.fil") == NULL) ? -1 : 0); } |