Index: generic/nsf.c
===================================================================
diff -u -r1e69872805e0680718b270961aecc3d25b24612d -rfebe765f7fac1308029fd203b89e974e3ded8ee4
--- generic/nsf.c	(.../nsf.c)	(revision 1e69872805e0680718b270961aecc3d25b24612d)
+++ generic/nsf.c	(.../nsf.c)	(revision febe765f7fac1308029fd203b89e974e3ded8ee4)
@@ -27376,7 +27376,7 @@
 
   typeString = (obj->typePtr != NULL) ? obj->typePtr->name : "";
 
-  resultObj = Tcl_NewListObj(4, NULL);
+  resultObj = Tcl_NewListObj(0, NULL);
   Tcl_ListObjAppendElement(interp, resultObj, Tcl_NewStringObj("type", -1));
   Tcl_ListObjAppendElement(interp, resultObj, Tcl_NewStringObj(typeString, -1));
   Tcl_ListObjAppendElement(interp, resultObj, Tcl_NewStringObj("refcount", -1));
@@ -27398,6 +27398,8 @@
     }
     Tcl_ListObjAppendElement(interp, resultObj, Tcl_NewStringObj(buffer, -1));
 
+  } else {
+    Tcl_ListObjAppendElement(interp, resultObj, Tcl_NewStringObj("", 0));
   }
   Tcl_SetObjResult(interp, resultObj);