1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclObj.c b/generic/tclObj.c
index ae45153..6a1d925 100644
--- a/generic/tclObj.c
+++ b/generic/tclObj.c
@@ -3936,7 +3936,7 @@ AllocObjEntry(
 
     hPtr->key.objPtr = objPtr;
     Tcl_IncrRefCount(objPtr);
-    hPtr->clientData = NULL;
+    Tcl_SetHashValue(hPtr, NULL);
 
     return hPtr;
 }