summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog6
-rw-r--r--generic/tclCompCmds.c4
2 files changed, 8 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog
index 33c6ad1..fd12930 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2003-03-06 Kevin Kenny <kennykb@users.sourceforge.net>
+
+ * generic/tclCompCmds.c (TclCompileSwitchCmd):
+ Replaced a non-portable 'bzero' with a portable 'memset'.
+ [Bug 698442].
+
2003-03-06 Mo DeJong <mdejong@users.sourceforge.net>
* generic/tclIO.c (Tcl_Seek, Tcl_OutputBuffered):
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) {