From: gfx <gfuji@cpan.org>
Date: Wed, 7 Oct 2009 09:49:10 +0000 (+0900)
Subject: Tweaks for benchmarks
X-Git-Tag: 0.37_03~16
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4128ec2bbd6fd4a25026b0343f74007cd08933c8;p=gitmo%2FMouse.git

Tweaks for benchmarks
---

diff --git a/benchmarks/basic.pl b/benchmarks/basic.pl
index e53c836..34a4f09 100644
--- a/benchmarks/basic.pl
+++ b/benchmarks/basic.pl
@@ -8,8 +8,13 @@ for my $klass (qw/Moose Mouse/) {
         package ${klass}One;
         use $klass;
         has n => (
-            is  => 'rw',
-            isa => 'Int',
+            is     => 'rw',
+            isa    => 'Int',
+        );
+        has m => (
+            is      => 'rw',
+            isa     => 'Int',
+            default => 42,
         );
         no $klass;
         __PACKAGE__->meta->make_immutable;