diff options
| author | Kevin B Kenny <kennykb@acm.org> | 2003-03-06 23:17:05 (GMT) |
|---|---|---|
| committer | Kevin B Kenny <kennykb@acm.org> | 2003-03-06 23:17:05 (GMT) |
| commit | 80e3705531af37524de7a0309ed798a57eb2a0ff (patch) | |
| tree | a3d07e8d721b2ce4c04e620c1cc1bf9a5ee8598b /generic/tclCompCmds.c | |
| parent | da9e36633499c3e8d13cced40652a3d99e6b5bbb (diff) | |
| download | tcl-80e3705531af37524de7a0309ed798a57eb2a0ff.zip tcl-80e3705531af37524de7a0309ed798a57eb2a0ff.tar.gz tcl-80e3705531af37524de7a0309ed798a57eb2a0ff.tar.bz2 | |
Replaced a non-portable 'bzero' with a portable 'memset'. [Bug 698442].
Diffstat (limited to 'generic/tclCompCmds.c')
| -rw-r--r-- | generic/tclCompCmds.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclCompCmds.c b/generic/tclCompCmds.c index 82b58d4..4e5f617 100644 --- a/generic/tclCompCmds.c +++ b/generic/tclCompCmds.c @@ -11,7 +11,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclCompCmds.c,v 1.40 2003/03/05 22:31:23 dkf Exp $ + * RCS: @(#) $Id: tclCompCmds.c,v 1.41 2003/03/06 23:17:09 kennykb Exp $ */ #include "tclInt.h" @@ -3060,7 +3060,7 @@ TclCompileSwitchCmd(interp, parsePtr, envPtr) contFixIndex = -1; fixupArray = (JumpFixup *) ckalloc(sizeof(JumpFixup) * argc); fixupTargetArray = (int *) ckalloc(sizeof(int) * argc); - bzero(fixupTargetArray, sizeof(int) * argc); + (VOID *) memset( fixupTargetArray, 0, argc * sizeof( int ) ); fixupCount = 0; foundDefault = 0; for (i=0 ; i<argc ; i+=2) { |