| line |
!l |
l&&!r |
l&&r |
condition |
|
48
|
0 |
5 |
2 |
ref $_ eq 'ARRAY' and defined $$_[3] |
|
|
5 |
1 |
1 |
ref $_ eq 'ARRAY' and defined $$_[3] and ref $$_[3] ne 'HASH' |
|
58
|
0 |
7 |
0 |
ref $_ eq 'ARRAY' and $$_[0] =~ /\|/ |
|
101
|
25 |
15 |
5 |
defined $$self{'options'} and not ref $optionlist[0] |
|
152
|
0 |
0 |
80 |
ref $_ eq 'ARRAY' and $$_[0] ne '' |
|
184
|
0 |
0 |
0 |
defined $$opt[0] and $$opt[0] eq '' |
|
|
0 |
0 |
0 |
defined $$opt[0] and $$opt[0] eq '' and defined $$opt[2] |
|
230
|
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' |
|
320
|
0 |
0 |
0 |
@args and $args[0] =~ /^-(\w+)$/ |
|
331
|
0 |
0 |
0 |
@args and $args[0] =~ /^-(\w+)$/ |
|
351
|
45 |
3 |
0 |
length $option == 1 && (!defined($type) || $type eq '' || $type eq '!') |
|
402
|
2 |
0 |
0 |
defined $former and !exists($$former{$opt}) || ${$self->varref($optdef);} eq $$former{$opt} |
|
409
|
17 |
0 |
0 |
$$optdef[3]{'strict'} and UNIVERSAL::isa($$optdef[3]{'choices'}, 'ARRAY') |
|
441
|
0 |
0 |
0 |
$$self{'useerrordialog'} and defined &Tk::MainWindow::Existing |
|
448
|
0 |
0 |
0 |
$use_tk and not defined $is_safe |
|
539
|
0 |
0 |
0 |
$$opt[3]{'strict'} and grep {ref $_ eq 'ARRAY';} @{$$opt[3]{'choices'};} |
|
581
|
0 |
0 |
0 |
ref $choice eq 'ARRAY' and $$choice[1] eq $value |
|
612
|
0 |
0 |
0 |
$args{-'restrict'} ne '=i' || &$restrict_int($_[0]) and $args{-'restrict'} ne '=f' || &$restrict_float($_[0]) |
|
789
|
0 |
0 |
0 |
defined $file and $file ne '' |
|
881
|
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 '' |
|
914
|
0 |
0 |
0 |
$label =~ /^(.*)-(.*)$/ and $1 eq $current_top |
|
920
|
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/ |
|
931
|
0 |
0 |
0 |
defined $$opt[3] && exists $$opt[3]{'subtype'} |
|
953
|
0 |
0 |
0 |
exists $$opt[3]{'help'} and defined $balloon |
|
1138
|
0 |
0 |
0 |
$$opt[0] eq '' and not _is_separator($opt) |
|
1139
|
0 |
0 |
0 |
not $delay_page_create and $page_create_page |
|
1169
|
0 |
0 |
0 |
not $delay_page_create and $page_create_page |
|
1187
|
0 |
0 |
0 |
$rows and int $rows |
|
1302
|
0 |
0 |
0 |
not $nosave and !$buttons || $allowed_button{'save'} |
|
1333
|
0 |
0 |
0 |
not $dont_use_notebook and defined $$self{'raised'} |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
402
|
0 |
0 |
0 |
!exists($$former{$opt}) || ${$self->varref($optdef);} eq $$former{$opt} |
|
600
|
0 |
0 |
0 |
$args{-'restrict'} or defined $$opt[3]{'maxsize'} |
|
612
|
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]) |
|
920
|
0 |
0 |
0 |
defined $$opt[1] and $$opt[1] eq '!' or $$opt[1] eq '' |
|
934
|
0 |
0 |
0 |
$subtype eq 'file' or $subtype eq 'savefile' |
|
|
0 |
0 |
0 |
$subtype eq 'file' or $subtype eq 'savefile' or $subtype eq 'dir' |
|
1212
|
0 |
0 |
0 |
not $buttons or $allowed_button{'ok'} |
|
1253
|
0 |
0 |
0 |
not $buttons or $allowed_button{'apply'} |
|
1264
|
0 |
0 |
0 |
not $buttons or $allowed_button{'cancel'} |
|
1279
|
0 |
0 |
0 |
not $buttons or $allowed_button{'undo'} |
|
1290
|
0 |
0 |
0 |
not $buttons or $allowed_button{'lastsaved'} |
|
1302
|
0 |
0 |
0 |
!$buttons || $allowed_button{'save'} |
|
1319
|
0 |
0 |
0 |
not $buttons or $allowed_button{'defaults'} |