echo "19 appl"
echo "20 cl_analyze"
echo "21 closures.doc"
echo "22 codegen"
echo "23 compile_decl"
echo "24 compile_stubs"
echo "25 display"
echo "26 find_inline"
echo "27 ident"
echo "28 is_int_const"
echo "29 op_codes"
echo "30 sl_analyze"
echo "31 trace"
echo "32 traverse"
echo "33 type_constr"
echo "34 var_in_reg"
echo "35 codegen_str.inc"
echo "36 drefops"
echo "37 find_inline"


echo "------------"
echo "files PASS5d"
echo "------------"
echo "1 RIC"
echo "2 display"
echo "3 find_inline"
echo "4 ident"
echo "5 is_int_const"
echo "6 op_codes"
echo "7 sl_analyze"
echo "8 trace"
echo "9 traverse"
echo "10 type_constr"
echo "11 var_in_reg"
echo "12 codegen"
echo "13 codegen_str.inc"
echo "14 find_inline"

echo "15 appl"
echo "16 cl_analyze"
echo "17 closures.doc"
echo "18 compile_decl"
echo "19 compile_stubs"
echo "20 display"
echo "21 find_inline"

echo "------------"

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 "999 quit"
echo "select"
read select
while [ $select -ne 999 ]
do 
case $select in
1) emacs pass5d/RIC.c pass5d/RIC.icn;;
2) emacs pass5d/display.c pass5d/display.icn;;
3) emacs pass5d/find_inline.c pass5d/find_inline.icn;;
4) emacs pass5d/ident.c pass5d/ident.icn;;
5) emacs pass5d/is_int_const.c pass5d/is_int_const.icn;;
6) emacs pass5d/op_codes.c pass5d/op_codes.icn;;
7) emacs pass5d/sl_analyze.c pass5d/sl_analyze.icn;;
8) emacs pass5d/trace.c pass5d/trace.icn;;
9) emacs pass5d/traverse.c pass5d/traverse.icn;;
10) emacs pass5d/type_constr.c pass5d/type_constr.icn;;
11) emacs pass5d/var_in_reg.c pass5d/var_in_reg.icn;;
12) emacs pass5d/codegen.c pass5d/codegen.icn;;
13) emacs pass5d/codegen.c pass5d/codegen_str.inc.icn;;
14) emacs pass5d/find_inline.c pass5d/find_inline.icn;;
15) emacs pass5d/appl.c pass5d/appl.icn;;
16) emacs pass5d/cl_analyze.c pass5d/cl_analyze.icn;;
17) emacs pass5d/closures.doc.c pass5d/closures.doc.icn;;
18) emacs pass5d/compile_decl.c pass5d/compile_decl.icn;;
19) emacs pass5d/compile_stubs.c pass5d/compile_stubs.icn;;
20) emacs pass5d/display.c pass5d/display.icn;;
21) emacs pass5d/find_inline.c pass5d/find_inline.icn;;

111) ./testfact;;
112) ./testmisc;;
113) ./testsimp0001;;
114) ./testsimp0002;;
123) ./testsimp0011;;
124) ./testsimp0012;;
125) ./testsimp0013;;

esac
echo "------------"
echo "files"
echo "------------"
echo "1 RIC"
echo "2 display"
echo "3 find_inline"
echo "4 ident"
echo "5 is_int_const"
echo "6 op_codes"
echo "7 sl_analyze"
echo "8 trace"
echo "9 traverse"
echo "10 type_constr"
echo "11 var_in_reg"
echo "12 codegen"
echo "13 codegen_str.inc"
echo "14 find_inline"
echo "15 appl"
echo "16 cl_analyze"
echo "17 closures.doc"
echo "18 compile_decl"
echo "19 compile_stubs"
echo "20 display"
echo "21 find_inline"
echo "------------"

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 "999 quit"
echo "select"
read select
done
