Index: generic/nsfInt.h =================================================================== diff -u -r41e05440d57881136dac05fe1b02c5bd5897edea -rb089be700bb58579a48e77619512a47eb3c5562d --- generic/nsfInt.h (.../nsfInt.h) (revision 41e05440d57881136dac05fe1b02c5bd5897edea) +++ generic/nsfInt.h (.../nsfInt.h) (revision b089be700bb58579a48e77619512a47eb3c5562d) @@ -1171,9 +1171,13 @@ * NsfFlag type */ EXTERN Tcl_ObjType NsfFlagObjType; -EXTERN int NsfFlagObjSet(Tcl_Interp *interp, Tcl_Obj *objPtr, - Nsf_Param CONST *baseParamPtr, int serial, - Nsf_Param CONST *paramPtr, Tcl_Obj *payload, unsigned int flags); +EXTERN int NsfFlagObjSet(Tcl_Interp *UNUSED(interp), + Tcl_Obj *objPtr, + Nsf_Param const *baseParamPtr, + int serial, + Nsf_Param const *paramPtr, + Tcl_Obj *payload, + unsigned int flags); typedef struct { CONST Nsf_Param *signature; int serial; @@ -1190,10 +1194,14 @@ */ EXTERN Tcl_ObjType NsfInstanceMethodObjType; EXTERN Tcl_ObjType NsfObjectMethodObjType; -EXTERN int NsfMethodObjSet(Tcl_Interp *interp, Tcl_Obj *objPtr, +EXTERN int NsfMethodObjSet(Tcl_Interp *UNUSED(interp), + Tcl_Obj *objPtr, Tcl_ObjType *objectType, - void *context, int methodEpoch, - Tcl_Command cmd, NsfClass *cl, unsigned int flags) + void *context, + int methodEpoch, + Tcl_Command cmd, + NsfClass *cl, + unsigned int flags) nonnull(1) nonnull(2) nonnull(3) nonnull(4) nonnull(6);