Condition Coverage

blib/lib/DMS/Emitter.pm
Criterion Covered Total %
condition 34 99 34.3


and 2 conditions

line l !l condition
375 0 0 _is_table($v) and scalar _table_keys($v)
0 0 _is_list($v) and scalar @$v
402 6 0 _is_table($v) and scalar _table_keys($v)
6 0 _is_list($v) and scalar @$v

and 3 conditions

line !l l&&!r l&&r condition
84 0 19 0 not $lite and _contains_unordered($doc->{'body'})
88 0 16 3 not $lite and defined $doc->{'meta'}
16 3 0 not $lite and defined $doc->{'meta'} and _contains_unordered($doc->{'meta'})
159 0 0 21 defined $first and not ref $first
0 21 0 defined $first and not ref $first and $first eq "__fm__"
228 0 0 28 $tied and ref $tied eq "Tie::IxHash"
337 36 1 8 $nc && @{$nc->{'trailing'};}
342 40 0 5 $can_block && !($has_trailing && $self->_is_flow_safe($v, $child_path))
488 33 0 5 $lit_ref and exists $lit_ref->{'integer_lit'}
525 6 0 2 $lit_ref and exists $lit_ref->{'string_form'}
566 0 1 0 $line_start + $kv_indent_spaces < length $bytes and substr($bytes, $line_start + $kv_indent_spaces, 1) eq " "
660 38 0 8 $nc and @{$nc->{'trailing'};}
684 42 9 0 $nc && @{$nc->{'inner'};}
722 0 0 0 $lit and exists $lit->{'string_form'}
0 0 0 $lit and exists $lit->{'string_form'} and $lit->{'string_form'}{'kind'} eq "heredoc"
794 0 0 0 index($k, "'") == -1 and index($k, "\n") == -1
0 0 0 index($k, "'") == -1 and index($k, "\n") == -1 and index($k, "\r") == -1

or 2 conditions

line l !l condition
107 10 11 $self->{'comments_by_path'}{$pk} ||= {"leading", [], "inner", [], "trailing", [], "floating", []}
553 1 0 $form->{'modifiers'} || []

or 3 conditions

line l !l&&r !l&&!r condition
165 3 0 16 $fm_present or $has_fm_comments
306 0 0 0 _is_table($v) && scalar _table_keys($v) || _is_list($v) && scalar @$v
339 3 2 40 _is_table($v) && scalar _table_keys($v) || _is_list($v) && scalar @$v
435 0 0 0 $cls eq "DMS::OffsetDateTime" or $cls eq "DMS::LocalDateTime"
0 0 0 $cls eq "DMS::OffsetDateTime" or $cls eq "DMS::LocalDateTime" or $cls eq "DMS::LocalDate"
0 0 0 $cls eq "DMS::OffsetDateTime" or $cls eq "DMS::LocalDateTime" or $cls eq "DMS::LocalDate" or $cls eq "DMS::LocalTime"
528 6 0 2 not $form or $form->{'kind'} eq "basic"
613 0 0 0 $cls eq "DMS::OffsetDateTime" or $cls eq "DMS::LocalDateTime"
0 0 0 $cls eq "DMS::OffsetDateTime" or $cls eq "DMS::LocalDateTime" or $cls eq "DMS::LocalDate"
0 0 0 $cls eq "DMS::OffsetDateTime" or $cls eq "DMS::LocalDateTime" or $cls eq "DMS::LocalDate" or $cls eq "DMS::LocalTime"
719 0 0 0 ref $v or builtin::blessed($v)
768 0 0 0 $c eq "_" or $c eq "-"