Branch Coverage

lib/Class/STL/Utilities.pm

Criterion	Covered	Total	%
branch	137	194	70.6

line	true	false	branch
52	14	101	if $func eq 'equal_to'
53	8	93	if $func eq 'not_equal_to'
54	14	79	if $func eq 'greater'
55	4	75	if $func eq 'greater_equal'
56	8	67	if $func eq 'less'
57	4	63	if $func eq 'less_equal'
58	14	49	if $func eq 'compare'
59	3	46	if $func eq 'matches'
60	1	45	if $func eq 'matches_ic'
61	1	44	if $func eq 'logical_and'
62	1	43	if $func eq 'logical_or'
63	3	40	if $func eq 'multiplies'
64	1	39	if $func eq 'divides'
65	1	38	if $func eq 'plus'
66	1	37	if $func eq 'minus'
67	1	36	if $func eq 'modulus'
68	9	27	if $func eq 'bind1st'
69	15	12	if $func eq 'bind2nd'
70	0	12	if $func eq 'mem_fun'
71	4	8	if $func eq 'ptr_fun'
72	2	6	if $func eq 'ptr_fun_binary'
73	0	6	if $func eq 'not1'
74	4	2	if $func eq 'not2'
75	2	0	if $func eq 'negate'
76	0	0	if $func eq 'not_null'
205	2	2	unless (exists $__dynfun{$self->function_name})
207	10	0	if (ref $arg and $arg->isa('Class::STL::Element'))
	10	0	if (ref $arg and $arg->isa('Class::STL::Element'))
226	0	2	if $@
250	1	1	unless (exists $__dynfun{$self->function_name})
252	10	0	if (ref $arg1 and $arg1->isa('Class::STL::Element') and ref $arg2 and $arg2->isa('Class::STL::Element')) { }
	0	0	elsif (ref $arg2 and $arg2->isa('Class::STL::Element')) { }
	0	0	elsif (ref $arg1 and $arg1->isa('Class::STL::Element')) { }
282	0	1	if $@
382	8	1	$arg2->data_type eq 'string' ? :
	0	1	$arg1->data_type eq 'string' ? :
	1	1	ref $arg1 && $arg1->isa('Class::STL::Element') ? :
	9	2	ref $arg2 && $arg2->isa('Class::STL::Element') ? :
	83	11	ref $arg1 && $arg1->isa('Class::STL::Element') && ref $arg2 && $arg2->isa('Class::STL::Element') ? :
401	0	2	$arg2->data_type eq 'string' ? :
	0	2	$arg1->data_type eq 'string' ? :
	2	2	ref $arg1 && $arg1->isa('Class::STL::Element') ? :
	2	4	ref $arg2 && $arg2->isa('Class::STL::Element') ? :
	2	6	ref $arg1 && $arg1->isa('Class::STL::Element') && ref $arg2 && $arg2->isa('Class::STL::Element') ? :
431	5	1	$arg2->data_type eq 'string' ? :
	15	1	$arg1->data_type eq 'string' ? :
	16	3	ref $arg1 && $arg1->isa('Class::STL::Element') ? :
	6	19	ref $arg2 && $arg2->isa('Class::STL::Element') ? :
	21	25	ref $arg1 && $arg1->isa('Class::STL::Element') && ref $arg2 && $arg2->isa('Class::STL::Element') ? :
450	0	1	$arg2->data_type eq 'string' ? :
	0	1	$arg1->data_type eq 'string' ? :
	1	1	ref $arg1 && $arg1->isa('Class::STL::Element') ? :
	1	2	ref $arg2 && $arg2->isa('Class::STL::Element') ? :
	1	3	ref $arg1 && $arg1->isa('Class::STL::Element') && ref $arg2 && $arg2->isa('Class::STL::Element') ? :
469	0	1	$arg2->data_type eq 'string' ? :
	0	1	$arg1->data_type eq 'string' ? :
	1	3	ref $arg1 && $arg1->isa('Class::STL::Element') ? :
	1	4	ref $arg2 && $arg2->isa('Class::STL::Element') ? :
	15	5	ref $arg1 && $arg1->isa('Class::STL::Element') && ref $arg2 && $arg2->isa('Class::STL::Element') ? :
488	0	1	$arg2->data_type eq 'string' ? :
	0	1	$arg1->data_type eq 'string' ? :
	1	1	ref $arg1 && $arg1->isa('Class::STL::Element') ? :
	1	2	ref $arg2 && $arg2->isa('Class::STL::Element') ? :
	1	3	ref $arg1 && $arg1->isa('Class::STL::Element') && ref $arg2 && $arg2->isa('Class::STL::Element') ? :
507	0	3	$arg2->data_type eq 'string' ? :
	0	3	$arg1->data_type eq 'string' ? :
	3	3	ref $arg1 && $arg1->isa('Class::STL::Element') ? :
	3	6	ref $arg2 && $arg2->isa('Class::STL::Element') ? :
	115	9	ref $arg1 && $arg1->isa('Class::STL::Element') && ref $arg2 && $arg2->isa('Class::STL::Element') ? :
526	0	0	ref $arg1 && $arg1->isa('Class::STL::Element') ? :
	0	0	ref $arg2 && $arg2->isa('Class::STL::Element') ? :
	5	0	ref $arg1 && $arg1->isa('Class::STL::Element') && ref $arg2 && $arg2->isa('Class::STL::Element') ? :
545	0	0	ref $arg1 && $arg1->isa('Class::STL::Element') ? :
	0	0	ref $arg2 && $arg2->isa('Class::STL::Element') ? :
	5	0	ref $arg1 && $arg1->isa('Class::STL::Element') && ref $arg2 && $arg2->isa('Class::STL::Element') ? :
564	20	0	ref $arg1 && $arg1->isa('Class::STL::Element') ? :
	0	20	ref $arg2 && $arg2->isa('Class::STL::Element') ? :
	0	20	ref $arg1 && $arg1->isa('Class::STL::Element') && ref $arg2 && $arg2->isa('Class::STL::Element') ? :
583	0	0	ref $arg1 && $arg1->isa('Class::STL::Element') ? :
	0	0	ref $arg2 && $arg2->isa('Class::STL::Element') ? :
	5	0	ref $arg1 && $arg1->isa('Class::STL::Element') && ref $arg2 && $arg2->isa('Class::STL::Element') ? :
602	10	13	if (ref $arg1 and $arg1->isa('Class::STL::Element') and ref $arg2 and $arg2->isa('Class::STL::Element')) { }
	8	5	elsif (ref $arg2 and $arg2->isa('Class::STL::Element')) { }
	5	0	elsif (ref $arg1 and $arg1->isa('Class::STL::Element')) { }
630	0	5	if (ref $arg1 and $arg1->isa('Class::STL::Element') and ref $arg2 and $arg2->isa('Class::STL::Element')) { }
	0	5	elsif (ref $arg2 and $arg2->isa('Class::STL::Element')) { }
	5	0	elsif (ref $arg1 and $arg1->isa('Class::STL::Element')) { }
658	0	5	if (ref $arg1 and $arg1->isa('Class::STL::Element') and ref $arg2 and $arg2->isa('Class::STL::Element')) { }
	0	5	elsif (ref $arg2 and $arg2->isa('Class::STL::Element')) { }
	5	0	elsif (ref $arg1 and $arg1->isa('Class::STL::Element')) { }
686	0	5	if (ref $arg1 and $arg1->isa('Class::STL::Element') and ref $arg2 and $arg2->isa('Class::STL::Element')) { }
	0	5	elsif (ref $arg2 and $arg2->isa('Class::STL::Element')) { }
	5	0	elsif (ref $arg1 and $arg1->isa('Class::STL::Element')) { }
714	0	5	if (ref $arg1 and $arg1->isa('Class::STL::Element') and ref $arg2 and $arg2->isa('Class::STL::Element')) { }
	0	5	elsif (ref $arg2 and $arg2->isa('Class::STL::Element')) { }
	5	0	elsif (ref $arg1 and $arg1->isa('Class::STL::Element')) { }
741	10	0	if (ref $arg and $arg->isa('Class::STL::Element')) { }