Condition Coverage

blib/lib/Tcl.pm
Criterion Covered Total %
condition 0 40 0.0


and 3 conditions

line !l l&&!r l&&r condition
455 0 0 0 $ref eq 'ARRAY' and ref $$arg[0] eq 'CODE'
0 0 0 $ref eq 'ARRAY' and ref($$arg[0]) =~ /^Tcl::Tk::Widget\b/
0 0 0 ref $arg eq 'REF' and ref $$arg eq 'SCALAR'
513 0 0 0 $#$arg >= 1 and ref $$arg[1] eq 'Tcl::Ev'
529 0 0 0 $#$arg >= 1 and ref $$arg[1] eq 'Tcl::Ev'
543 0 0 0 ref $args[$argcnt + 1] eq 'ARRAY' and ref $args[$argcnt + 1][0] eq 'CODE'

or 2 conditions

line l !l condition
856 0 0 $args{'subs'} || {}
859 0 0 $args{'vars'} || {}

or 3 conditions

line l !l&&r !l&&!r condition
674 0 0 0 @_ == 2 or @_ == 3
684 0 0 0 @_ == 2 or @_ == 3
695 0 0 0 @{$obj;} == 2 or @{$obj;} == 3
708 0 0 0 @{$obj;} == 2 or @{$obj;} == 3
720 0 0 0 @{$obj;} == 2 or @{$obj;} == 3
727 0 0 0 @{$obj;} == 2 or @{$obj;} == 3