blob: 338ab630ce83b3e64c7f1c9e017dbd23dfcea863 (
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
|
#!/bin/sh
test X$TCL = X || {
echo $TCL
exit 0
}
# If langbench is in the bk source tree, tcl is at ../gui/tcltk/tcl
test -d ../gui/tcltk/tcl/generic && {
echo ../gui/tcltk/tcl
exit 0
}
# If langbench is in the tcl source tree, it is likely at tests/langbench
# or tests.
test -d ../tests -a -d ../generic && {
echo ..
exit 0
}
test -d ../../tests -a -d ../../generic && {
echo ../..
exit 0
}
echo "Can't find tcl source tree, set a path to one with TCL" 1>&2
exit 1
|