Branch Coverage

blib/lib/Data/Monad/Base/Sugar.pm

Criterion	Covered	Total	%
branch	14	16	87.5

line	true	false	branch
19	30	151	if &blessed($ref) and $ref->can('capture')
21	60	91	ref $ref eq 'ARRAY' ? :
27	0	30	unless &blessed($result) and $result->isa(ref $self)
40	5	27	unless defined $block
53	0	5	unless @blocks
72	1	4	unless (@blocks)
105	11	74	if ($info->{'yield'}) { }
	38	36	elsif (@blocks) { }