Index: generic/gentclAPI.tcl
===================================================================
diff -u -raf52afc76c89bbf7ef89aca74745aea87f73b764 -rd1b7134131d60a023d74c6d0b878afff993b4ddb
--- generic/gentclAPI.tcl	(.../gentclAPI.tcl)	(revision af52afc76c89bbf7ef89aca74745aea87f73b764)
+++ generic/gentclAPI.tcl	(.../gentclAPI.tcl)	(revision d1b7134131d60a023d74c6d0b878afff993b4ddb)
@@ -152,7 +152,23 @@
   methodDefinition $methodName infoObjectMethod $implementation $argDefinitions
 }
 
+proc checkMethod {methodName implementation argDefinitions} {
+  methodDefinition type=$methodName checkMethod $implementation $argDefinitions
+}
+
 #
+# check methods
+#
+checkMethod required XOTclCheckRequiredArgs {
+  {-argName "name" -required 1}
+  {-argName "value" -required 0 -type tclobj}
+}
+checkMethod boolean XOTclCheckBooleanArgs {
+  {-argName "name" -required 1}
+  {-argName "value" -required 0 -type tclobj}
+}
+
+#
 # info object methods
 #
 infoObjectMethod args XOTclObjInfoArgsMethod {