Branch Coverage

blib/lib/Text/ASCIIMathML.pm
Criterion Covered Total %
branch 265 306 86.6


line true false branch
511 274 1 $tree ? :
521 0 548 unless defined $expr
523 548 0 ref $mstyleAttr eq 'ARRAY' ? :
548 0 if $mstyleAttr
529 1 547 unless $mstyle->childNodes > 0
532 274 0 ref $mathAttr eq 'ARRAY' ? :
274 273 if $mathAttr
581 9316 1166 if $symbol
836 922 9560 if /^(\d+(\.\d+)?)/ or /^(\.\d+)/
838 28 9532 if $$self{'Definition_RE'} and /^($$self{'Definition_RE'})/
840 78 4384 $AMTexSym{$1} ? :
4462 5070 if /^($Ident_RE)/o
842 2146 2924 if /^([A-Za-z])/
844 10 1748 $1 eq '-' && defined $$self{'previousSymbol'} && $$self{'previousSymbol'} eq 'INFIX' ? :
1758 1166 if /^(.)/
869 96 2239 if (defined $symbol and $$symbol{'ttype'} eq 'INFIX' and $input eq '/') { }
2217 22 elsif (defined $node) { }
872 96 0 if ($result[0]) { }
894 434 560 if (defined $symbol and $$symbol{'ttype'} =~ /RIGHTBRACKET|LEFTRIGHT/)
896 18 26 if (@childNodes > 1 and $childNodes[-1]->nodeName eq 'mrow' and $childNodes[-2]->nodeName eq 'mo' and $childNodes[-2]->firstChild->nodeValue eq ',')
901 18 0 if ($right =~ /[\)\]]/)
903 18 0 if ("$left$right" =~ /^\(\)$/ and $$symbol{'output'} ne '}' or "$left$right" =~ /^\[\]$/)
911 38 0 if $matrix
919 38 0 if ($matrix)
921 40 170 if (($node->childNodes)[$j]->firstChild->nodeValue eq ',')
927 20 18 if ($matrix and $i > 1)
931 18 0 if ($matrix)
942 40 94 if ($k < @{$pos[$i];} and $j == $pos[$i][$k]) { }
956 20 18 if ($newFrag->childNodes > 2)
966 8 10 if $$symbol{'invisible'}
974 390 44 unless ($$symbol{'invisible'})
993 224 1683 if (defined $symbol and $$symbol{'ttype'} eq 'INFIX' and $input ne '/')
997 224 0 if ($result[0]) { }
1005 134 90 if ($input eq '_') { }
90 0 elsif ($input eq '^') { }
1008 54 80 if ($in2 eq '^') { }
1013 30 24 $underover ? :
1020 8 72 $underover ? :
1028 2 88 if ($in2 eq '_') { }
1033 0 2 $underover ? :
1040 0 88 $underover ? :
1061 44 2897 if not defined $symbol or $$symbol{'ttype'} eq 'RIGHTBRACKET' and $$self{'nestingDepth'} > 0
1064 24 2873 if ($$symbol{'ttype'} eq 'DEFINITION')
1069 2167 730 if ($ttype =~ /UNDEROVER|CONST/)
1076 434 296 if ($ttype eq 'LEFTBRACKET')
1082 44 390 if ($$symbol{'invisible'}) { }
1093 36 260 if ($ttype eq 'TEXT')
1094 2 34 unless $input eq '"'
1096 34 2 if $str =~ /^(\"()\")/ or $str =~ /^(\"((?:\\\\|\\\"|.)+?)\")/
1098 2 34 if $str =~ /^(\((.*?)\))/ or $str =~ /^(\[(.*?)\])/ or $str =~ /^(\{(.*?)\})/
1102 0 36 unless defined $st
1103 4 32 if (substr($st, 0, 1) eq ' ')
1111 6 30 if (substr($st, -1) eq ' ')
1119 180 80 if ($ttype eq 'UNARY')
1122 30 150 unless defined $result[0]
1126 86 64 if ($$symbol{'func'})
1127 14 72 if $str =~ m[^[\^_/|]]
1138 20 44 if ($$symbol{'acc'})
1145 24 20 if ($$symbol{'atname'})
1146 12 12 if ($$self{'attr'}{'ForMoz'} and $$symbol{'codes'})
1150 18 0 if ($childNodes[$i]->nodeName eq 'mi' or $nodeName eq 'mi')
1151 6 12 $nodeName eq 'mi' ? :
1155 6 12 if ($nodeName eq 'mi') { }
1171 24 56 if ($ttype eq 'BINARY')
1174 0 24 unless defined $result[0]
1179 0 24 unless defined $result2[0]
1183 10 14 if ($input =~ /new(command|symbol)/)
1189 10 0 if ($text1->nodeName eq 'mtext')
1193 4 6 if ($result2[0]->childNodes > 1 and $input eq 'newsymbol')
1200 8 2 if ($text2->nodeName eq 'mtext')
1201 5 3 $what eq 'symbol' ? :
1209 4 4 if defined $latex
1214 2 8 unless ($haveTextArgs)
1222 6 8 if ($input =~ /root|stackrel/)
1226 8 6 if ($input eq 'frac')
1231 16 40 if ($ttype eq 'INFIX')
1236 14 26 if ($ttype eq 'SPACE')
1249 12 14 if ($ttype eq 'LEFTRIGHT')
1254 12 0 $result[0]->lastChild ? :
1259 12 0 if ($st eq '|')
1266 2 12 if ($ttype eq 'NOP')
1282 242 342 if ($node->nodeName eq 'mrow')
1284 208 34 if $st =~ /^[\(\[\{]$/
1286 206 36 if $st =~ /^[\)\]\}]$/
1295 38 11402 substr($str, $n) =~ /^\\[^\\ ,!]/ ? :
1336 5466 4070 if (defined $tag) { }
1364 1194 8139 $$_{'frag'} ? :
1383 0 0 $$self{'attrlist'} ? :
1391 6 1 $$self{'children'} && @{$$self{'children'};} > $index ? :
1400 1538 0 $$self{'children'} ? :
1408 1812 0 $$self{'children'} && @{$$self{'children'};} ? :
1438 528 0 $$self{'children'} && @{$$self{'children'};} ? :
1453 1 3688 unless (%LatexSym)
1457 78 125 unless defined $$amsymbol{$sym}{'output'} and $$amsymbol{$sym}{'output'} =~ /&\#x.*;/
1460 7 118 if defined $LatexSym{$output} and not $$amsymbol{$sym}{'latex'}
1461 54 64 if $tex eq ''
1504 1294 2395 if (defined $$self{'text'})
1508 258 0 defined $LatexSym{$1} ? :
2 258 defined $$parser{'Latex'}{$1} ? :
1516 2373 22 if (@{$$self{'children'};})
1523 623 1772 if ($tag eq 'mo')
1526 1 2 $self eq $parent->child(1) && $parent->firstChild->firstChild->{'text'} eq '(' ? :
3 620 if $child_str[0] eq 'mod'
1530 23 597 if $LatexOp{$child_str[0]}
1531 40 557 $child_str[0] =~ /^\w+$/ ? :
1535 279 1493 if ($tag eq 'mrow')
1538 1 278 if (@child_str > 1 and $child_str[1] eq '\\pmod')
1539 1 0 if $child_str[-1] eq ')'
1546 27 18 if ($is_tall and @child_str > 1 and $child_str[0] =~ /^([\(\[|]|\\\{)$/ || $child_str[-1] =~ /^([\)\]|]|\\\})$/)
1549 27 0 if ($child_str[0] =~ /^([\(\[|]|\\\{)$/) { }
1555 26 1 if ($child_str[-1] =~ /^([\)\]|]|\\\})$/) { }
1570 963 530 if ($tag =~ /^m([in]|ath|row|td)$/)
1579 108 422 if ($tag =~ /^(msu[bp](sup)?|munderover)$/)
1581 1 107 if $base eq ''
1583 56 80 length $_ > 1 ? :
1584 44 28 $tag eq 'msup' ? :
36 72 $tag eq 'msub' ? :
1590 11 411 if ($tag eq 'mover')
1593 8 2 $LatexMover{$child_str[1]} ? :
1 10 $child_str[1] eq '\\overline' && length $child_str[0] == 1 ? :
1601 5 406 if ($tag eq 'munder')
1602 1 4 $child_str[1] eq '\\underline' ? :
1607 52 354 if ($tag eq 'mfrac')
1612 10 344 if ($tag eq 'msqrt')
1617 1 343 if ($tag eq 'mroot')
1622 11 332 if ($tag eq 'mtext')
1626 6 5 if (defined $$next{'tag'} and $$next{'tag'} eq 'mspace')
1629 5 6 if (defined $$prev{'tag'} and $$prev{'tag'} eq 'mspace')
1632 2 9 if $text eq ' '
1638 19 313 if ($tag eq 'mspace')
1643 9 304 if ($tag eq 'mtable')
1645 4 5 ($$self{'attr'}{'columnalign'} || '') eq 'left' ? :
1653 19 285 if ($tag eq 'mtr')
1658 285 0 if ($tag eq 'mstyle')
1660 273 12 if ($self->parent->{'tag'} eq 'math') { }
1661 2 271 unless @child_str
1663 273 0 defined $$self{'attr'}{'displaystyle'} && $$self{'attr'}{'displaystyle'} eq 'true' ? :
1669 6 6 if $$self{'attr'}{'mathvariant'}
1673 6 0 $attr && $LatexFont{$attr} ? :
1687 51 13 if $self eq $$parent{'children'}[$i]
1720 5 1 if $self eq $$parent{'children'}[$i]
1731 626 0 if $$self{'children'}
1741 30 12 $_ eq $old ? :
1751 892 0 if (@_)
1752 892 0 unless $$self{'attr'}
1753 892 0 unless $$self{'attrlist'}
1757 1988 0 unless defined $$self{'attr'}{$aname}
1767 1297 2400 if defined $$self{'text'}
1772 0 1131 $_ eq 'xmlns' ? :
2400 0 if $tag
1774 2378 22 if (@{$$self{'children'};})
1779 2378 0 $tag ? :
1781 22 0 $tag ? :