1dnl This macro checks for tclsh which is required to run dejagnu. On some 
2dnl platforms (notably FreeBSD), tclsh is named tclshX.Y - this handles
3dnl that for us so we can get the latest installed tclsh version.
4dnl 
5AC_DEFUN([DJ_AC_PATH_TCLSH], [
6no_itcl=true
7AC_MSG_CHECKING(for the tclsh program in tclinclude directory)
8AC_ARG_WITH(tclinclude,
9  AS_HELP_STRING([--with-tclinclude],
10                [directory where tcl headers are]), 
11  [with_tclinclude=${withval}],[with_tclinclude=''])
12AC_CACHE_VAL(ac_cv_path_tclsh,[
13dnl first check to see if --with-itclinclude was specified
14if test x"${with_tclinclude}" != x ; then
15  if test -f ${with_tclinclude}/tclsh ; then
16    ac_cv_path_tclsh=`(cd ${with_tclinclude}; pwd)`
17  elif test -f ${with_tclinclude}/src/tclsh ; then
18    ac_cv_path_tclsh=`(cd ${with_tclinclude}/src; pwd)`
19  else
20    AC_MSG_ERROR([${with_tclinclude} directory doesn't contain tclsh])
21  fi
22fi])
23
24dnl see if one is installed
25if test x"${ac_cv_path_tclsh}" = x ; then
26  AC_MSG_RESULT(none)
27  AC_PATH_PROGS([TCLSH],[tclsh8.4 tclsh8.4.8 tclsh8.4.7 tclsh8.4.6 tclsh8.4.5 tclsh8.4.4 tclsh8.4.3 tclsh8.4.2 tclsh8.4.1 tclsh8.4.0 tclsh8.3 tclsh8.3.5 tclsh8.3.4 tclsh8.3.3 tclsh8.3.2 tclsh8.3.1 tclsh8.3.0 tclsh])
28  if test x"${TCLSH}" = x ; then
29    ac_cv_path_tclsh='';
30  else
31    ac_cv_path_tclsh="${TCLSH}";
32  fi
33else
34  AC_MSG_RESULT(${ac_cv_path_tclsh})
35  TCLSH="${ac_cv_path_tclsh}"
36  AC_SUBST(TCLSH)
37fi
38])
39
40