Index: generic/nsfAPI.decls =================================================================== diff -u -N -r6b8a44994346c77d822eabbd9b5ce890542b5401 -ra776a484c3001069d1c8ebbbac4dbdf639a81900 --- generic/nsfAPI.decls (.../nsfAPI.decls) (revision 6b8a44994346c77d822eabbd9b5ce890542b5401) +++ generic/nsfAPI.decls (.../nsfAPI.decls) (revision a776a484c3001069d1c8ebbbac4dbdf639a81900) @@ -126,7 +126,7 @@ {-argName "-inner-namespace" -nrargs 0 -type switch} {-argName "-per-object" -required 0 -nrargs 0 -type switch} {-argName "-reg-object" -required 0 -nrargs 1 -type object} - {-argName "name" -required 1 -type tclobj} + {-argName "methodName" -required 1 -type tclobj} {-argName "arguments" -required 1 -type tclobj} {-argName "body" -required 1 -type tclobj} } Index: generic/nsfAPI.h =================================================================== diff -u -N -r6ff78ef39ca727100ca57bd915e5632da6e89454 -ra776a484c3001069d1c8ebbbac4dbdf639a81900 --- generic/nsfAPI.h (.../nsfAPI.h) (revision 6ff78ef39ca727100ca57bd915e5632da6e89454) +++ generic/nsfAPI.h (.../nsfAPI.h) (revision a776a484c3001069d1c8ebbbac4dbdf639a81900) @@ -554,7 +554,7 @@ NSF_nonnull(1) NSF_nonnull(2); static int NsfClassInfoSuperclassMethod(Tcl_Interp *interp, NsfClass *cl, int withClosure, Tcl_Obj *pattern) NSF_nonnull(1) NSF_nonnull(2); -static int NsfAsmMethodCreateCmd(Tcl_Interp *interp, NsfObject *object, int withCheckalways, int withInner_namespace, int withPer_object, NsfObject *withReg_object, Tcl_Obj *name, Tcl_Obj *arguments, Tcl_Obj *body) +static int NsfAsmMethodCreateCmd(Tcl_Interp *interp, NsfObject *object, int withCheckalways, int withInner_namespace, int withPer_object, NsfObject *withReg_object, Tcl_Obj *methodName, Tcl_Obj *arguments, Tcl_Obj *body) NSF_nonnull(1) NSF_nonnull(2) NSF_nonnull(7) NSF_nonnull(8) NSF_nonnull(9); static int NsfAsmProcCmd(Tcl_Interp *interp, int withAd, int withCheckalways, Tcl_Obj *procName, Tcl_Obj *arguments, Tcl_Obj *body) NSF_nonnull(1) NSF_nonnull(4) NSF_nonnull(5) NSF_nonnull(6); @@ -1409,12 +1409,12 @@ int withInner_namespace = (int )PTR2INT(pc.clientData[2]); int withPer_object = (int )PTR2INT(pc.clientData[3]); NsfObject *withReg_object = (NsfObject *)pc.clientData[4]; - Tcl_Obj *name = (Tcl_Obj *)pc.clientData[5]; + Tcl_Obj *methodName = (Tcl_Obj *)pc.clientData[5]; Tcl_Obj *arguments = (Tcl_Obj *)pc.clientData[6]; Tcl_Obj *body = (Tcl_Obj *)pc.clientData[7]; assert(pc.status == 0); - return NsfAsmMethodCreateCmd(interp, object, withCheckalways, withInner_namespace, withPer_object, withReg_object, name, arguments, body); + return NsfAsmMethodCreateCmd(interp, object, withCheckalways, withInner_namespace, withPer_object, withReg_object, methodName, arguments, body); } else { return TCL_ERROR; @@ -3310,7 +3310,7 @@ {"-inner-namespace", 0, 0, Nsf_ConvertTo_Boolean, NULL,NULL,"switch",NULL,NULL,NULL,NULL,NULL}, {"-per-object", 0, 0, Nsf_ConvertTo_Boolean, NULL,NULL,"switch",NULL,NULL,NULL,NULL,NULL}, {"-reg-object", 0, 1, Nsf_ConvertTo_Object, NULL,NULL,"object",NULL,NULL,NULL,NULL,NULL}, - {"name", NSF_ARG_REQUIRED, 1, Nsf_ConvertTo_Tclobj, NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL}, + {"methodName", NSF_ARG_REQUIRED, 1, Nsf_ConvertTo_Tclobj, NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL}, {"arguments", NSF_ARG_REQUIRED, 1, Nsf_ConvertTo_Tclobj, NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL}, {"body", NSF_ARG_REQUIRED, 1, Nsf_ConvertTo_Tclobj, NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL}} },