yap-6.3/docs/index/Benchmarks/go_xxx

#! /bin/sh 

XXX=$HOME/Projects/XXX/bin/xxx

rm -f *.O

if test $# -eq 1; then
  testfiles="$1.P"	## test file name is given as unique extra argument
else
  testfiles="tc_l_io_chain8000.P tc_r_io_chain2000.P tc_d_io_chain400.P \
	     tc_l_oo_chain2000.P tc_r_oo_chain2000.P  tc_d_oo_chain400.P \
	     compress.P sg_cyl.P pta.P mutagenesis.P"
fi

printf "========================================\n"
printf "        XXX            1st    JITI      \n" 
printf "========================================\n"
for file in $testfiles ; do
  benchname=`basename $file .P`
  printf "%21s  " $benchname
  $XXX << EOF 2>/dev/null
    compile('$file',[jiti_off]).
    ['$file'].
    time.
EOF
rm *.O
printf " \t"
  $XXX << EOF 2>/dev/null
    ['$file'].
    time.
EOF
printf "\n"
done