Index: generic/gentclAPI.tcl
===================================================================
diff -u -r5b61f8a3e6a8142e1553f50d2010439089e1cd0d -rdf67ed7db2b0cda881c4a9e704379a2a02d415b6
--- generic/gentclAPI.tcl	(.../gentclAPI.tcl)	(revision 5b61f8a3e6a8142e1553f50d2010439089e1cd0d)
+++ generic/gentclAPI.tcl	(.../gentclAPI.tcl)	(revision df67ed7db2b0cda881c4a9e704379a2a02d415b6)
@@ -41,6 +41,7 @@
 }
 
 proc genifd {parameterDefinitions} {
+  #puts stderr $parameterDefinitions
   set l [list]
   foreach parameterDefinition $parameterDefinitions {
     array set "" $parameterDefinition
@@ -142,6 +143,7 @@
       switch -glob $(-type) {
         ""           {set type "CONST char *"}
         "boolean"    {set type "int "}
+        "int32"      {set type "int "}
         "class"      {set type "NsfClass *"}
         "object"     {set type "NsfObject *"}
         "tclobj"     {set type "Tcl_Obj *"}