benchmarking Moose against Class::Accessor::Fast
[gitmo/Moose.git] / benchmarks / type_constraints.pl
index dcc15cd..a0a6eed 100644 (file)
@@ -20,7 +20,6 @@ all vs. a custom-created type.
     
     has 'baz' => (is => 'rw');
     has 'bar' => (is => 'rw', isa => 'Foo');
-    has 'boo' => (is => 'rw', isa => type 'CustomFoo' => where { blessed($_) && $_->isa('Foo') });
 }
 
 my $foo = Foo->new;
@@ -32,9 +31,6 @@ cmpthese(200_000,
         },
         'w_constraint' => sub {
             $foo->bar($foo);            
-        },
-        'w_custom_constraint' => sub {
-            $foo->boo($foo);            
         },        
     }
 );