2005-12-14 18:51:08 +00:00
|
|
|
# - Find wish installation
|
2001-12-06 16:51:37 +00:00
|
|
|
# This module finds if TCL is installed and determines where the
|
|
|
|
# include files and libraries are. It also determines what the name of
|
|
|
|
# the library is. This code sets the following variables:
|
|
|
|
#
|
2005-12-15 19:17:43 +00:00
|
|
|
# TK_WISH = the path to the wish executable
|
2001-12-06 16:51:37 +00:00
|
|
|
#
|
2005-12-15 19:17:43 +00:00
|
|
|
# if UNIX is defined, then it will look for the cygwin version first
|
2009-09-28 15:45:50 +00:00
|
|
|
|
|
|
|
#=============================================================================
|
|
|
|
# Copyright 2001-2009 Kitware, Inc.
|
|
|
|
#
|
|
|
|
# Distributed under the OSI-approved BSD License (the "License");
|
|
|
|
# see accompanying file Copyright.txt for details.
|
|
|
|
#
|
|
|
|
# This software is distributed WITHOUT ANY WARRANTY; without even the
|
|
|
|
# implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
|
|
|
# See the License for more information.
|
|
|
|
#=============================================================================
|
2010-08-07 00:48:47 +00:00
|
|
|
# (To distribute this file outside of CMake, substitute the full
|
2009-09-28 15:45:50 +00:00
|
|
|
# License text for the above reference.)
|
|
|
|
|
2012-08-13 17:47:32 +00:00
|
|
|
if(UNIX)
|
|
|
|
find_program(TK_WISH cygwish80 )
|
2012-08-13 17:50:14 +00:00
|
|
|
endif()
|
2001-12-06 16:51:37 +00:00
|
|
|
|
2012-08-13 17:47:32 +00:00
|
|
|
get_filename_component(TCL_TCLSH_PATH "${TCL_TCLSH}" PATH)
|
|
|
|
get_filename_component(TCL_TCLSH_PATH_PARENT "${TCL_TCLSH_PATH}" PATH)
|
|
|
|
string(REGEX REPLACE
|
2008-01-26 06:11:04 +00:00
|
|
|
"^.*tclsh([0-9]\\.*[0-9]).*$" "\\1" TCL_TCLSH_VERSION "${TCL_TCLSH}")
|
2008-01-18 18:51:25 +00:00
|
|
|
|
2012-08-13 17:47:32 +00:00
|
|
|
get_filename_component(TCL_INCLUDE_PATH_PARENT "${TCL_INCLUDE_PATH}" PATH)
|
|
|
|
get_filename_component(TK_INCLUDE_PATH_PARENT "${TK_INCLUDE_PATH}" PATH)
|
2008-01-18 18:15:12 +00:00
|
|
|
|
2012-08-13 17:47:32 +00:00
|
|
|
get_filename_component(TCL_LIBRARY_PATH "${TCL_LIBRARY}" PATH)
|
|
|
|
get_filename_component(TCL_LIBRARY_PATH_PARENT "${TCL_LIBRARY_PATH}" PATH)
|
|
|
|
string(REGEX REPLACE
|
2008-01-26 06:11:04 +00:00
|
|
|
"^.*tcl([0-9]\\.*[0-9]).*$" "\\1" TCL_LIBRARY_VERSION "${TCL_LIBRARY}")
|
2008-01-18 18:46:10 +00:00
|
|
|
|
2012-08-13 17:47:32 +00:00
|
|
|
get_filename_component(TK_LIBRARY_PATH "${TK_LIBRARY}" PATH)
|
|
|
|
get_filename_component(TK_LIBRARY_PATH_PARENT "${TK_LIBRARY_PATH}" PATH)
|
|
|
|
string(REGEX REPLACE
|
2008-01-26 06:11:04 +00:00
|
|
|
"^.*tk([0-9]\\.*[0-9]).*$" "\\1" TK_LIBRARY_VERSION "${TK_LIBRARY}")
|
2008-01-18 18:15:12 +00:00
|
|
|
|
2012-08-13 17:47:32 +00:00
|
|
|
set(TCLTK_POSSIBLE_BIN_PATHS
|
2008-01-18 18:15:12 +00:00
|
|
|
"${TCL_INCLUDE_PATH_PARENT}/bin"
|
|
|
|
"${TK_INCLUDE_PATH_PARENT}/bin"
|
|
|
|
"${TCL_LIBRARY_PATH_PARENT}/bin"
|
|
|
|
"${TK_LIBRARY_PATH_PARENT}/bin"
|
2008-01-23 21:27:36 +00:00
|
|
|
"${TCL_TCLSH_PATH_PARENT}/bin"
|
2008-01-25 18:07:59 +00:00
|
|
|
)
|
|
|
|
|
2012-08-13 17:47:32 +00:00
|
|
|
if(WIN32)
|
|
|
|
get_filename_component(
|
2012-08-13 17:42:58 +00:00
|
|
|
ActiveTcl_CurrentVersion
|
|
|
|
"[HKEY_LOCAL_MACHINE\\SOFTWARE\\ActiveState\\ActiveTcl;CurrentVersion]"
|
2008-01-25 18:07:59 +00:00
|
|
|
NAME)
|
2012-08-13 17:47:32 +00:00
|
|
|
set(TCLTK_POSSIBLE_BIN_PATHS ${TCLTK_POSSIBLE_BIN_PATHS}
|
2008-01-25 18:07:59 +00:00
|
|
|
"[HKEY_LOCAL_MACHINE\\SOFTWARE\\ActiveState\\ActiveTcl\\${ActiveTcl_CurrentVersion}]/bin"
|
|
|
|
"[HKEY_LOCAL_MACHINE\\SOFTWARE\\Scriptics\\Tcl\\8.6;Root]/bin"
|
|
|
|
"[HKEY_LOCAL_MACHINE\\SOFTWARE\\Scriptics\\Tcl\\8.5;Root]/bin"
|
|
|
|
"[HKEY_LOCAL_MACHINE\\SOFTWARE\\Scriptics\\Tcl\\8.4;Root]/bin"
|
|
|
|
"[HKEY_LOCAL_MACHINE\\SOFTWARE\\Scriptics\\Tcl\\8.3;Root]/bin"
|
|
|
|
"[HKEY_LOCAL_MACHINE\\SOFTWARE\\Scriptics\\Tcl\\8.2;Root]/bin"
|
|
|
|
"[HKEY_LOCAL_MACHINE\\SOFTWARE\\Scriptics\\Tcl\\8.0;Root]/bin"
|
|
|
|
)
|
2012-08-13 17:50:14 +00:00
|
|
|
endif()
|
2001-12-06 16:51:37 +00:00
|
|
|
|
2012-08-13 17:47:32 +00:00
|
|
|
set(TK_WISH_NAMES
|
2012-08-13 17:42:58 +00:00
|
|
|
wish
|
2008-01-26 06:11:04 +00:00
|
|
|
wish${TCL_LIBRARY_VERSION} wish${TK_LIBRARY_VERSION} wish${TCL_TCLSH_VERSION}
|
2008-01-23 21:27:36 +00:00
|
|
|
wish86 wish8.6
|
2012-08-13 17:42:58 +00:00
|
|
|
wish85 wish8.5
|
|
|
|
wish84 wish8.4
|
|
|
|
wish83 wish8.3
|
|
|
|
wish82 wish8.2
|
2008-01-23 21:27:36 +00:00
|
|
|
wish80 wish8.0
|
2008-01-25 18:07:59 +00:00
|
|
|
)
|
2008-01-25 00:31:24 +00:00
|
|
|
|
2012-08-13 17:47:32 +00:00
|
|
|
find_program(TK_WISH
|
2008-01-25 00:31:24 +00:00
|
|
|
NAMES ${TK_WISH_NAMES}
|
2008-06-09 20:04:06 +00:00
|
|
|
HINTS ${TCLTK_POSSIBLE_BIN_PATHS}
|
2008-01-25 18:07:59 +00:00
|
|
|
)
|
2008-01-23 21:27:36 +00:00
|
|
|
|
2012-08-13 17:47:32 +00:00
|
|
|
mark_as_advanced(TK_WISH)
|