This repository has been archived on 2023-08-20. You can view files and clone it, but cannot push or open issues or pull requests.
yap-6.3/docs/index/Benchmarks/go_xxx

34 lines
774 B
Bash

#! /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