Index: generic/gentclAPI.decls =================================================================== diff -u -r3754364287df2dfdf79b81dfa69224eae19cf691 -rd9b42d77f43db84a9983cc3bbc4124cf0b52df29 --- generic/gentclAPI.decls (.../gentclAPI.decls) (revision 3754364287df2dfdf79b81dfa69224eae19cf691) +++ generic/gentclAPI.decls (.../gentclAPI.decls) (revision d9b42d77f43db84a9983cc3bbc4124cf0b52df29) @@ -86,8 +86,8 @@ {-argName "class" -type class} } xotclCmd is XOTclIsCmd { - {-argName "value" -required 1 -type tclobj} {-argName "constraint" -required 1 -type tclobj} + {-argName "value" -required 1 -type tclobj} } xotclCmd isobject XOTclIsObjectCmd { {-argName "object" -required 1 -type tclobj} @@ -124,10 +124,6 @@ {-argName "fromNs" -required 1 -type tclobj} {-argName "toNs" -required 1 -type tclobj} } -xotclCmd objectproperty XOTclObjectpropertyCmd { - {-argName "objectkind" -type "object|class|baseclass|metaclass"} - {-argName "object" -required 1 -type tclobj} -} xotclCmd parametercheck XOTclParametercheckCmd { {-argName "-nocomplain"} {-argName "param" -type tclobj} @@ -256,6 +252,9 @@ objectInfoMethod hastype XOTclObjInfoHasTypeMethod { {-argName "class" -type class} } +objectInfoMethod istype XOTclObjInfoIsTypeMethod { + {-argName "objectkind" -type "object|class|baseclass|metaclass"} +} objectInfoMethod method XOTclObjInfoMethodMethod { {-argName "infomethodsubcmd" -type "args|body|definition|handle|parameter|parametersyntax|type|precondition|postcondition"} {-argName "name"}