Index: generic/nsfAccessInt.h
===================================================================
diff -u -ra09faeafaaacd8dcd4c52cdb86653993e8dc499a -rd6b5b0c4055205d54d3cffa4654b13da05aeb7ab
--- generic/nsfAccessInt.h	(.../nsfAccessInt.h)	(revision a09faeafaaacd8dcd4c52cdb86653993e8dc499a)
+++ generic/nsfAccessInt.h	(.../nsfAccessInt.h)	(revision d6b5b0c4055205d54d3cffa4654b13da05aeb7ab)
@@ -86,6 +86,10 @@
 #define TclVarHashTablePtr(varTablePtr)		&(varTablePtr)->table
 #define TclVarValue(type, varPtr, field)	(type *)(varPtr)->value.field
 
+#if !defined(Tcl_HashSize)
+# define Tcl_HashSize(tablePtr) ((tablePtr)->numEntries)
+#endif
+
 static NSF_INLINE Var *
 VarHashCreateVar(TclVarHashTable *tablePtr, Tcl_Obj *key, int *newPtr) {
   Var *varPtr = NULL;