Index: generic/tclAPI.h =================================================================== diff -u -rd8d920f2976691dcf8e2a68b336eb253385030f6 -rfb10f773e288e5a05cf0e04c5fd8cf0514fdf963 --- generic/tclAPI.h (.../tclAPI.h) (revision d8d920f2976691dcf8e2a68b336eb253385030f6) +++ generic/tclAPI.h (.../tclAPI.h) (revision fb10f773e288e5a05cf0e04c5fd8cf0514fdf963) @@ -236,7 +236,7 @@ static int XOTclClassInfoHeritageMethod(Tcl_Interp *interp, XOTclClass *class, CONST char *pattern); static int XOTclClassInfoInstancesMethod(Tcl_Interp *interp, XOTclClass *class, int withClosure, CONST char *patternString, XOTclObject *patternObj); static int XOTclClassInfoMethodMethod(Tcl_Interp *interp, XOTclClass *class, int infomethodsubcmd, CONST char *name); -static int XOTclClassInfoMethodsMethod(Tcl_Interp *interp, XOTclClass *object, int withMethodtype, int withCallprotection, int withNomixins, int withIncontext, CONST char *pattern); +static int XOTclClassInfoMethodsMethod(Tcl_Interp *interp, XOTclClass *class, int withMethodtype, int withCallprotection, int withNomixins, int withIncontext, CONST char *pattern); static int XOTclClassInfoMixinMethod(Tcl_Interp *interp, XOTclClass *class, int withClosure, int withGuards, CONST char *patternString, XOTclObject *patternObj); static int XOTclClassInfoMixinOfMethod(Tcl_Interp *interp, XOTclClass *class, int withClosure, int withScope, CONST char *patternString, XOTclObject *patternObj); static int XOTclClassInfoMixinguardMethod(Tcl_Interp *interp, XOTclClass *class, CONST char *mixin); @@ -675,15 +675,15 @@ &pc) != TCL_OK) { return TCL_ERROR; } else { - XOTclClass *object = (XOTclClass *)pc.clientData[0]; + XOTclClass *class = (XOTclClass *)pc.clientData[0]; int withMethodtype = (int )PTR2INT(pc.clientData[1]); int withCallprotection = (int )PTR2INT(pc.clientData[2]); int withNomixins = (int )PTR2INT(pc.clientData[3]); int withIncontext = (int )PTR2INT(pc.clientData[4]); CONST char *pattern = (CONST char *)pc.clientData[5]; parseContextRelease(&pc); - return XOTclClassInfoMethodsMethod(interp, object, withMethodtype, withCallprotection, withNomixins, withIncontext, pattern); + return XOTclClassInfoMethodsMethod(interp, class, withMethodtype, withCallprotection, withNomixins, withIncontext, pattern); } } @@ -1959,7 +1959,7 @@ {"name", 0, 0, convertToString}} }, {"::nsf::cmd::ClassInfo::methods", XOTclClassInfoMethodsMethodStub, 6, { - {"object", 0, 0, convertToClass}, + {"class", 0, 0, convertToClass}, {"-methodtype", 0, 1, convertToMethodtype}, {"-callprotection", 0, 1, convertToCallprotection}, {"-nomixins", 0, 0, convertToString},