Set larger minimum scales to avoid noise at left of plots when compile time is ignored, potentially preventing nonsense performance ratios

Author: japhb

microbenchmarks.pl

@@ -174,28 +174,28 @@
  },
  {
   name  => 'visit_2d_indices_while',
-  scale => 1,
+  scale => 1 << 3,
   perl5 => 'my $i = 0; while ($i < SCALE) { my $j = 0; while ($j < SCALE) { $i + $j; $j++ }; $i++ }',
   perl6 => 'my $i = 0; while ($i < SCALE) { my $j = 0; while ($j < SCALE) { $i + $j; $j++ }; $i++ }',
   nqp   => 'my $i := 0; while ($i < SCALE) { my $j := 0; while ($j < SCALE) { $i + $j; $j := $j + 1 }; $i := $j + 1 }',
  },
  {
   name  => 'visit_2d_indices_loop',
-  scale => 1,
+  scale => 1 << 3,
   perl5 => 'for  (my $i = 0; $i < SCALE; $i++) { for  (my $j = 0; $j < SCALE; $j++) { $i + $j } }',
   perl6 => 'loop (my $i = 0; $i < SCALE; $i++) { loop (my $j = 0; $j < SCALE; $j++) { $i + $j } }',
   nqp   => undef,
  },
  {
   name  => 'visit_2d_indices_for',
-  scale => 1,
+  scale => 1 << 3,
   perl5 => 'for my $i (0 .. (SCALE - 1)) { for my $j (0 .. (SCALE - 1)) { $i + $j } }',
   perl6 => 'for ^SCALE -> $i { for ^SCALE -> $j { $i + $j } }',
   nqp   => undef,
  },
  {
   name  => 'visit_2d_indices_cross',
-  scale => 1,
+  scale => 1 << 3,
   perl5 => undef,
   perl6 => 'for ^SCALE X ^SCALE -> $i, $j { $i + $j }',
   nqp   => undef,

minibenchmarks.pl

@@ -2,6 +2,7 @@
  {
   name  => 'rc-forest-fire',
   skip  => [qw( niecza.nqp p6.pl p6.js_v8 )],
+  scale => 1 << 3,
   x_label => 'Frames per Run',
   y_label => 'Frames per Second',
   perl5 => [qw( BENCH/perl5/rc-forest-fire 16 16 SCALE )],