Index: generic/nsf.c
===================================================================
diff -u -N -r152c1d303323553b9eb8a0a04459ba952941ae64 -r7992ec41920e312596d965930cd2d1ad643e7fb5
--- generic/nsf.c	(.../nsf.c)	(revision 152c1d303323553b9eb8a0a04459ba952941ae64)
+++ generic/nsf.c	(.../nsf.c)	(revision 7992ec41920e312596d965930cd2d1ad643e7fb5)
@@ -31248,7 +31248,6 @@
   Tcl_HashTable *varTablePtr, *cmdTablePtr, *childTablePtr;
   Tcl_HashSearch search;
   Tcl_Command cmd;
-  const Var *varPtr;
   register Tcl_HashEntry *entryPtr;
 
   nonnull_assert(interp != NULL);
@@ -31276,6 +31275,7 @@
          entryPtr != NULL;
          entryPtr = Tcl_NextHashEntry(&search)) {
       Tcl_Obj *nameObj;
+      Var *varPtr;
       GetVarAndNameFromHash(entryPtr, &varPtr, &nameObj);
       if (!TclIsVarUndefined(varPtr) || TclIsVarNamespaceVar(varPtr)) {
         /* fprintf(stderr, "unsetting var %s\n", ObjStr(nameObj));*/