Branch Coverage

blib/lib/Data/Object/Code.pm

Criterion	Covered	Total	%
branch	2	4	50.0

line	true	false	branch
20	24	0	unless (blessed $data and $data->isa($class))
21	0	24	unless 'CODE' eq ref $data