1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
#!/usr/bin/bash
##
# Generate raw perf data ...
set -x
./sak.tcl critcl
./sak.tcl bench -format csv -match '*/critcl *' -o modules/map/perf/critcl.csv modules/map
./sak.tcl bench -format csv -match '*/tcl *' -o modules/map/perf/tcl.csv modules/map
rm -rf modules/tcllibc
rm -rf include
# Move differences from bench description into the interpreter path.
sed -i -s 's|/critcl | |' modules/map/perf/critcl.csv
sed -i -s 's|/tclsh|/tclsh-critcl|' modules/map/perf/critcl.csv
sed -i -s 's|/tcl | |' modules/map/perf/tcl.csv
sed -i -s 's|/tclsh|/tclsh-tcl|' modules/map/perf/tcl.csv
# Fuse, raw times, and normalized using critcl as base (expected to be faster)
./sak.tcl bench/show -o modules/map/perf/compare.txt modules/map/perf/critcl.csv modules/map/perf/tcl.csv
./sak.tcl bench/show -o modules/map/perf/compare.norm.txt -norm 1 modules/map/perf/critcl.csv modules/map/perf/tcl.csv
# Done
date
exit
|
