Index: generic/nsf.c =================================================================== diff -u -N -reef40b991c9897e1f64760af7088cd1dec078f23 -ra11d866d48c3ced35ec09fe74ddc12b58b6ef928 --- generic/nsf.c (.../nsf.c) (revision eef40b991c9897e1f64760af7088cd1dec078f23) +++ generic/nsf.c (.../nsf.c) (revision a11d866d48c3ced35ec09fe74ddc12b58b6ef928) @@ -24059,7 +24059,7 @@ /* * Omit argument checking, provided that ... * ... argument checking is turned off *and* no converter is specified, or - * ... the ruling parameter option is 'initcmd' + * ... the ruling parameter option is 'cmd' * ... slotset is active */ if ((unlikely((doCheckArguments & NSF_ARGPARSE_CHECK) == 0u) && (pPtr->flags & (NSF_ARG_IS_CONVERTER)) == 0u) || @@ -31846,6 +31846,11 @@ */ Tcl_Obj *varObj = Tcl_ObjGetVar2(interp, NsfGlobalObjs[NSF_ARRAY_INITCMD], paramPtr->nameObj, 0); + + /*fprintf(stderr, "### NSF_ARRAY_INITCMD %s has a value %s\n", + NsfGlobalStrings[NSF_ARRAY_INITCMD], + ObjStr(paramPtr->defaultValue));*/ + if (varObj == NULL) { /* * The variable is not set. Therefore, we assume, we have to