1985-02-15 23:00:46 +00:00
|
|
|
rm -f ../bin/x_tpath x_tpath
|
|
|
|
echo "echo $$" >../bin/x_tpath
|
|
|
|
rm -f x_tpath
|
|
|
|
chmod +x ../bin/x_tpath
|
|
|
|
case x`(x_tpath) 2>/dev/null`
|
|
|
|
in
|
|
|
|
x$$)
|
|
|
|
STAT=0 ;;
|
|
|
|
x)
|
|
|
|
(cd ../bin ; echo Sorry, `pwd` is not in your shell PATH" ($PATH)")
|
|
|
|
STAT=1 ;;
|
|
|
|
*)
|
|
|
|
echo "Sorry, there is something wrong with your PATH ($PATH)" ;;
|
|
|
|
esac
|
1987-02-27 17:10:36 +00:00
|
|
|
echo "echo t_$$" > X_Y_Z_
|
|
|
|
chmod +x X_Y_Z_
|
|
|
|
case x`X_Y_Z_`
|
|
|
|
in
|
|
|
|
xt_$$)
|
|
|
|
;;
|
|
|
|
x)
|
|
|
|
(cd ../bin ; echo Sorry, . is not in your shell PATH" ($PATH)")
|
|
|
|
STAT=2 ;;
|
|
|
|
*)
|
|
|
|
echo "Sorry, there is something wrong with your PATH ($PATH)" ;;
|
|
|
|
esac
|
|
|
|
rm -f X_Y_Z_
|
|
|
|
case $STAT
|
|
|
|
in
|
|
|
|
2)
|
|
|
|
;;
|
|
|
|
*)
|
|
|
|
hash -r ;;
|
|
|
|
esac
|
1985-02-15 23:00:46 +00:00
|
|
|
echo "echo l_$$" >x_tpath
|
|
|
|
chmod +x x_tpath
|
|
|
|
case x`(x_tpath) 2>/dev/null`
|
|
|
|
in
|
|
|
|
xl_$$)
|
|
|
|
;;
|
|
|
|
x)
|
|
|
|
(cd ../bin ; echo Sorry, . is not in your shell PATH" ($PATH)")
|
|
|
|
STAT=2 ;;
|
|
|
|
x$$)
|
|
|
|
echo Sorry, . is not in your PATH" ($PATH)" or after the ACK bin directory
|
|
|
|
STAT=3 ;;
|
|
|
|
*)
|
|
|
|
echo "Sorry, there is something wrong with your PATH ($PATH)"
|
|
|
|
STAT=4 ;;
|
|
|
|
esac
|
|
|
|
rm -f ../bin/x_tpath x_tpath
|
|
|
|
exit $STAT
|