package Test::FITesque::Suite;
use Moose;
our $ADDED_TESTS = [];
sub add {
push @{ shift->{data} }, @_;
}
sub run_tests {
my $self = shift;
my @results;
foreach my $test (@{ $self->{data} }) {
push @results, $test->data;
}
$Test::FITesque::Suite::ADDED_TESTS = \@results;
}
1;