diff options
| author | Brad King <brad.king@kitware.com> | 2002-12-18 21:58:03 (GMT) |
|---|---|---|
| committer | Brad King <brad.king@kitware.com> | 2002-12-18 21:58:03 (GMT) |
| commit | 190424b29ca2367bf2893736b9f929efbe35b127 (patch) | |
| tree | 7c925c03a7ad3c8ab32de7baee86649eb364b29c | |
| parent | f958a7dc85fb39e380f11a0a935862a363fc6204 (diff) | |
| download | CMake-190424b29ca2367bf2893736b9f929efbe35b127.zip CMake-190424b29ca2367bf2893736b9f929efbe35b127.tar.gz CMake-190424b29ca2367bf2893736b9f929efbe35b127.tar.bz2 | |
ENH: Tcl packages now Tcl_PkgProvide their own name and version.
| -rw-r--r-- | Source/cmVTKWrapTclCommand.cxx | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/Source/cmVTKWrapTclCommand.cxx b/Source/cmVTKWrapTclCommand.cxx index c8fa20f..5760a83 100644 --- a/Source/cmVTKWrapTclCommand.cxx +++ b/Source/cmVTKWrapTclCommand.cxx @@ -228,6 +228,9 @@ bool cmVTKWrapTclCommand::WriteInit(const char *kitName, } fprintf(fout,"#include \"vtkTclUtil.h\"\n"); + fprintf(fout,"#include \"vtkVersion.h\"\n"); + fprintf(fout,"#define VTK_TCL_TO_STRING(x) VTK_TCL_TO_STRING0(x)\n"); + fprintf(fout,"#define VTK_TCL_TO_STRING0(x) #x\n"); fprintf(fout, "extern \"C\"\n" @@ -333,6 +336,10 @@ bool cmVTKWrapTclCommand::WriteInit(const char *kitName, fprintf(fout," %sCommand);\n",classes[i].c_str()); } + fprintf(fout," Tcl_PkgProvide(interp, \"%s\", " + "VTK_TCL_TO_STRING(VTK_MAJOR_VERSION) \".\" " + "VTK_TCL_TO_STRING(VTK_MINOR_VERSION));\n", + m_LibraryName.c_str()); fprintf(fout," return TCL_OK;\n}\n"); fclose(fout); |