line |
true |
false |
branch |
409
|
0 |
0 |
if (exists $declaration_for{'constructors'} and @{$declaration_for{'constructors'};}) |
447
|
0 |
0 |
unless @_ |
477
|
0 |
0 |
if (my $error = $@) |
485
|
0 |
0 |
unless ($value_for{'_no_constructor'}) |
502
|
0 |
0 |
unless $call_pack |
504
|
0 |
0 |
if $call_pack->isa('Class::Meta::Declare') |
506
|
0 |
0 |
unless return $call_pack |
515
|
0 |
0 |
exists $$definition_for{'code'} ? : |
516
|
0 |
0 |
if (my $code = delete $$definition_for{'code'}) |
532
|
0 |
0 |
unless exists $$definition_for{'type'} |
537
|
0 |
0 |
unless ($type_class) |
539
|
0 |
0 |
if $class |
541
|
0 |
0 |
unless defined $type_class |
545
|
0 |
0 |
unless ($self->installed_types($type_class)) |
547
|
0 |
0 |
if $accessors |
549
|
0 |
0 |
if (my $error = $@) |
556
|
0 |
0 |
if (exists $$definition_for{'code'}) |
565
|
0 |
0 |
if (my $error = $@) |
577
|
0 |
0 |
if (exists $$definition_for{'code'}) |
585
|
0 |
0 |
if (my $error = $@) |
600
|
0 |
0 |
unless my $code_installer = $accessor_builder_for{$self->accessors} |
609
|
0 |
0 |
unless ('CODE' eq ref $code) |
619
|
0 |
0 |
unless ('CODE' eq ref $code) |
630
|
0 |
0 |
unless ('HASH' eq ref $code) |
634
|
0 |
0 |
$accessor_style =~ /^semi/ ? : |
635
|
0 |
0 |
unless my $get = $$code{'get'} |
638
|
0 |
0 |
unless my $set = $$code{'set'} |