<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<!--
This file was generated by Devel::Cover Version 1.18
Devel::Cover is copyright 2001-2012, Paul Johnson (paul@pjcj.net)
Devel::Cover is free. It is licensed under the same terms as Perl itself.
The latest version of Devel::Cover should be available from my homepage:
http://www.pjcj.net
-->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8"></meta>
<meta http-equiv="Content-Language" content="en-us"></meta>
<link rel="stylesheet" type="text/css" href="cover.css"></link>
<link rel="stylesheet" type="text/css" href="cover.css"></link>
<title>Branch Coverage: blib/lib/Test/Mocha/PartialDump.pm</title>
</head>
<body>
<h1>Branch Coverage</h1>
<table>
<tr><td class="h" align="right">File:</td><td align="left">blib/lib/Test/Mocha/PartialDump.pm</td></tr>
<tr><td class="h" align="right">Coverage:</td><td align="left" class="c3">100.0%</td></tr>
</table>
<div><br/></div>
<table>
<tr><th>line</th><th>%</th><th colspan="2">coverage</th><th>branch</th></tr>
<tr><td class="h"><a id="L29">29</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">unless exists $args{'max_length'}</td></tr>
<tr><td class="h"><a id="L30">30</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">unless exists $args{'max_elements'}</td></tr>
<tr><td class="h"><a id="L31">31</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">unless exists $args{'max_depth'}</td></tr>
<tr><td class="h"><a id="L32">32</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">unless exists $args{'stringify'}</td></tr>
<tr><td class="h"><a id="L33">33</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">unless exists $args{'pairs'}</td></tr>
<tr><td class="h"><a id="L34">34</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">unless exists $args{'objects'}</td></tr>
<tr><td class="h"><a id="L35">35</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">unless exists $args{'list_delim'}</td></tr>
<tr><td class="h"><a id="L36">36</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">unless exists $args{'pair_delim'}</td></tr>
<tr><td class="h"><a id="L46">46</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">$self->should_dump_as_pairs(@args) ? :</td></tr>
<tr><td class="h"><a id="L51">51</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (defined $$self{'max_length'} and length $dump > $$self{'max_length'})</td></tr>
<tr><td class="h"><a id="L55">55</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if $max_length < 0</td></tr>
<tr><td class="h"><a id="L66">66</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">unless $$self{'pairs'}</td></tr>
<tr><td class="h"><a id="L68">68</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if @what % 2 != 0</td></tr>
<tr><td class="h"><a id="L71">71</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ref $what[$i]</td></tr>
<tr><td class="h"><a id="L82">82</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (defined $$self{'max_elements'} and @what / 2 > $$self{'max_elements'})</td></tr>
<tr><td class="h"><a id="L89">89</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">$truncated ? :</td></tr>
<tr><td class="h"><a id="L98">98</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">unless @what</td></tr>
<tr><td class="h"><a id="L117">117</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if (defined $$self{'max_elements'} and @what > $$self{'max_elements'})</td></tr>
<tr><td class="h"><a id="L124">124</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">$truncated ? :</td></tr>
<tr><td class="h"><a id="L132">132</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">blessed $value ? :</td></tr>
<tr><td class="h"></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">looks_like_number $value ? :</td></tr>
<tr><td class="h"></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">ref $value ? :</td></tr>
<tr><td class="h"></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">defined $value ? :</td></tr>
<tr><td class="h"><a id="L159">159</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($depth > $$self{'max_depth'}) { }</td></tr>
<tr><td class="h"><a id="L164">164</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if $reftype eq 'REF' or $reftype eq 'LVALUE'</td></tr>
<tr><td class="h"><a id="L169">169</a></td><td class="c3">50</td><td class="c3">T</td><td class="c0">F</td><td class="s">if ($self->can($method)) { }</td></tr>
<tr><td class="h"><a id="L183">183</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if $class</td></tr>
<tr><td class="h"><a id="L193">193</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if $class</td></tr>
<tr><td class="h"><a id="L207">207</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if $class</td></tr>
<tr><td class="h"><a id="L216">216</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">if ($$self{'objects'}) { }</td></tr>
<tr><td class="h"><a id="L220">220</a></td><td class="c3">100</td><td class="c3">T</td><td class="c3">F</td><td class="s">$$self{'stringify'} ? :</td></tr>
</table>
</body>
</html>