summaryrefslogtreecommitdiffstats
path: root/tests/langbench/findtcl
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