X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=benchmark%2Fobject_factory;fp=benchmark%2Fobject_factory;h=ed834795c633e523468bb1a369b4a830004af295;hb=47402ac5d24dcb502064cd5785551b15c36ee4ec;hp=942eb464112001684711e588afb9a95fa847a322;hpb=421104c989f6f2bb10c38c88bd12439da0e6a929;p=gitmo%2FMoo.git diff --git a/benchmark/object_factory b/benchmark/object_factory index 942eb46..ed83479 100644 --- a/benchmark/object_factory +++ b/benchmark/object_factory @@ -18,14 +18,12 @@ BEGIN { { getopt_conf => [qw/gnu_getopt bundling_override no_ignore_case/] }, ); - # can not change this runtime, thus in-block - $ENV{MOUSE_PUREPERL} = 1 if $opts->{bench} eq 'pp'; - my @missing; for (qw/ Moose Moo Mouse + Mousse /) { eval "require $_" or push @missing, $_; } @@ -55,8 +53,7 @@ if ($opts->{bench} =~ /all|pp/) { } _add_moosey_has (moose => 'Moose'); - _add_moosey_has (mouse => 'Mouse') - if $ENV{MOUSE_PUREPERL}; + _add_moosey_has (mouse => 'Mousse') } if ($opts->{bench} =~ /all|xs/) { @@ -65,7 +62,6 @@ if ($opts->{bench} =~ /all|xs/) { _add_moosey_has (moo_XS => 'Moo'); } _add_moosey_has (mouse_XS => 'Mouse') - unless $ENV{MOUSE_PUREPERL}; }