Index: generic/gentclAPI.decls =================================================================== diff -u -r4d02778de9877814d5d078fa5a4e34e40f57bcff -r513f795175db0329e73b1c7d14fb73255d62235a --- generic/gentclAPI.decls (.../gentclAPI.decls) (revision 4d02778de9877814d5d078fa5a4e34e40f57bcff) +++ generic/gentclAPI.decls (.../gentclAPI.decls) (revision 513f795175db0329e73b1c7d14fb73255d62235a) @@ -791,14 +791,11 @@ } infoObjectMethod mixin XOTclObjInfoMixinMethod { {-argName "object" -required 1 -type object} + {-argName "-guard"} {-argName "-guards"} {-argName "-order"} {-argName "pattern" -type objpattern} } -infoObjectMethod mixinguard XOTclObjInfoMixinguardMethod { - {-argName "object" -required 1 -type object} - {-argName "mixin" -required 1} -} infoObjectMethod parent XOTclObjInfoParentMethod { {-argName "object" -required 1 -type object} } @@ -856,13 +853,10 @@ infoClassMethod mixin XOTclClassInfoMixinMethod { {-argName "class" -required 1 -type class} {-argName "-closure"} + {-argName "-guard"} {-argName "-guards"} {-argName "pattern" -type objpattern} } -infoClassMethod mixinguard XOTclClassInfoMixinguardMethod { - {-argName "class" -required 1 -type class} - {-argName "mixin" -required 1} -} infoClassMethod mixinof XOTclClassInfoMixinOfMethod { {-argName "class" -required 1 -type class} {-argName "-closure"}