Branch Coverage

blib/lib/Attean/TreeRewriter.pm
Criterion Covered Total %
branch 29 34 85.2


line true false branch
74 0 41 unless (defined $descend)
77 9 32 if ($handled) { }
32 0 elsif ($descend) { }
110 41 72 if (&blessed($tree) and $tree->does($type))
114 17 41 unless ($ok)
120 9 32 if ($rewritten)
121 0 9 if (&refaddr($rewritten) == &refaddr($tree))
124 0 9 if ($descend) { }
132 32 0 if ($descend)
136 28 4 if ($tree->does("Attean::API::DirectedAcyclicGraph"))
141 11 6 $childchanged ? :
142 11 6 if ($childchanged)
149 24 8 if ($tree->can("tree_attributes"))
152 6 22 if (ref $p eq 'ARRAY') { }
157 5 2 if ($childchanged)
167 6 16 if ($childchanged)
173 16 16 if ($changed)