Index: generic/xotcl.c =================================================================== diff -u -r6a93cc19b601c6972981b1844c198371deccce28 -r90358010d417481db6164f879f01b41e789f09f7 --- generic/xotcl.c (.../xotcl.c) (revision 6a93cc19b601c6972981b1844c198371deccce28) +++ generic/xotcl.c (.../xotcl.c) (revision 90358010d417481db6164f879f01b41e789f09f7) @@ -9667,7 +9667,7 @@ Tcl_Command importedCmd = GetOriginalCommand(cmd); return ListCmdParams(interp, importedCmd, methodName, 0); } - case InfomethodsubcmdPreIdx: + case InfomethodsubcmdPreconditionIdx: { XOTclProcAssertion *procs; if (withPer_object) { @@ -9679,7 +9679,7 @@ if (procs) Tcl_SetObjResult(interp, AssertionList(interp, procs->pre)); return TCL_OK; } - case InfomethodsubcmdPostIdx: + case InfomethodsubcmdPostconditionIdx: { XOTclProcAssertion *procs; if (withPer_object) {