| blib/lib/Yote.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 56 | 84 | 66.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 240 | 0 | 0 | 38391 | $id and $id ne 'u' |
| 313 | 3398 | 104 | 5696 | defined $val and $val ne 'u' |
| 416 | 84 | 13490 | 0 | defined $_ and $_ =~ /[\\\`]/ |
| 441 | 1221 | 2790 | 0 | $block_size == 1 and $level > 0 |
| 612 | 0 | 1 | 3 | exists $self->[1][$idx] && $self->[1][$idx] ne 'u' |
| 630 | 0 | 2 | 144 | $self->[6] > 0 and not defined $self->FETCH($self->[6] - 1) |
| 730 | 115 | 344 | 6553 | @vals and $remove_length |
| 767 | 3 | 341 | 6 | @vals and $self->[6] > $block_idx * $BLOCK_SIZE + $block_off |
| 859 | 2855 | 3271 | 0 | $level == 0 and $size > $buckets |
| 914 | 3253 | 0 | 1555 | exists $self->[1]{$key} && $self->[1]{$key} ne 'u' |
| 1178 | 0 | 0 | 0 | !defined($cur) || $cur eq 'u' and defined $default |
| 1299 | 62 | 1 | 2 | !defined($self->[1]{$fld}) || $self->[1]{$fld} eq 'u' and defined $init_val |
| line | l | !l | condition |
|---|---|---|---|
| 78 | 0 | 0 | $node->get_db_version || 'unknown' |
| 81 | 0 | 0 | $node->get_db_version || 'unknown' |
| 126 | 0 | 4 | pop() || 'Yote::Obj' |
| 419 | 859 | 2536 | $self->[3] || 0 |
| 3395 | 0 | $self->[4] || 0 | |
| 3381 | 14 | $self->[6] || 0 | |
| 3386 | 9 | $self->[7] || 0 | |
| 855 | 2855 | 3271 | $level ||= 0 |
| 856 | 6096 | 30 | $size ||= 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 242 | 32550 | 18 | 5823 | $self->[1]{$id} // $self->[2]{$id} |
| 371 | 2 | 3 | 6 | $class eq 'Yote::Hash' or $class eq 'Yote::Array' |
| 5 | 6 | 0 | $class eq 'Yote::Hash' or $class eq 'Yote::Array' or $ref->isa('Yote::Obj') | |
| 372 | 11 | 0 | 0 | $ref->[0] ||= $self->_new_id |
| 533 | 26058 | 0 | 0 | tied @$block || $block |
| 689 | 352 | 1005 | 0 | $remove_length or @vals |
| 857 | 6095 | 31 | 0 | $buckets ||= $Yote::Hash::SIZE |
| 1083 | 239 | 2079 | 6405 | $at_start ||= !$hash |
| 1178 | 0 | 0 | 0 | !defined($cur) || $cur eq 'u' |
| 1299 | 3 | 0 | 62 | !defined($self->[1]{$fld}) || $self->[1]{$fld} eq 'u' |