Index: generic/tclAPI.h =================================================================== diff -u -rf3cb5afe6aa1b6761b4a9909058f64ff7d64ab92 -r8c2e2c14e38d6ebb9ef1c44fabcf0229a42c1a02 --- generic/tclAPI.h (.../tclAPI.h) (revision f3cb5afe6aa1b6761b4a9909058f64ff7d64ab92) +++ generic/tclAPI.h (.../tclAPI.h) (revision 8c2e2c14e38d6ebb9ef1c44fabcf0229a42c1a02) @@ -79,13 +79,13 @@ static int convertToMethodproperty(Tcl_Interp *interp, Tcl_Obj *objPtr, XOTclParam CONST *pPtr, ClientData *clientData, Tcl_Obj **outObjPtr) { int index, result; - static CONST char *opts[] = {"protected", "redefine-protected", "slotobj", NULL}; + static CONST char *opts[] = {"protected", "redefine-protected", "returns", "slotobj", NULL}; result = Tcl_GetIndexFromObj(interp, objPtr, opts, "methodproperty", 0, &index); *clientData = (ClientData) INT2PTR(index + 1); *outObjPtr = objPtr; return result; } -enum MethodpropertyIdx {MethodpropertyNULL, MethodpropertyProtectedIdx, MethodpropertyRedefine_protectedIdx, MethodpropertySlotobjIdx}; +enum MethodpropertyIdx {MethodpropertyNULL, MethodpropertyProtectedIdx, MethodpropertyRedefine_protectedIdx, MethodpropertyReturnsIdx, MethodpropertySlotobjIdx}; static int convertToObjectkind(Tcl_Interp *interp, Tcl_Obj *objPtr, XOTclParam CONST *pPtr, ClientData *clientData, Tcl_Obj **outObjPtr) {