Index: generic/nsfError.c =================================================================== diff -u -r866971d828a2ed5fdb8da757e94401f919bd3a8c -r8552f707c011bfc24be22e1e8332f5558227cde3 --- generic/nsfError.c (.../nsfError.c) (revision 866971d828a2ed5fdb8da757e94401f919bd3a8c) +++ generic/nsfError.c (.../nsfError.c) (revision 8552f707c011bfc24be22e1e8332f5558227cde3) @@ -567,10 +567,10 @@ const char *context, Tcl_Obj *value, const char *type, - Nsf_Param const *paramPtr) + Nsf_Param const *NsfObjErrType) { - int named = (paramPtr && (paramPtr->flags & NSF_ARG_UNNAMED) == 0); - int returnValue = !named && paramPtr && (paramPtr->flags & NSF_ARG_IS_RETURNVALUE); + int named = (NsfObjErrType && (NsfObjErrType->flags & NSF_ARG_UNNAMED) == 0); + int returnValue = !named && NsfObjErrType && (NsfObjErrType->flags & NSF_ARG_IS_RETURNVALUE); int errMsgLen; const char *prevErrMsg = Tcl_GetStringFromObj(Tcl_GetObjResult(interp), &errMsgLen); Tcl_DString ds; @@ -588,7 +588,7 @@ Nsf_DStringPrintf(&ds, "expected %s but got \"%s\"", type, ObjStr(value)); if (named != 0) { - Nsf_DStringPrintf(&ds, " for parameter \"%s\"", paramPtr->name); + Nsf_DStringPrintf(&ds, " for parameter \"%s\"", NsfObjErrType->name); } else if (returnValue != 0) { Tcl_DStringAppend(&ds, " as return value", -1); }