diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2007-04-17 14:49:53 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2007-04-17 14:49:53 (GMT) |
| commit | 7ab521d768effeec66e8d06abf0067ce0652a57f (patch) | |
| tree | d38a0997ec4141e501a5f19512dfe1445d8c4404 /unix/tclUnixTest.c | |
| parent | 3943396d1d7a64194d6babf11bbf7db8ab76be16 (diff) | |
| download | tcl-7ab521d768effeec66e8d06abf0067ce0652a57f.zip tcl-7ab521d768effeec66e8d06abf0067ce0652a57f.tar.gz tcl-7ab521d768effeec66e8d06abf0067ce0652a57f.tar.bz2 | |
Eliminate use of (VOID*) casts when calling memset or memcpy.
Diffstat (limited to 'unix/tclUnixTest.c')
| -rw-r--r-- | unix/tclUnixTest.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/unix/tclUnixTest.c b/unix/tclUnixTest.c index eb339aa..acfa5fc 100644 --- a/unix/tclUnixTest.c +++ b/unix/tclUnixTest.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclUnixTest.c,v 1.24 2007/04/16 13:36:36 dkf Exp $ + * RCS: @(#) $Id: tclUnixTest.c,v 1.25 2007/04/17 14:49:53 dkf Exp $ */ #include "tclInt.h" @@ -275,7 +275,7 @@ TestfilehandlerCmd( return TCL_ERROR; } - memset((VOID *) buffer, 'a', 4000); + memset(buffer, 'a', 4000); while (write(GetFd(pipePtr->writeFile), buffer, 4000) > 0) { /* Empty loop body. */ } @@ -288,7 +288,7 @@ TestfilehandlerCmd( return TCL_ERROR; } - memset((VOID *) buffer, 'b', 10); + memset(buffer, 'b', 10); TclFormatInt(buf, write(GetFd(pipePtr->writeFile), buffer, 10)); Tcl_SetResult(interp, buf, TCL_VOLATILE); } else if (strcmp(argv[1], "oneevent") == 0) { |