projects
/
gitmo/Mouse.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
(parent:
66e667a
)
Tweaks for benchmarks
gfx [Wed, 7 Oct 2009 09:49:10 +0000 (18:49 +0900)]
benchmarks/basic.pl
patch
|
blob
|
blame
|
history
diff --git
a/benchmarks/basic.pl
b/benchmarks/basic.pl
index
e53c836
..
34a4f09
100644
(file)
--- 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;