Index: generic/gentclAPI.tcl
===================================================================
diff -u -N -r2321487af7f5d63ba7abb11d14e657a24b2e7788 -r8a19ff2ec04063dbc140fdd7f3b26745d5138a2f
--- generic/gentclAPI.tcl	(.../gentclAPI.tcl)	(revision 2321487af7f5d63ba7abb11d14e657a24b2e7788)
+++ generic/gentclAPI.tcl	(.../gentclAPI.tcl)	(revision 8a19ff2ec04063dbc140fdd7f3b26745d5138a2f)
@@ -75,11 +75,11 @@
 @globalOpts@
 static int ConvertTo@name@(Tcl_Interp *interp, Tcl_Obj *objPtr, Nsf_Param const *pPtr,
 			    ClientData *clientData, Tcl_Obj **outObjPtr) {
-  int index, result;
+  int pos, result;
   @localOpts@
   (void)pPtr;
-  result = Tcl_GetIndexFromObj(interp, objPtr, @optsName@, "@typeName@", 0, &index);
-  *clientData = (ClientData) INT2PTR(index + 1);
+  result = Tcl_GetIndexFromObj(interp, objPtr, @optsName@, "@typeName@", 0, &pos);
+  *clientData = (ClientData) INT2PTR(pos + 1);
   *outObjPtr = objPtr;
   return result;
 }