[vtkusers] error compiling VTK40 on SuSE Linux 8.1

[Rainer Lehrig]

Hi,

when compiling VTK40 on SuSE Linux 8.1 i get an error.
On SuSE Linux 8.0 it did work.

The error message is:

/home/lehrig/cc/priv/vtk-src-unix/Common/vtkCommonTCLInit.cxx: In function 
`int
   Vtkcommontcl_Init(Tcl_Interp*)':
/home/lehrig/cc/priv/vtk-src-unix/Common/vtkCommonTCLInit.cxx:370: invalid
   conversion from `int (*)(void*, Tcl_Interp*, int, char**)' to `int
   (*)(void*, Tcl_Interp*, int, const char**)'
make[3]: *** [vtkCommonTCLInit.o] Fehler 1
make[2]: *** [default_target] Fehler 2
make[1]: *** [default_target_Common] Fehler 2
make: *** [default_target] Fehler 2

The code looks like:

int VTK_EXPORT Vtkcommontcl_Init(Tcl_Interp *interp)
{
  vtkTclInterpStruct *info = new vtkTclInterpStruct;
  info->Number = 0; info->InDelete = 0; info->DebugOn = 0;


  Tcl_InitHashTable(&info->InstanceLookup, TCL_STRING_KEYS);
  Tcl_InitHashTable(&info->PointerLookup, TCL_STRING_KEYS);
  Tcl_InitHashTable(&info->CommandLookup, TCL_STRING_KEYS);
  Tcl_SetAssocData(interp,(char *) "vtk",NULL,(ClientData *)info);
  Tcl_CreateExitHandler(vtkCommonDeleteAssocData,(ClientData *)info);
  Tcl_CreateCommand(interp,(char *) "vtkCommand",vtkCommand,
		    (ClientData *)NULL, NULL); // The error is caused by the last parameter


  vtkTclCreateNew(interp,(char *) "vtkFunctionParser", 
vtkFunctionParserNewCommand,
                  vtkFunctionParserCommand);
  vtkTclCreateNew(interp,(char *) "vtkObjectFactoryCollection", 
vtkObjectFactoryCollectionNewCommand,
                  vtkObjectFactoryCollectionCommand);
  vtkTclCreateNew(interp,(char *) "vtkPlanes", vtkPlanesNewCommand,
                  vtkPlanesCommand);

  ...

Yours:
Rainer Lehrig