Branch Coverage

blib/lib/Interchange6/Currency.pm
Criterion Covered Total %
branch 23 24 100.0


line true false branch
67 0 78 unless $self->$Interchange6::Currency::_isa('Interchange6::Currency')
69 19 59 if ($arg->$Interchange6::Currency::_isa('Interchange6::Currency'))
70 7 12 if $self->currency_code ne $arg->currency_code
166 2 9 if ($self->currency_code eq $new_code) { }
169 1 1 if (defined wantarray) { }
191 1 7 unless defined $new_value
193 5 2 if (defined wantarray) { }
271 2 6 $swap ? :
307 1 4 if ($swap) { }
326 1 5 if ($swap) { }
344 3 34 if ($swap) { }
365 3 26 if ($swap) { }