Index: generic/nsf.c
===================================================================
diff -u -N -r83d483b74045049b06eb8ca3ec1c58680c1e58b4 -rc9a0d623d5d561d4c0f1dcd97cada90ba8fbb108
--- generic/nsf.c	(.../nsf.c)	(revision 83d483b74045049b06eb8ca3ec1c58680c1e58b4)
+++ generic/nsf.c	(.../nsf.c)	(revision c9a0d623d5d561d4c0f1dcd97cada90ba8fbb108)
@@ -33538,8 +33538,7 @@
 */
 static int
 NsfObjInfoVarsMethod(Tcl_Interp *interp, NsfObject *object, const char *pattern) {
-  Tcl_Obj         *varList, *okList, *element;
-  int              i, length;
+  Tcl_Obj         *okList;
   TclVarHashTable *varTablePtr;
 
   nonnull_assert(interp != NULL);
@@ -33556,6 +33555,9 @@
    * NULL.
    */
   if (likely(varTablePtr != NULL)) {
+    Tcl_Obj  *varList, *element;
+    int       i, length;
+
     ListVarKeys(interp, TclVarHashTablePtr(varTablePtr), pattern);
     varList = Tcl_GetObjResult(interp);