Condition Coverage

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


and 3 conditions

line !l l&&!r l&&r condition
461 0 0 0 $ref eq 'ARRAY' and ref $arg->[0] eq 'CODE'
0 0 0 $ref eq 'REF' and ref $$arg eq 'SCALAR'
510 0 0 0 $#$arg >= 1 and ref $arg->[1] eq 'Tcl::Ev'
523 0 0 0 ref $args[$argcnt + 1] eq 'ARRAY' and ref $args[$argcnt + 1][0] eq 'CODE'
543 0 0 0 $#codes > -1 and $args[0] eq 'after'

or 2 conditions

line l !l condition
850 0 0 $args{'subs'} || {}
853 0 0 $args{'vars'} || {}

or 3 conditions

line l !l&&r !l&&!r condition
461 0 0 0 $ref eq 'CODE' or $ref eq 'Tcl::Code'
668 0 0 0 @_ == 2 or @_ == 3
678 0 0 0 @_ == 2 or @_ == 3
689 0 0 0 @{$obj;} == 2 or @{$obj;} == 3
702 0 0 0 @{$obj;} == 2 or @{$obj;} == 3
714 0 0 0 @{$obj;} == 2 or @{$obj;} == 3
721 0 0 0 @{$obj;} == 2 or @{$obj;} == 3