Index: generic/gentclAPI.tcl
===================================================================
diff -u -r9addecef4701fd68a81b54714a370a9de3eb25f3 -r143ac569e197689119f0e355bfa4a7fd7e4ee8fb
--- generic/gentclAPI.tcl	(.../gentclAPI.tcl)	(revision 9addecef4701fd68a81b54714a370a9de3eb25f3)
+++ generic/gentclAPI.tcl	(.../gentclAPI.tcl)	(revision 143ac569e197689119f0e355bfa4a7fd7e4ee8fb)
@@ -165,7 +165,7 @@
         "tclobj"     {set type "Tcl_Obj *"}
         "args"       {
           set type "int "
-          set calledArg "objc-pc.lastobjc, objv+pc.lastobjc"
+          set calledArg "objc-pc.lastObjc, objv+pc.lastObjc"
           lappend if "int nobjc" "Tcl_Obj *CONST nobjv\[\]"
           set ifSet 1
           set cVar 0