Index: generic/nsf.c =================================================================== diff -u -N -r09b4bca7c8d5c44f6be0b2c04ebfcdb7a58fd5ae -rbe1aa824abfe207d9ae86bdb66b53b7e405f4daa --- generic/nsf.c (.../nsf.c) (revision 09b4bca7c8d5c44f6be0b2c04ebfcdb7a58fd5ae) +++ generic/nsf.c (.../nsf.c) (revision be1aa824abfe207d9ae86bdb66b53b7e405f4daa) @@ -28891,7 +28891,7 @@ */ static int NsfOCgetMethod(Tcl_Interp *interp, NsfObject *object, Tcl_Obj *nameObj) { - int result, found = 0; + int result, found; NsfParsedParam parsedParam; Nsf_Param const *paramPtr; NsfParamDefs *paramDefs; @@ -28954,19 +28954,22 @@ */ for (paramPtr = paramDefs->paramsPtr; (paramPtr->name != NULL) && (*paramPtr->name != '-'); - paramPtr++); + paramPtr++) { + ; + } /* * Perform the lookup from the next group. */ if (unlikely(NsfParamDefsNonposLookup(interp, nameString, paramPtr, ¶mPtr) != TCL_OK)) { result = TCL_ERROR; goto cget_exit; - } else { - found = (paramPtr != NULL); } + } else { + paramPtr = NULL; } - + found = (paramPtr != NULL); + if (found == 0) { result = NsfPrintError(interp, "cget: unknown configure parameter %s", nameString); goto cget_exit;