diff options
| author | Ken Martin <ken.martin@kitware.com> | 2002-01-03 18:56:30 (GMT) |
|---|---|---|
| committer | Ken Martin <ken.martin@kitware.com> | 2002-01-03 18:56:30 (GMT) |
| commit | d8088655ffdbe947c9e701e49f2b95d6525b6f5d (patch) | |
| tree | 1e89139e555a772068a65004c43dd9faa2503354 /Source/cmVTKWrapTclCommand.cxx | |
| parent | d163cb70147b9c032c966702532e51ce5a49574a (diff) | |
| download | CMake-d8088655ffdbe947c9e701e49f2b95d6525b6f5d.zip CMake-d8088655ffdbe947c9e701e49f2b95d6525b6f5d.tar.gz CMake-d8088655ffdbe947c9e701e49f2b95d6525b6f5d.tar.bz2 | |
minor fix
Diffstat (limited to 'Source/cmVTKWrapTclCommand.cxx')
| -rw-r--r-- | Source/cmVTKWrapTclCommand.cxx | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/Source/cmVTKWrapTclCommand.cxx b/Source/cmVTKWrapTclCommand.cxx index 20d832c..b6332ea 100644 --- a/Source/cmVTKWrapTclCommand.cxx +++ b/Source/cmVTKWrapTclCommand.cxx @@ -157,7 +157,10 @@ void cmVTKWrapTclCommand::FinalPass() // wrap all the .h files depends.push_back(wtcl); - depends.push_back(hints); + if (strcmp("${VTK_WRAP_HINTS}",hints.c_str())) + { + depends.push_back(hints); + } for(int classNum = 0; classNum < lastClass; classNum++) { m_Makefile->AddSource(m_WrapClasses[classNum],m_SourceList.c_str()); @@ -270,7 +273,7 @@ bool cmVTKWrapTclCommand::WriteInit(const char *kitName, if (!strcmp(kitName,"Vtkcommontcl")) { - fprintf(fout,"void vtkCommonDeleteAssocData(ClientData cd, Tcl_Interp *)\n"); + fprintf(fout,"void vtkCommonDeleteAssocData(ClientData cd)\n"); fprintf(fout," {\n"); fprintf(fout," vtkTclInterpStruct *tis = static_cast<vtkTclInterpStruct*>(cd);\n"); fprintf(fout," delete tis;\n }\n"); @@ -297,7 +300,9 @@ bool cmVTKWrapTclCommand::WriteInit(const char *kitName, fprintf(fout, " Tcl_InitHashTable(&info->CommandLookup, TCL_STRING_KEYS);\n"); fprintf(fout, - " Tcl_SetAssocData(interp,(char *) \"vtk\",vtkCommonDeleteAssocData,(ClientData *)info);\n"); + " Tcl_SetAssocData(interp,(char *) \"vtk\",NULL,(ClientData *)info);\n"); + fprintf(fout, + " Tcl_CreateExitHandler(vtkCommonDeleteAssocData,(ClientData *)info);\n"); /* create special vtkCommand command */ fprintf(fout," Tcl_CreateCommand(interp,(char *) \"vtkCommand\",vtkCommand,\n (ClientData *)NULL, NULL);\n\n"); |