Index: generic/gentclAPI.tcl
===================================================================
diff -u -r95c4d29515cfda9283b406ba7a7ac1dd029de8c9 -r2ba521e3dfbb1294908b51ed8e13dab5adc3ca03
--- generic/gentclAPI.tcl	(.../gentclAPI.tcl)	(revision 95c4d29515cfda9283b406ba7a7ac1dd029de8c9)
+++ generic/gentclAPI.tcl	(.../gentclAPI.tcl)	(revision 2ba521e3dfbb1294908b51ed8e13dab5adc3ca03)
@@ -250,7 +250,7 @@
 $intro
   if (ArgumentParse(interp, objc, objv, $obj, objv[0], 
                      method_definitions[$idx].paramDefs, 
-                     method_definitions[$idx].nrParameters, 1,
+                     method_definitions[$idx].nrParameters, 0, 1,
                      &pc) != TCL_OK) {
     return TCL_ERROR;
   } else {