From efa688b6e4162c0ca4b41a86e5319422ed43adb8 Mon Sep 17 00:00:00 2001
From: Miguel Sofer <miguel.sofer@gmail.com>
Date: Sun, 12 Aug 2007 14:40:00 +0000
Subject: 	* generic/tcl_Obj.c (TclAllocateFreeObjects): remove unneeded 
 memset to 0 of all allocated objects.

---
 ChangeLog        | 5 +++++
 generic/tclObj.c | 3 +--
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index c9c8159..6ae1007 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2007-08-12  Miguel Sofer  <msofer@users.sf.net>
+
+	* generic/tcl_Obj.c (TclAllocateFreeObjects): remove unneeded
+	memset to 0 of all allocated objects.
+	
 2007-08-10  Miguel Sofer  <msofer@users.sf.net>
 
 	* generic/tclInt.h: remove redundant ops in TclNewStringObj macro 
diff --git a/generic/tclObj.c b/generic/tclObj.c
index 1e92cf2..c94228a 100644
--- a/generic/tclObj.c
+++ b/generic/tclObj.c
@@ -12,7 +12,7 @@
  * See the file "license.terms" for information on usage and redistribution of
  * this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclObj.c,v 1.131 2007/07/31 17:03:39 msofer Exp $
+ * RCS: @(#) $Id: tclObj.c,v 1.132 2007/08/12 14:40:01 msofer Exp $
  */
 
 #include "tclInt.h"
@@ -791,7 +791,6 @@ TclAllocateFreeObjects(void)
      */
 
     basePtr = (char *) ckalloc(bytesToAlloc);
-    memset(basePtr, 0, bytesToAlloc);
 
     prevPtr = NULL;
     objPtr = (Tcl_Obj *) basePtr;
-- 
cgit v0.12