echo "files"
echo "1 listops consnodes"
echo "2 consnodes"
echo "3 sig_out"
echo "4 sig_in"

echo "110 TEST init"
echo "111 TEST fact"
echo "112 TEST misc"
echo "113 TEST simp0001"
echo "114 TEST simp0002"
echo "123 TEST simp0011"
echo "124 TEST simp0012"
echo "125 TEST simp0013"
echo "888 NOTES.txt"
echo "999 quit"
echo "select"
read select
while [ $select -ne 999 ]
do 
case $select in

1) emacs stree/listops.c datatypes/consnodes.c;;
2) emacs datatypes/consnodes.c datatypes/consnodes_cls.icn;;
3) emacs sigio/sig_out.c sigio/sig_out.icn ;;
4) emacs sigio/sig_in.c sigio/sig_in.icn ;;

110) ./testinit;;
111) ./testfact;;
112) ./testmisc;;
113) ./testsimp0001;;
114) ./testsimp0002;;
123) ./testsimp0011;;
124) ./testsimp0012;;
125) ./testsimp0013;;
888) emacs NOTES.txt ;;

esac
echo "files"
echo "1 listops consnodes"
echo "2 consnodes"
echo "3 sig_out"
echo "4 sig_in"

echo "110 TEST init"
echo "111 TEST fact"
echo "112 TEST misc"
echo "113 TEST simp0001"
echo "114 TEST simp0002"
echo "123 TEST simp0011"
echo "124 TEST simp0012"
echo "125 TEST simp0013"
echo "888 NOTES.txt"

echo "999 quit"
echo "select"
read select
done
