Branch Coverage

blib/lib/Rose/Object/MakeMethods/Generic.pm

Criterion	Covered	Total	%
branch	173	242	71.4

line	true	false	branch
44	2	6	if ($interface eq 'get_set_init') { }
	6	0	elsif ($interface eq 'get_set') { }
50	2	4	if @_ > 1
52	2	2	defined $_[0]{$key} ? :
58	5	1	if ($Have_CXSA and not $ENV{'ROSE_OBJECT_NO_CLASS_XSACCESOR'}) { }
66	0	4	if $Debug
68	0	4	$$options{'override_existing'} ? :
79	1	2	if @_ > 1
98	2	6	if ($interface eq 'get_set_init') { }
	6	0	elsif ($interface eq 'get_set') { }
104	0	2	$_[1] ? :
	2	4	if @_ > 1
106	2	0	$_[0]->$init_method ? :
	2	2	defined $_[0]{$key} ? :
112	4	2	if (exists $$args{'default'}) { }
114	2	2	if ($$args{'default'}) { }
118	0	0	$_[1] ? :
	0	2	if @_ > 1
119	0	2	defined $_[0]{$key} ? :
126	0	0	$_[1] ? :
	0	2	if @_ > 1
127	0	2	defined $_[0]{$key} ? :
135	2	4	$_[1] ? :
	6	6	if @_ > 1
154	2	28	if ($interface eq 'get_set_init') { }
	2	26	elsif ($interface eq 'get_set_inited') { }
	2	24	elsif ($interface eq 'get_set_all') { }
	2	22	elsif ($interface eq 'get_set_init_all') { }
	6	16	elsif ($interface eq 'clear') { }
	6	10	elsif ($interface eq 'reset') { }
	2	8	elsif ($interface eq 'delete') { }
	2	6	elsif ($interface eq 'exists') { }
	2	4	elsif ($interface =~ /^(?:keys|names)$/) { }
	2	2	elsif ($interface eq 'values') { }
	2	0	elsif ($interface eq 'get_set') { }
163	10	6	unless (@_)
165	4	6	unless defined $$self{$key}
166	6	4	wantarray ? :
170	2	4	if (@_ == 1 and ref $_[0] eq 'HASH') { }
177	2	2	if (@_ == 1)
180	2	0	unless defined $$self{$key}
182	0	2	ref $_[0] eq 'ARRAY' ? :
187	0	2	if @_ % 2
196	0	4	wantarray ? :
206	8	4	unless (@_)
208	2	6	unless defined $$self{$key}
209	4	4	wantarray ? :
213	2	2	if (@_ == 1 and ref $_[0] eq 'HASH') { }
220	0	2	if (@_ == 1)
222	0	0	ref $_[0] eq 'ARRAY' ? :
227	0	2	if @_ % 2
236	0	4	wantarray ? :
246	2	4	wantarray ? :
	6	4	unless @_
249	2	2	if (@_ == 1 and ref $_[0] eq 'HASH') { }
256	0	2	if @_ % 2
267	0	4	wantarray ? :
279	12	4	unless (@_)
281	2	10	unless defined $$self{$key}
282	6	6	wantarray ? :
286	0	0	wantarray ? :
	0	4	unless @_
289	2	2	if (@_ == 1 and ref $_[0] eq 'HASH') { }
296	0	2	if @_ % 2
307	0	4	wantarray ? :
328	0	2	unless @_ > 1
332	0	2	$interface eq 'manip' ? :
337	0	2	unless @_ == 2
338	2	0	defined $_[0]{$key} ? :
340	0	2	$interface eq 'manip' ? :
346	4	0	defined $_[0]{$key} ? :
	0	0	defined $_[0]{$key} ? :
	4	0	wantarray ? :
354	4	0	defined $_[0]{$key} ? :
	0	0	defined $_[0]{$key} ? :
	4	0	wantarray ? :
364	0	4	unless (@_)
366	0	0	defined $$self{$key} ? :
	0	0	wantarray ? :
370	0	4	if (@_ == 1 and ref $_[0] eq 'HASH') { }
377	2	2	if (@_ == 1)
379	0	2	ref $_[0] eq 'ARRAY' ? :
384	0	2	if @_ % 2
393	0	2	wantarray ? :
410	2	16	if ($interface eq 'get_set_init') { }
	2	14	elsif ($interface eq 'get_set_inited') { }
	2	12	elsif ($interface eq 'get_set_item') { }
	2	10	elsif ($interface eq 'unshift') { }
	2	8	elsif ($interface eq 'shift') { }
	2	6	elsif ($interface eq 'clear') { }
	0	6	elsif ($interface eq 'reset') { }
	2	4	elsif ($interface =~ /^(?:push|add)$/) { }
	2	2	elsif ($interface eq 'pop') { }
	2	0	elsif ($interface eq 'get_set') { }
419	8	4	unless (@_)
421	2	6	unless defined $$self{$key}
422	6	2	wantarray ? :
426	2	2	if (@_ == 1 and ref $_[0] eq 'ARRAY') { }
435	0	4	wantarray ? :
445	10	4	unless (@_)
447	2	8	unless defined $$self{$key}
448	6	4	wantarray ? :
452	2	2	if (@_ == 1 and ref $_[0] eq 'ARRAY') { }
461	0	4	wantarray ? :
470	0	6	unless @_
472	2	4	if (@_ == 2) { }
487	0	6	unless @_
488	2	4	@_ == 1 && ref $_[0] eq 'ARRAY' ? :
496	2	2	if @_
516	0	2	if (my $init_method = $$args{'init_method'}) { }
522	0	0	unless @_
524	0	0	unless defined $$self{$key}
525	0	0	@_ == 1 && ref $_[0] && ref $_[0] eq 'ARRAY' ? :
534	0	6	unless @_
536	2	4	@_ == 1 && ref $_[0] && ref $_[0] eq 'ARRAY' ? :
545	4	2	if @_
556	26	6	unless (@_)
558	20	0	defined $$self{$key} ? :
	20	6	wantarray ? :
562	4	2	if (@_ == 1 and ref $_[0] eq 'ARRAY') { }
571	0	6	wantarray ? :