use Evo;
use Test::Evo::Benchmark;
use Test::More;

plan skip_all => 'set TEST_EVO_PERF env to enable this test' unless $ENV{TEST_EVO_PERF};

my $EXPECT = 300_000 * $ENV{TEST_EVO_PERF};
my $N      = 500_000;

my $k = 0;

use Evo '-Try *';

#use TryCatch;
#use Try::Tiny;
my $fn = sub {
  try { $k++; 'foo' } catch {fail};
};

faster_ok(fn => $fn, iters => $N, expect => $EXPECT, diag => 1);
is $k, $N;

done_testing;

