Condition Coverage

lib/Context/Singleton.pm
Criterion Covered Total %
condition 6 7 85.7


or 2 conditions

line l !l condition
22 9 71 $frame_class //= 'Context::Singleton::Frame'
68 5 4 $globals->{'into'} //= scalar &CORE::GLOBAL::caller()

or 3 conditions

line l !l&&r !l&&!r condition
26 77 3 0 $cache{$frame_class} //= do { my $current_frame = $frame_class->new; my $restore_context_wizard = Variable::Magic::wizard('free', sub { $current_frame = $current_frame->parent; 1; } ); my $frame = sub (&) { &Variable::Magic::cast(\my $guard, $restore_context_wizard); $current_frame = $current_frame->new; $_[0]->(); } ; +{'contrive', sub { $current_frame->contrive(@_); } , 'current_frame', sub { $current_frame; } , 'deduce', sub { $current_frame->deduce(@_); } , 'frame', $frame, 'is_deduced', sub { $current_frame->is_deduced(@_); } , 'load_rules', sub { $current_frame->load_rules(@_); } , 'proclaim', sub { $current_frame->proclaim(@_); } , 'trigger', sub { $current_frame->trigger(@_); } , 'try_deduce', sub { $current_frame->try_deduce(@_); } } }