#include "vtkTclUtil.h"
#include "vtkVersion.h"
#define VTK_TCL_TO_STRING(x) VTK_TCL_TO_STRING0(x)
#define VTK_TCL_TO_STRING0(x) #x
extern "C"
{
#if (TCL_MAJOR_VERSION == 8) && (TCL_MINOR_VERSION >= 4) && (TCL_RELEASE_LEVEL >= TCL_FINAL_RELEASE)
  typedef int (*vtkTclCommandType)(ClientData, Tcl_Interp *,int, CONST84 char *[]);
#else
  typedef int (*vtkTclCommandType)(ClientData, Tcl_Interp *,int, char *[]);
#endif
}

int vtkEsquiIdListCommand(ClientData cd, Tcl_Interp *interp,
             int argc, char *argv[]);
ClientData vtkEsquiIdListNewCommand();
int vtkEsquiIdListCollectionCommand(ClientData cd, Tcl_Interp *interp,
             int argc, char *argv[]);
ClientData vtkEsquiIdListCollectionNewCommand();
int vtkEsquiActorCollectionCommand(ClientData cd, Tcl_Interp *interp,
             int argc, char *argv[]);
ClientData vtkEsquiActorCollectionNewCommand();

extern Tcl_HashTable vtkInstanceLookup;
extern Tcl_HashTable vtkPointerLookup;
extern Tcl_HashTable vtkCommandLookup;
extern void vtkTclDeleteObjectFromHash(void *);
extern void vtkTclListInstances(Tcl_Interp *interp, ClientData arg);


extern "C" {int VTK_EXPORT Vtkesquicomunestcl_SafeInit(Tcl_Interp *interp);}

extern "C" {int VTK_EXPORT Vtkesquicomunestcl_Init(Tcl_Interp *interp);}

extern void vtkTclGenericDeleteObject(ClientData cd);


int VTK_EXPORT Vtkesquicomunestcl_SafeInit(Tcl_Interp *interp)
{
  return Vtkesquicomunestcl_Init(interp);
}


int VTK_EXPORT Vtkesquicomunestcl_Init(Tcl_Interp *interp)
{

  vtkTclCreateNew(interp,(char *) "vtkEsquiIdList", vtkEsquiIdListNewCommand,
                  vtkEsquiIdListCommand);
  vtkTclCreateNew(interp,(char *) "vtkEsquiIdListCollection", vtkEsquiIdListCollectionNewCommand,
                  vtkEsquiIdListCollectionCommand);
  vtkTclCreateNew(interp,(char *) "vtkEsquiActorCollection", vtkEsquiActorCollectionNewCommand,
                  vtkEsquiActorCollectionCommand);
  char pkgName[]="vtkesquiComunesTCL";
  char pkgVers[]=VTK_TCL_TO_STRING(VTK_MAJOR_VERSION) "." VTK_TCL_TO_STRING(VTK_MINOR_VERSION);
  Tcl_PkgProvide(interp, pkgName, pkgVers);
  return TCL_OK;
}