File Coverage

/tmp/sll_90CvRH

Criterion	Covered	Total	%
statement	12	12	100.0
branch			n/a
condition			n/a
subroutine	4	4	100.0
pod			n/a
total	16	16	100.0

package Foo;
use Mite::Shim;

# For lexical environment test
use strict;
use warnings;
use feature ':5.10';

has number =>
  is            => 'rw',
  default       => sub { 23 };

has list =>
  is            => 'rw',
  default       => sub { [] };

my $thing = { foo => 99 };
has closure =>
  is            => 'rw',
  default       => sub { $thing };

has counter =>
  is            => 'rw',
  default       => sub {
      state $counter = 0;
      $counter++;
      return $counter;
  };

1;