| line |
!l |
l&&!r |
l&&r |
condition |
|
47
|
0 |
5 |
2 |
ref $_ eq "ARRAY" and defined $_->[3] |
|
|
5 |
1 |
1 |
ref $_ eq "ARRAY" and defined $_->[3] and ref $_->[3] ne "HASH" |
|
57
|
0 |
7 |
0 |
ref $_ eq "ARRAY" and $_->[0] =~ /\|/ |
|
100
|
25 |
15 |
5 |
defined $self->{'options'} and not ref $optionlist[0] |
|
151
|
0 |
0 |
80 |
ref $_ eq "ARRAY" and $_->[0] ne "" |
|
183
|
0 |
0 |
0 |
defined $opt->[0] and $opt->[0] eq "" |
|
|
0 |
0 |
0 |
defined $opt->[0] and $opt->[0] eq "" and defined $opt->[2] |
|
238
|
6 |
0 |
1 |
ref $self->varref($opt) eq "ARRAY" and ref $$Tk::Getopt::loadoptions{$opt->[0]} eq "ARRAY" |
|
|
5 |
0 |
1 |
ref $self->varref($opt) eq "HASH" and ref $$Tk::Getopt::loadoptions{$opt->[0]} eq "HASH" |
|
328
|
0 |
0 |
0 |
@args and $args[0] =~ /^-(\w+)$/ |
|
339
|
0 |
0 |
0 |
@args and $args[0] =~ /^-(\w+)$/ |
|
359
|
45 |
2 |
1 |
length $option == 1 && (!defined($type) || $type eq '' || $type eq '!') |
|
410
|
2 |
0 |
0 |
defined $former and !exists $former->{$opt} || ${$self->varref($optdef);} eq $former->{$opt} |
|
417
|
17 |
0 |
0 |
$optdef->[3]{'strict'} and UNIVERSAL::isa($optdef->[3]{'choices'}, "ARRAY") |
|
449
|
0 |
0 |
0 |
$self->{'useerrordialog'} and defined &Tk::MainWindow::Existing |
|
456
|
0 |
0 |
0 |
$use_tk and not defined $is_safe |
|
547
|
0 |
0 |
0 |
$opt->[3]{'strict'} and grep {ref $_ eq "ARRAY";} @{$$opt[3]{"choices"};} |
|
589
|
0 |
0 |
0 |
ref $choice eq "ARRAY" and $choice->[1] eq $value |
|
624
|
0 |
0 |
0 |
$args{'-restrict'} ne '=i' || &$restrict_int($_[0]) and $args{'-restrict'} ne '=f' || &$restrict_float($_[0]) |
|
797
|
0 |
0 |
0 |
defined $file and $file ne "" |
|
889
|
0 |
0 |
0 |
ref $msglist and exists $msglist->{$current_top} |
|
|
0 |
0 |
0 |
ref $msglist and exists $msglist->{$current_top} and $msglist->{$current_top} ne "" |
|
922
|
0 |
0 |
0 |
$label =~ /^(.*)-(.*)$/ and $1 eq $current_top |
|
928
|
0 |
0 |
0 |
defined $opt->[1] and $opt->[1] eq "!" |
|
|
0 |
0 |
0 |
defined $opt->[1] and $opt->[1] =~ /i/ |
|
|
0 |
0 |
0 |
defined $opt->[1] and $opt->[1] =~ /f/ |
|
|
0 |
0 |
0 |
defined $opt->[1] and $opt->[1] =~ /s/ |
|
941
|
0 |
0 |
0 |
defined $opt->[3] && exists $opt->[3]{'subtype'} |
|
961
|
0 |
0 |
0 |
exists $opt->[3]{'help'} and defined $balloon |
|
1146
|
0 |
0 |
0 |
$opt->[0] eq "" and not _is_separator($opt) |
|
1147
|
0 |
0 |
0 |
not $delay_page_create and $page_create_page |
|
1177
|
0 |
0 |
0 |
not $delay_page_create and $page_create_page |
|
1195
|
0 |
0 |
0 |
$rows and int $rows |
|
1310
|
0 |
0 |
0 |
not $nosave and !$buttons || $allowed_button{'save'} |
|
1341
|
0 |
0 |
0 |
not $dont_use_notebook and defined $self->{'raised'} |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
410
|
0 |
0 |
0 |
!exists $former->{$opt} || ${$self->varref($optdef);} eq $former->{$opt} |
|
608
|
0 |
0 |
0 |
$args{'-restrict'} or defined $opt->[3]{'maxsize'} |
|
624
|
0 |
0 |
0 |
not defined $opt->[3]{'maxsize'} or &$restrict_len($_[0]) |
|
|
0 |
0 |
0 |
$args{'-restrict'} ne '=i' || &$restrict_int($_[0]) |
|
|
0 |
0 |
0 |
$args{'-restrict'} ne '=f' || &$restrict_float($_[0]) |
|
928
|
0 |
0 |
0 |
defined $opt->[1] and $opt->[1] eq "!" or $opt->[1] eq "" |
|
942
|
0 |
0 |
0 |
$subtype eq "file" or $subtype eq "savefile" |
|
|
0 |
0 |
0 |
$subtype eq "file" or $subtype eq "savefile" or $subtype eq "dir" |
|
1220
|
0 |
0 |
0 |
not $buttons or $allowed_button{'ok'} |
|
1261
|
0 |
0 |
0 |
not $buttons or $allowed_button{'apply'} |
|
1272
|
0 |
0 |
0 |
not $buttons or $allowed_button{'cancel'} |
|
1287
|
0 |
0 |
0 |
not $buttons or $allowed_button{'undo'} |
|
1298
|
0 |
0 |
0 |
not $buttons or $allowed_button{'lastsaved'} |
|
1310
|
0 |
0 |
0 |
!$buttons || $allowed_button{'save'} |
|
1327
|
0 |
0 |
0 |
not $buttons or $allowed_button{'defaults'} |