diff options
| author | Sebastien Barre <sebastien.barre@kitware.com> | 2002-09-18 13:53:11 (GMT) |
|---|---|---|
| committer | Sebastien Barre <sebastien.barre@kitware.com> | 2002-09-18 13:53:11 (GMT) |
| commit | 24e051812287e5d40fd336e1354429844cd00dee (patch) | |
| tree | a4b031a2134ef6a3aee009df29373f5d8794448f | |
| parent | 5e319f5b9b1232130b8792b70efb8507ddc2f2f4 (diff) | |
| download | CMake-24e051812287e5d40fd336e1354429844cd00dee.zip CMake-24e051812287e5d40fd336e1354429844cd00dee.tar.gz CMake-24e051812287e5d40fd336e1354429844cd00dee.tar.bz2 | |
FIX: better support for the Tcl/Tk 8.4 pre-release
| -rw-r--r-- | Source/cmVTKWrapTclCommand.cxx | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Source/cmVTKWrapTclCommand.cxx b/Source/cmVTKWrapTclCommand.cxx index 8d3c0f9..1c7cc92 100644 --- a/Source/cmVTKWrapTclCommand.cxx +++ b/Source/cmVTKWrapTclCommand.cxx @@ -232,8 +232,8 @@ 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" + "#if (TCL_MAJOR_VERSION == 8) && (TCL_MINOR_VERSION >= 4) && (TCL_RELEASE_LEVEL >= TCL_FINAL_RELEASE)\n" + " typedef int (*vtkTclCommandType)(ClientData, Tcl_Interp *,int, CONST84 char *[]);\n" "#else\n" " typedef int (*vtkTclCommandType)(ClientData, Tcl_Interp *,int, char *[]);\n" "#endif\n" |