blob: e6797163f6c2813337f5384a2999b0fde7293371 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
|
#!/bin/sh
test X$TCLSH = X || {
echo $TCLSH
exit 0
}
# If langbench is in the bk source tree, tcl is at ../gui/tcltk/tcl
test -d ../gui/tcltk/tcl/generic && {
if [ -d C:/ ]
then echo ../gui/tcltk/tcl/win/tclsh85.exe
else echo ../gui/tcltk/tcl/unix/tclsh
fi
exit 0
}
# If langbench is in the tcl source tree, it is likely at tests/langbench
# or tests.
test -d ../tests -a -d ../generic && {
if [ -d C:/ ]
then echo ../win/tclsh85.exe
else echo ../unix/tclsh
fi
exit 0
}
test -d ../../tests -a -d ../../generic && {
if [ -d C:/ ]
then echo ../../win/tclsh85.exe
else echo ../../unix/tclsh
fi
exit 0
}
echo "Can't find tclsh, set a path to one with TCLSH" 1>&2
exit 1
|