## CONFIGURATION OPTIONS ##
-# Number of times a command must be run with bench_command
-count=3
-
-# FIXME: verbose mode
-#outputopts=">/dev/null 2>&1"
-
-# Do not run commands
-# FIXME: buggy
-#dry_run=true
+# Default number of times a command must be run with bench_command
+# Can be overrided with 'the option -n'
+count=2
### HELPER FUNCTIONS ##
function die()
{
- echo >&2 "DIE: $*"
- exit 1
+ echo >&2 "error: $*"
+ died=1
}
# Run a single command multiple time and store the execution times
local desc="$2"
shift
shift
+ if test "$verbose" = true; then outputopts="/dev/stdout"; else outputopts="/dev/null"; fi
timeout="time.out"
echo "$title" > "$timeout"
echo "# $desc" >> "$timeout"
# Execute the commands $count times
for i in `seq 1 "$count"`; do
- /usr/bin/time -f "%U" -o "$timeout" -a "$@" $outputopts # || die "$1: failed"
+ /usr/bin/time -f "%U" -o "$timeout" -a "$@" > $outputopts 2>&1 || die "$1: failed"
echo -n "$i. "
tail -n 1 "$timeout"
done
{
if [ "$dry_run" = "true" ]; then return; fi
echo " $ $@"
- "$@"
+ "$@" || die "$@: failed"
}
# perl function to compute min/max/avg.
echo "# [$2] $3 #"
res=$1
if [ "$plots" = "" ]; then
- plots="plot '$1' using 4:xticlabels(5) ti '$2';"
+ plots="plot '$1' using 4:2:3:xticlabels(5) ti '$2';"
else
- plots="$plots replot '$1' using 4 ti '$2';"
+ plots="$plots replot '$1' using 4:2:3 ti '$2';"
fi
if [ "$dry_run" = "true" ]; then return; fi
echo "# [$2] $3" > "$res"
set yrange [0:];
set style data histogram;
set style histogram cluster gap 2;
-set style fill solid border -1;
+set style histogram errorbars linewidth 1;
+set style fill solid 0.3 border -1;
+set bars front;
set boxwidth 0.9;
set xtic nomirror rotate by -45 scale 0 font ',8';
set title "$1"
plots=
}
+# Check if the test should be skiped according to its name
+# $1: name of the test
+# $2: description of the test
+# $NOTSKIPED: arguments
+function skip_test()
+{
+ if test -z "$NOTSKIPED"; then
+ echo "* $1"
+ return 0
+ fi
+ if test "$NOTSKIPED" = "all"; then
+ : # Execute anyway
+ elif echo "$1" | grep "$NOTSKIPED" >/dev/null 2>&1; then
+ : # Found one to execute
+ else
+ return 0
+ fi
+ echo "*"
+ echo "* $1 *****"
+ echo "*"
+ return 1
+}
+
## GLOBAL VARIABLES ##
# The current $res (set by prepare_res, used by bench_command)
local title=$1
shift
run_command "$@" nitg.nit -o "nitg.$title.bin"
- bench_command "nitg" "nitg test_parser.nit" "./nitg.$title.bin" test_parser.nit
+ bench_command "nitg" "nitg test_parser.nit" "./nitg.$title.bin" -v test_parser.nit
run_command "$@" nit.nit -o "nit.$title.bin"
- bench_command "nit" "nit test_parser.nit test_parser.nit" "./nit.$title.bin" test_parser.nit -- -n rapid_type_analysis.nit
+ bench_command "nit" "nit test_parser.nit test_parser.nit" "./nit.$title.bin" -v test_parser.nit -- -n rapid_type_analysis.nit
run_command "$@" ../examples/shoot/shoot_logic.nit -o "shoot.$title.bin"
bench_command "shoot" "shoot_logic" "./shoot.$title.bin"
+ run_command "$@" ../tests/shootout_binarytrees.nit -o "bintrees.$title.bin"
+ bench_command "bintrees" "shootout_binarytrees" "./bintrees.$title.bin" 17
}
+## HANDLE OPTIONS ##
+
+function usage()
+{
+ echo "run_bench: [options]* benchname"
+ echo " -v: verbose mode"
+ echo " -n count: number of execution for each bar (default: $count)"
+ echo " --dry: Do not run the commands, just reuse the data and generate the graph"
+ echo " -h: this help"
+}
+
+stop=false
+while [ "$stop" = false ]; do
+ case "$1" in
+ -v) verbose=true; shift;;
+ -h) usage; exit;;
+ -n) count="$2"; shift; shift;;
+ --dry) dry_run=true; shift;;
+ *) stop=true
+ esac
+done
+
+NOTSKIPED="$*"
+
+if test -z "$NOTSKIPED"; then
+ usage
+ echo "List of available benches:"
+ echo "* all: run all the benches"
+fi
+
+## COMPILE ENGINES
+
+test -f ./nitc_3 || ./ncall.sh -O
+test -f ./nitg || ./nitc_3 nitg.nit -O -v
+
## EFFECTIVE BENCHS ##
function bench_nitg_bootstrap()
{
name="$FUNCNAME"
+ skip_test "$name" && return
prepare_res "$name.dat" "" "Steps of the bootstrap of nitg by nitc"
rm nit?_nit*
- cp ./nitc_3 ./nitc_nitc
- bench_command "c/c c" "nitc_nitc nitc.nit -> nitc_nitc (stability)" ./nitc_nitc -O nitc.nit -o nitc_nitc
- bench_command "c/c g" "nitc_nitc nitg.nit -> nitg_nitc" ./nitc_nitc -O nitg.nit -o nitg_nitc
- bench_command "g/c g" "nitg_nitc nitg.nit -> nitg_nitg" ./nitg_nitc nitg.nit -o nitg_nitg
- bench_command "g/g g" "nitg_nitg nitg.nit -> nitg_nitg (stability)" ./nitg_nitg nitg.nit -o nitg_nitg
+ cp ./nitc_3 ./nitc_nitc.bin
+ bench_command "c/c c" "nitc_nitc nitc.nit -> nitc_nitc (stability)" ./nitc_nitc.bin -O nitc.nit -o nitc_nitc.bin
+ bench_command "c/c g" "nitc_nitc nitg.nit -> nitg_nitc" ./nitc_nitc.bin -O nitg.nit -o nitg_nitc.bin
+ bench_command "g/c g" "nitg_nitc nitg.nit -> nitg_nitg" ./nitg_nitc.bin nitg.nit -o nitg_nitg.bin
+ bench_command "g/g g" "nitg_nitg nitg.nit -> nitg_nitg (stability)" ./nitg_nitg.bin nitg.nit -o nitg_nitg.bin
plot "$name.gnu"
}
function bench_steps()
{
name="$FUNCNAME"
+ skip_test "$name" && return
prepare_res "$name-nitc.dat" "nitc" "Various steps of nitc"
bench_command "parse" "" ./nitc_3 --only-parse nitg.nit
bench_command "metamodel" "" ./nitc_3 --only-metamodel nitg.nit
bench_command "generate c" "" ./nitc_3 --no-cc nitg.nit
- bench_command "full" "" ./nitc_nitc -O nitg.nit
+ bench_command "full" "" ./nitc_3 -O nitg.nit -o "nitg_nitg.bin"
+
+ prepare_res "$name-nitc-g.dat" "nitc-g" "Various steps of nitc --global"
+ bench_command "parse" "" ./nitc_3 --global --only-parse nitg.nit
+ bench_command "metamodel" "" ./nitc_3 --global --only-metamodel nitg.nit
+ bench_command "generate c" "" ./nitc_3 --global --no-cc nitg.nit
+ bench_command "full" "" ./nitc_3 -O --global nitg.nit -o "nitg_nitc-g.bin"
prepare_res "$name-nitg.dat" "nitg" "Various steps of nitg"
bench_command "parse" "" ./nitg --only-parse nitg.nit
bench_command "metamodel" "" ./nitg --only-metamodel nitg.nit
bench_command "generate c" "" ./nitg --no-cc nitg.nit
- bench_command "full" "" ./nitg nitg.nit
+ bench_command "full" "" ./nitg nitg.nit -o "nitg_nitg.bin"
+
+ prepare_res "$name-nitg-e.dat" "nitg-e" "Various steps of nitg --erasure"
+ bench_command "parse" "" ./nitg --erasure --only-parse nitg.nit
+ bench_command "metamodel" "" ./nitg --erasure --only-metamodel nitg.nit
+ bench_command "generate c" "" ./nitg --erasure --no-cc nitg.nit
+ bench_command "full" "" ./nitg --erasure nitg.nit -o "nitg_nitg-e.bin"
plot "$name.gnu"
}
# $#: options to compare
function bench_nitg_options()
{
- name="$FUNCNAME"
+ tag=$1
+ shift
+ name="$FUNCNAME-$tag"
+ skip_test "$name" && return
prepare_res "$name.dat" "no options" "nitg without options"
run_compiler "nitg" ./nitg
+ if test -n "$2"; then
+ prepare_res "$name-all.dat" "all" "nitg with all options $@"
+ run_compiler "nitg-$tag" ./nitg $@
+ fi
+
for opt in "$@"; do
prepare_res "$name$opt.dat" "$opt" "nitg with option $opt"
run_compiler "nitg$opt" ./nitg $opt
plot "$name.gnu"
}
-bench_nitg_options --hardening
+bench_nitg_options "hardening" --hardening
+bench_nitg_options "nocheck" --no-check-covariance --no-check-initialization --no-check-assert --no-check-autocast --no-check-other
+
+function bench_nitg-e_options()
+{
+ tag=$1
+ shift
+ name="$FUNCNAME-$tag"
+ skip_test "$name" && return
+ prepare_res "$name.dat" "no options" "nitg-e without options"
+ run_compiler "nitg-e" ./nitg --erasure
+
+ if test -n "$2"; then
+ prepare_res "$name-all.dat" "all" "nitg-e with all options $@"
+ run_compiler "nitg-e-$tag" ./nitg --erasure $@
+ fi
+
+ for opt in "$@"; do
+ prepare_res "$name$opt.dat" "$opt" "nitg-e with option $opt"
+ run_compiler "nitg-e$opt" ./nitg --erasure $opt
+ done
+
+ plot "$name.gnu"
+}
+bench_nitg-e_options "slower" --hardening --no-inline-intern
+bench_nitg-e_options "nocheck" --no-check-covariance --no-check-initialization --no-check-assert --no-check-autocast --no-check-other --no-check-erasure-cast
+bench_nitg-e_options "faster" --inline-coloring-numbers
+bench_nitg-e_options "typing" --bm-typing --phmod-typing --phand-typing
function bench_nitc_gc()
{
name="$FUNCNAME"
+ skip_test "$name" && return
for gc in nitgc boehm malloc large; do
prepare_res "$name-$gc".dat "$gc" "nitc with gc=$gc"
export NIT_GC_OPTION="$gc"
function bench_nitc_boost()
{
name="$FUNCNAME"
+ skip_test "$name" && return
prepare_res "$name-slow.dat" "no -O" "nitc without -O"
run_compiler "nitc_slow" ./nitc_3
prepare_res "$name-fast.dat" "-O" "nitc with -O"
function bench_engines()
{
name="$FUNCNAME"
+ skip_test "$name" && return
prepare_res "$name-nitc.dat" "nitc" "nitc"
run_compiler "nitc" ./nitc_3 -O
prepare_res "$name-nitc-g.dat" "nitc-g" "nitc with --global"
run_compiler "nitc-g" ./nitc_3 -O --global
prepare_res "$name-nitg.dat" "nitg" "nitg"
run_compiler "nitg" ./nitg
+ prepare_res "$name-nitg-e.dat" "nitg-e" "nitg with --erasure"
+ run_compiler "nitg-e" ./nitg --erasure
plot "$name.gnu"
}
bench_engines
function bench_compilation_time
{
name="$FUNCNAME"
+ skip_test "$name" && return
prepare_res "$name-nitc.dat" "nitc" "nitc"
for i in ../examples/hello_world.nit test_parser.nit nitg.nit; do
bench_command `basename "$i" .nit` "" ./nitc_3 -O "$i" --no-cc
for i in ../examples/hello_world.nit test_parser.nit nitg.nit; do
bench_command `basename "$i" .nit` "" ./nitg "$i" --no-cc
done
- prepare_res "$name-nitg_g.dat" "nitg/g" "nitg/g"
+ prepare_res "$name-nitg-e.dat" "nitg-e" "nitg --erasure"
for i in ../examples/hello_world.nit test_parser.nit nitg.nit; do
- bench_command `basename "$i" .nit` "" ./nitg.bin "$i" --no-cc
+ bench_command `basename "$i" .nit` "" ./nitg --erasure "$i" --no-cc
done
plot "$name.gnu"
}
bench_compilation_time
+
+if test -n "$died"; then
+ echo "Some commands failed"
+ exit 1
+fi
+exit 0