File Coverage

blib/lib/Gentoo/Dependency/AST/Node/Dependency.pm
Criterion Covered Total %
statement 17 24 70.8
branch 2 4 50.0
condition n/a
subroutine 6 12 50.0
pod 6 6 100.0
total 31 46 67.3


line stmt bran cond sub pod time code
1              
2 1     1   7 use strict;
  1         2  
  1         37  
3 1     1   4 use warnings;
  1         2  
  1         39  
4              
5             package Gentoo::Dependency::AST::Node::Dependency;
6             BEGIN {
7 1     1   29 $Gentoo::Dependency::AST::Node::Dependency::AUTHORITY = 'cpan:KENTNL';
8             }
9             {
10             $Gentoo::Dependency::AST::Node::Dependency::VERSION = '0.001001';
11             }
12              
13             # ABSTRACT: A single C dependency atom
14              
15              
16 1     1   861 use parent 'Gentoo::Dependency::AST::Node';
  1         313  
  1         4  
17              
18 1     1   37 use Class::Tiny qw( depstring );
  1         2  
  1         3  
19              
20              
21             sub _croak {
22 0     0   0 require Carp;
23 0         0 goto &Carp::croak;
24             }
25              
26              
27             sub BUILD {
28 21     21 1 636 my ( $self, $args ) = @_;
29 21 50       443 return _croak(q[ not defined]) if not defined $self->depstring;
30 21 50       499 return _croak(q[ has no length]) if not length $self->depstring;
31 21         133 return;
32             }
33              
34             sub add_dep {
35 0     0 1   return _croak(q[Dependencies cannot have children]);
36             }
37              
38             sub enter_notuse_group {
39 0     0 1   return _croak(q[Dependencies cannot have 'use' child components]);
40             }
41              
42             sub enter_use_group {
43 0     0 1   return _croak(q[Dependencies cannot have 'use' child components]);
44             }
45              
46             sub enter_or_group {
47 0     0 1   return _croak(q[Dependencies cannot have 'or' child components]);
48             }
49              
50             sub enter_and_group {
51 0     0 1   return _croak(q[Dependencies cannot have 'and' child components]);
52             }
53              
54             1;
55              
56             __END__