Index: generic/gentclAPI.tcl =================================================================== diff -u -r403f26de1f34f39943b605903b47ec31c974cf9a -rd9344280c05990c0254aa652a08a09da3e5822b1 --- generic/gentclAPI.tcl (.../gentclAPI.tcl) (revision 403f26de1f34f39943b605903b47ec31c974cf9a) +++ generic/gentclAPI.tcl (.../gentclAPI.tcl) (revision d9344280c05990c0254aa652a08a09da3e5822b1) @@ -90,7 +90,9 @@ "object" {set converter Object} "tclobj" {set converter Tclobj} "args" {set converter Nothing} - "allargs" {set converter Nothing} + "allargs" - + "virtualobjectargs" - + "virtualclassargs" {set converter Nothing} "objpattern" {set converter Objpattern} *|* { if {![info exists (-typeName)]} {set (-typeName) $(-argName)} @@ -206,7 +208,9 @@ set ifSet 1 set cVar 0 } - "allargs" { + "virtualobjectargs" - + "virtualclassargs" - + "allargs" { set type "int " set calledArg "objc, objv" lappend if "int objc" "Tcl_Obj *CONST objv\[\]"