From: gfx Date: Sun, 25 Oct 2009 08:49:52 +0000 (+0900) Subject: Tweak for benchmarks/subtype.pl X-Git-Tag: 0.40_01~16 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=000bf66b6556949556a3499b970fd33ac83b3d4d;p=gitmo%2FMouse.git Tweak for benchmarks/subtype.pl --- diff --git a/benchmarks/subtype.pl b/benchmarks/subtype.pl index 5c53508..90a0cf3 100755 --- a/benchmarks/subtype.pl +++ b/benchmarks/subtype.pl @@ -21,11 +21,11 @@ for my $klass (qw/Moose Mouse/) { die $@ if $@; } -use Data::Dumper; -$Data::Dumper::Deparse = 1; -$Data::Dumper::Indent = 1; -print Mouse::Util::TypeConstraints::find_type_constraint('NaturalNumber')->dump(3); -print Moose::Util::TypeConstraints::find_type_constraint('NaturalNumber')->dump(3); +#use Data::Dumper; +#$Data::Dumper::Deparse = 1; +#$Data::Dumper::Indent = 1; +#print Mouse::Util::TypeConstraints::find_type_constraint('NaturalNumber')->dump(3); +#print Moose::Util::TypeConstraints::find_type_constraint('NaturalNumber')->dump(3); print "Class::MOP: $Class::MOP::VERSION\n"; print "Moose: $Moose::VERSION\n";