summaryrefslogtreecommitdiffstats
path: root/Source/cmVTKWrapTclCommand.cxx
diff options
context:
space:
mode:
authorSebastien Barre <sebastien.barre@kitware.com>2002-09-17 18:18:11 (GMT)
committerSebastien Barre <sebastien.barre@kitware.com>2002-09-17 18:18:11 (GMT)
commita4b076811c5d22ffe556908c925d179756c5cc6e (patch)
tree7e76be0679b7dbbf7b70d6e137f4e96e095a8944 /Source/cmVTKWrapTclCommand.cxx
parent973cf550cb07f9a6066f10b610b91f3dcee3aac3 (diff)
downloadCMake-a4b076811c5d22ffe556908c925d179756c5cc6e.zip
CMake-a4b076811c5d22ffe556908c925d179756c5cc6e.tar.gz
CMake-a4b076811c5d22ffe556908c925d179756c5cc6e.tar.bz2
ENH: add support for Tcl/Tk 8.4.0
Diffstat (limited to 'Source/cmVTKWrapTclCommand.cxx')
-rw-r--r--Source/cmVTKWrapTclCommand.cxx4
1 files changed, 4 insertions, 0 deletions
diff --git a/Source/cmVTKWrapTclCommand.cxx b/Source/cmVTKWrapTclCommand.cxx
index d42fd81..8d3c0f9 100644
--- a/Source/cmVTKWrapTclCommand.cxx
+++ b/Source/cmVTKWrapTclCommand.cxx
@@ -232,7 +232,11 @@ bool cmVTKWrapTclCommand::WriteInit(const char *kitName,
fprintf(fout,
"extern \"C\"\n"
"{\n"
+ "#if (TCL_MAJOR_VERSION == 8) && (TCL_MINOR_VERSION >= 4)\n"
+ " typedef int (*vtkTclCommandType)(ClientData, Tcl_Interp *,int, CONST char *[]);\n"
+ "#else\n"
" typedef int (*vtkTclCommandType)(ClientData, Tcl_Interp *,int, char *[]);\n"
+ "#endif\n"
"}\n"
"\n");