blib/lib/Type/Tiny/Union.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 11 | 16 | 68.7 |
line | l | !l | condition |
---|---|---|---|
115 | 217 | 381 | &$_($val) and return Deparse error: Can't locate object method "object_2svref" via package "B::SPECIAL" at /usr/local/lib/perl5/5.26.1/B/Deparse.pm line 5018. |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
30 | 0 | 216 | 5 | &blessed($_) and $_->can("new_union") |
line | l | !l | condition |
---|---|---|---|
23 | 1220 | 0 | $_[0]{'type_constraints'} ||= [] |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
33 | 0 | 0 | 2 | !defined($_) || $_ ne $first_maker |
96 | 34 | 52 | 0 | $_[0]{'constraint'} ||= $_[0]->_build_constraint |
173 | 193 | 65 | 9 | $_[0]{'parent'} ||= $_[0]->_build_parent |