Branch Coverage

blib/lib/DMS/XS/Parser.pm
Criterion Covered Total %
branch 36 96 37.5


line true false branch
61 0 3 if defined &DMS::LocalDate::new
76 0 0 $_[1] ? :
88 0 0 unless defined $h
126 3 8 if ($state eq "no_fm")
130 1 7 if ($state eq 'unterminated') { }
165 0 11 if ($c eq " " or $c eq "\t")
167 1 10 if ($c eq "\n")
168 0 10 if ($c eq "\r")
169 0 0 substr($src, $i, 2) eq "\r\n" ? :
173 0 10 if (substr($src, $i, 3) eq "###")
175 0 0 if $end < 0
180 1 9 if ($c eq "#")
182 0 1 $nl < 0 ? :
186 0 9 if ($c eq "/" and substr($src, $i, 2) eq "//")
188 0 0 $nl < 0 ? :
192 0 9 if ($c eq "/" and substr($src, $i, 2) eq "/*")
194 0 0 if $end < 0
201 2 9 if $i + 3 > $len
202 1 8 if substr($src, $i, 3) ne "+++"
207 8 0 if $c ne " " and $c ne "\t"
210 8 0 if ($j < $len)
212 0 8 if ($c ne "\n" and $c ne "\r")
225 17 0 if ($c eq "\n") { }
0 0 elsif ($c eq "\r") { }
227 0 0 substr($src, $p, 2) eq "\r\n" ? :
229 1 16 if $p >= $len
233 0 16 $nl < 0 ? :
236 0 16 if ($line_end > $line_start and substr($src, $line_end - 1, 1) eq "\r")
244 7 9 if ($trimmed eq "+++")
247 0 7 $nl < 0 ? :
291 0 2 if (defined &DMS::XS::Parser::encode_lite_xs)
294 2 0 if (defined &DMS::XS::Parser::to_dms_lite_xs)
306 1 0 unless ($warned++)
316 0 0 unless ($warned++)
326 1 0 unless ($warned++)
336 1 0 unless ($warned++)
359 0 0 if defined $doc->{'body'}
366 0 0 if defined $doc->{'body'}
377 1 0 unless ($warned++)
389 0 0 unless ($warned++)
401 0 0 unless ($warned++)
412 0 0 unless ($warned++)
427 0 0 unless defined $v
429 0 0 if $r eq ""
434 0 0 if (builtin::blessed($v))
435 0 0 if $r ne "DMS::UnorderedTable"
443 0 0 if ($r eq "ARRAY")
446 0 0 if ($r eq "HASH")