summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ChangeLog6
-rwxr-xr-xetc/bench.pl.in8
2 files changed, 11 insertions, 3 deletions
diff --git a/ChangeLog b/ChangeLog
index ba6b25f4..80807011 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,11 @@
2008-11-04 Akim Demaille <demaille@gostai.com>
+ Improve the display of sizes.
+ * etc/bench.p.in: Higher precision.
+ Sort by decreasing size.
+
+2008-11-04 Akim Demaille <demaille@gostai.com>
+
Don't memcpy C++ structures.
* data/lalr1-fusion.cc (b4_symbol_variant): Adjust additional
arguments.
diff --git a/etc/bench.pl.in b/etc/bench.pl.in
index 93f3d176..d1b2aa44 100755
--- a/etc/bench.pl.in
+++ b/etc/bench.pl.in
@@ -725,16 +725,18 @@ sub bench_grammar ($%)
cmpthese ($res, 'nop');
# Display the sizes.
- print "Sizes:\n";
+ print "Sizes (decreasing):\n";
my $width = 10;
for my $bench (keys %size)
{
$width = length $bench
if $width < length $bench;
}
- for my $bench (keys %size)
+ # Benches sorted by decreasing size.
+ my @benches_per_size = sort {$size{$b} <=> $size{$a}} keys %size;
+ for my $bench (@benches_per_size)
{
- printf "%${width}s: %5dkB\n", $bench, int ($size{$bench} / 1024);
+ printf "%${width}s: %5.2fkB\n", $bench, $size{$bench} / 1024;
}
}