line |
true |
false |
branch |
67
|
0 |
0 |
if $AUTOLOAD =~ /\bDESTROY$/
|
898
|
2 |
558 |
if ($rOpts->{'entab-leading-whitespace'}) { }
|
|
0 |
558 |
elsif ($rOpts->{'tabs'}) { }
|
1074
|
0 |
560 |
if (_increment_count() > 1)
|
1092
|
0 |
0 |
if (defined $Klimit and $Klimit != $num - 1 or not defined $Klimit and $num > 0)
|
1102
|
0 |
0 |
unless defined $Klimit
|
1103
|
0 |
0 |
unless $msg
|
1125
|
0 |
0 |
if ($exact_match)
|
1126
|
0 |
0 |
if ($error)
|
1152
|
0 |
0 |
if ($nvars != 9)
|
1155
|
0 |
0 |
unless defined $type
|
1167
|
0 |
0 |
unless (defined $rLL->[$KK][$var])
|
1243
|
0 |
0 |
if ($logger_object)
|
1252
|
0 |
0 |
if ($logger_object)
|
1260
|
0 |
0 |
if ($logger_object)
|
1268
|
3020 |
10 |
if ($logger_object)
|
1275
|
558 |
2 |
if ($logger_object)
|
1282
|
558 |
2 |
if ($logger_object)
|
1302
|
0 |
0 |
if ($diagnostics_object)
|
1349
|
4993 |
2285 |
unless $str
|
1395
|
4 |
555 |
if ($rOpts->{'closing-side-comments'}) { }
|
|
0 |
555 |
elsif ($rOpts->{'closing-side-comment-warnings'}) { }
|
1396
|
4 |
0 |
unless ($rOpts->{'closing-side-comment-warnings'} or $rOpts->{'indent-only'})
|
1408
|
0 |
0 |
if ($rOpts->{'delete-closing-side-comments'})
|
1419
|
557 |
2 |
if (not $comment) { }
|
1427
|
0 |
2 |
if (substr($comment, 0, 1) ne "#")
|
1445
|
0 |
559 |
if ($rOpts->{'dump-cuddled-block-list'})
|
1451
|
3 |
556 |
if ($rOpts->{'extended-line-up-parentheses'})
|
1455
|
30 |
529 |
if ($rOpts->{'line-up-parentheses'})
|
1457
|
0 |
30 |
if ($rOpts->{'indent-only'} or not $rOpts->{'add-newlines'} or not $rOpts->{'delete-old-newlines'})
|
1474
|
0 |
30 |
if ($rOpts->{'whitespace-cycle'})
|
1485
|
0 |
30 |
if ($rOpts->{'line-up-parentheses'} and $rOpts->{'tabs'})
|
1493
|
0 |
2 |
if ($rOpts->{'outdent-keywords'} and $rOpts->{'tabs'})
|
1500
|
0 |
556 |
if ($rOpts->{'outdent-labels'} and $rOpts->{'tabs'})
|
1507
|
13 |
546 |
unless ($rOpts->{'space-for-semicolon'})
|
1511
|
2 |
557 |
if ($rOpts->{'space-terminal-semicolon'})
|
1518
|
0 |
559 |
if ($_ and $_ > 100)
|
1528
|
0 |
559 |
if (not $_ or $_ <= 0)
|
1534
|
558 |
1 |
unless (@okw)
|
1540
|
2791 |
0 |
if (Perl::Tidy::Tokenizer::is_keyword($_)) { }
|
1551
|
2 |
557 |
if (defined $kpit_value and $kpit_value != 1)
|
1554
|
1 |
1 |
unless (@kpit)
|
1565
|
5 |
554 |
if (my(@q) = split_words($rOpts->{'want-left-space'}))
|
1569
|
5 |
554 |
if (my(@q) = split_words($rOpts->{'want-right-space'}))
|
1573
|
6 |
553 |
if (my(@q) = split_words($rOpts->{'nowant-left-space'}))
|
1577
|
7 |
552 |
if (my(@q) = split_words($rOpts->{'nowant-right-space'}))
|
1580
|
0 |
559 |
if ($rOpts->{'dump-want-left-space'})
|
1585
|
0 |
559 |
if ($rOpts->{'dump-want-right-space'})
|
1603
|
0 |
0 |
if ($rOpts->{'variable-maximum-line-length'} and $rOpts->{'ignore-old-breakpoints'} and $rOpts->{'line-up-parentheses'})
|
1609
|
0 |
0 |
if ($break_before_container_types{$key} == 2)
|
1614
|
0 |
0 |
if (@changed)
|
1625
|
0 |
1 |
if ($rOpts->{'variable-maximum-line-length'} and $rOpts->{'line-up-parentheses'} and $rOpts->{'continuation-indentation'} < 2)
|
1638
|
0 |
0 |
if ($rOpts->{'variable-maximum-line-length'} and $rOpts->{'line-up-parentheses'} and $rOpts->{'add-trailing-commas'} and $rOpts->{'delete-trailing-commas'} and $rOpts->{'want-trailing-commas'})
|
1661
|
5 |
0 |
if (defined $opt and $opt > 0 and $break_before_container_types{$tok})
|
1667
|
3 |
2 |
if ($opt == 2)
|
1668
|
1 |
2 |
if ($rOpts->{'line-up-parentheses'} or $rOpts->{'indent-columns'} <= $rOpts->{'continuation-indentation'})
|
1685
|
4 |
555 |
unless ($rOpts->{'maximum-line-length'})
|
1690
|
0 |
559 |
unless ($rOpts->{'long-block-line-count'})
|
1704
|
2 |
557 |
if ($rOpts->{'ignore-old-breakpoints'})
|
1707
|
0 |
2 |
if ($rOpts->{'break-at-old-method-breakpoints'})
|
1711
|
0 |
2 |
if ($rOpts->{'break-at-old-comma-breakpoints'})
|
1715
|
0 |
2 |
if ($rOpts->{'break-at-old-semicolon-breakpoints'})
|
1719
|
0 |
2 |
if ($rOpts->{'keep-old-breakpoints-before'})
|
1723
|
0 |
2 |
if ($rOpts->{'keep-old-breakpoints-after'})
|
1728
|
0 |
2 |
if (@conflicts)
|
1760
|
0 |
1 |
if (defined $want_break_before{$key} and not $want_break_before{$key} and $is_soft_keep_break_type{$key})
|
1769
|
0 |
0 |
if (defined $want_break_before{$key} and $want_break_before{$key} and $is_soft_keep_break_type{$key})
|
1795
|
0 |
559 |
if ($lpxl and $lpil)
|
1800
|
3 |
556 |
if ($lpxl) { }
|
|
1 |
555 |
elsif ($lpil) { }
|
1833
|
2 |
557 |
if (defined $olbxl)
|
1835
|
2 |
0 |
if (@list)
|
1845
|
558 |
1 |
unless ($is_olb_exclusion_word{'*'})
|
1847
|
2231 |
1 |
unless ($is_olb_exclusion_word{$_})
|
1856
|
559 |
0 |
if (@grep_aliases)
|
1860
|
558 |
1 |
if ($want_one_line_block{'grep'})
|
1920
|
555 |
4 |
unless $str
|
1923
|
0 |
4 |
unless $str
|
1974
|
0 |
9 |
unless (defined $key)
|
1978
|
8 |
1 |
unless (defined $weld_nested_exclusion_rules{$key})
|
1984
|
1 |
8 |
if ($tok eq "q")
|
1992
|
5 |
3 |
if ($item)
|
1993
|
5 |
0 |
if ($item =~ /^([\^\.])?([kKfFwW])?$/) { }
|
1994
|
5 |
0 |
if $1
|
1995
|
3 |
2 |
if $2
|
2004
|
6 |
2 |
if ($pos eq "^" or $pos eq "*")
|
2005
|
0 |
6 |
if (defined $rflags->[0] and $rflags->[0] ne $select)
|
2010
|
5 |
3 |
if ($pos eq "." or $pos eq "*")
|
2011
|
0 |
5 |
if (defined $rflags->[1] and $rflags->[1] ne $select)
|
2016
|
0 |
8 |
if ($err)
|
2018
|
0 |
4 |
if ($msg1)
|
2024
|
0 |
4 |
if ($msg2)
|
2041
|
1 |
558 |
if ($rOpts->{'weld-fat-comma'})
|
2057
|
0 |
4 |
unless $str
|
2060
|
0 |
4 |
unless $str
|
2078
|
10 |
0 |
if ($item =~ /^([^\(\]\{]*)?([\(\{\[])(\d)?$/) { }
|
2079
|
3 |
7 |
if $1
|
2080
|
10 |
0 |
if $2
|
2081
|
3 |
7 |
if $3
|
2088
|
0 |
10 |
unless (defined $key)
|
2094
|
7 |
3 |
unless (defined $flag1)
|
2096
|
0 |
10 |
unless ($flag1 =~ /^[kKfFwW\*]$/)
|
2106
|
7 |
3 |
unless (defined $flag2)
|
2108
|
0 |
10 |
unless ($flag2 =~ /^[012]$/)
|
2113
|
10 |
0 |
unless (defined $line_up_parentheses_control_hash{$key})
|
2121
|
0 |
0 |
if (defined $rflags->[0] and $rflags->[0] ne $flag1)
|
2125
|
0 |
0 |
if (defined $rflags->[1] and $rflags->[1] ne $flag2)
|
2129
|
0 |
0 |
if $err
|
2132
|
0 |
4 |
if ($msg1)
|
2138
|
0 |
4 |
if ($msg2)
|
2147
|
3 |
1 |
if ($line_up_parentheses_control_is_lxpl)
|
2151
|
5 |
0 |
if (defined $rflags)
|
2153
|
2 |
3 |
if ($flag1 and $flag1 ne "*")
|
2154
|
0 |
3 |
if ($flag2)
|
2157
|
1 |
2 |
if ($all_off)
|
2174
|
1 |
558 |
if (my(@q) = split_words($rOpts->{'nospace-after-keyword'}))
|
2177
|
0 |
1 |
if (@q == 1 and $q[0] eq "*")
|
2182
|
1 |
558 |
if (my(@q) = split_words($rOpts->{'space-after-keyword'}))
|
2210
|
2 |
557 |
if ($rOpts->{$long_name})
|
2221
|
2 |
2 |
if (defined $hash{$word}) { }
|
|
0 |
2 |
elsif ($word eq 'k') { }
|
|
1 |
1 |
elsif ($word eq 't') { }
|
|
1 |
0 |
elsif ($word eq 'kt') { }
|
2241
|
0 |
2 |
if (@unknown)
|
2263
|
2 |
122 |
if ($tok eq "?")
|
2264
|
0 |
124 |
if ($tok eq ",")
|
2267
|
22 |
102 |
if (defined $lbs and defined $rbs and $lbs < $rbs)
|
2278
|
0 |
370 |
if ($tok eq ",")
|
2281
|
361 |
9 |
if (defined $lbs and defined $rbs and $rbs < $lbs)
|
2289
|
2 |
557 |
if $rOpts->{'break-after-all-operators'}
|
2291
|
1 |
558 |
if $rOpts->{'break-before-all-operators'}
|
2306
|
2 |
557 |
unless ($want_break_before{':'})
|
2316
|
5 |
554 |
if $_ and $_ > 0
|
2319
|
0 |
559 |
if $_ and $_ > 0
|
2322
|
5 |
554 |
if $_ and $_ > 0
|
2331
|
1116 |
2 |
unless $str
|
2346
|
1 |
1 |
if ($short_name eq 'kbb') { }
|
|
1 |
0 |
elsif ($short_name eq 'kba') { }
|
2361
|
0 |
3 |
if ($item =~ /^( [ \w\* ] )( [ \{\(\[\}\)\] ] )$/x)
|
2369
|
0 |
3 |
unless (Perl::Tidy::Tokenizer::is_valid_token_type($type))
|
2374
|
0 |
2 |
if (@unknown_types)
|
2388
|
0 |
0 |
if (length $flag != 1) { }
|
|
0 |
0 |
elsif ($key eq '(' || $key eq ')' and not $flag =~ /^[kKfFwW\*]$/) { }
|
|
0 |
0 |
elsif ($key eq '}' || $key eq '}' and not $flag =~ /^[bB\*]$/) { }
|
2603
|
2 |
557 |
if ($rOpts_whitespace_cycle)
|
2604
|
2 |
0 |
if ($rOpts_whitespace_cycle > 0) { }
|
2619
|
1 |
558 |
if ($rOpts_variable_maximum_line_length)
|
2643
|
546 |
10045 |
if ($excess_inside_space <= 0)
|
2666
|
546 |
8419 |
if $remaining_cycles <= 3
|
2710
|
6 |
553 |
if ($option)
|
2716
|
7 |
552 |
if (defined $option and length $option)
|
2724
|
7 |
0 |
if (length $option == 1) { }
|
2734
|
0 |
0 |
if (length $part >= 2 and length $part <= 3) { }
|
2737
|
0 |
0 |
if ($is_opening_token{$key_o}) { }
|
2739
|
0 |
0 |
if (length $part == 3)
|
2756
|
7 |
0 |
unless ($error_message)
|
2760
|
0 |
21 |
if ($val and not $is_valid_flag{$val})
|
2766
|
0 |
21 |
if ($paren_flag)
|
2767
|
0 |
0 |
unless ($paren_flag =~ /^[kKfFwW]$/)
|
2772
|
0 |
0 |
if ($key ne ")")
|
2781
|
0 |
7 |
if ($error_message) { }
|
2795
|
4 |
555 |
if ($rOpts_add_trailing_commas and $rOpts_delete_trailing_commas)
|
2805
|
0 |
4 |
if ($rOpts_whitespace_cycle and $rOpts_whitespace_cycle <= 4)
|
3000
|
4 |
553 |
if $jmax < 0
|
3032
|
15311 |
35981 |
if ($type eq "b")
|
3047
|
4381 |
31600 |
if ($last_type_is_opening)
|
3061
|
223 |
4158 |
if ($token eq $matching_token{$last_token}) { }
|
3062
|
49 |
174 |
if ($block_type) { }
|
3077
|
953 |
3205 |
if ($last_block_type and $last_token eq '{') { }
|
3095
|
5 |
4153 |
if ($type eq "w" and $token =~ /^\^/)
|
3099
|
913 |
3245 |
if ($tightness <= 0) { }
|
|
198 |
3047 |
elsif ($tightness > 1) { }
|
3113
|
1191 |
1856 |
if (defined $j_closing and $j_closing - $j < 5 and $rLL->[$j_closing][8] eq $last_seqno) { }
|
3121
|
999 |
192 |
if ($ws == -1)
|
3132
|
23 |
4358 |
if (%opening_container_inside_ws and $last_seqno)
|
3134
|
6 |
17 |
if ($ws_override)
|
3149
|
8346 |
27635 |
if ($is_special_ws_type{$type}) { }
|
|
4381 |
23254 |
elsif ($is_closing_type{$type}) { }
|
|
4381 |
18873 |
elsif ($is_opening_type{$type}) { }
|
3151
|
2803 |
5543 |
if ($type eq 'k') { }
|
|
1091 |
4452 |
elsif ($type eq '#') { }
|
|
2489 |
1963 |
elsif ($type eq 'Q') { }
|
|
1574 |
389 |
elsif ($type eq 'w' or $type eq 'C') { }
|
|
389 |
0 |
elsif ($type eq 'm' or $type eq '-') { }
|
3160
|
1 |
0 |
if ($is_for_foreach{$token} and %keyword_paren_inner_tightness and defined $keyword_paren_inner_tightness{$token} and $j < $jmax)
|
3171
|
0 |
3 |
if $jp > $jmax
|
3172
|
0 |
3 |
if $rLL->[$jp][4] != $level
|
3173
|
2 |
1 |
unless $rLL->[$jp][5] eq "("
|
3199
|
11 |
2478 |
if ($last_type eq "\\" and $token =~ /^[\"\']/)
|
3200
|
2 |
0 |
$rOpts_space_backslash_quote == 2 ? :
|
|
7 |
2 |
$rOpts_space_backslash_quote == 1 ? :
|
|
2 |
9 |
!$rOpts_space_backslash_quote ? :
|
3210
|
6 |
1568 |
if $last_type eq "-"
|
3217
|
4 |
385 |
if $last_type eq "w"
|
3237
|
999 |
3382 |
if ($j == $j_tight_closing_paren) { }
|
3244
|
3159 |
223 |
unless (defined $ws)
|
3250
|
951 |
2208 |
if ($block_type and $token eq '}') { }
|
3255
|
198 |
2961 |
$tightness > 1 ? :
|
3260
|
23 |
4358 |
if (%closing_container_inside_ws and $seqno)
|
3262
|
6 |
17 |
if ($ws_override)
|
3277
|
2121 |
2260 |
if ($token eq '(') { }
|
|
2 |
2258 |
elsif ($token eq '{' and $type ne 'L' and $last_token eq ']') { }
|
3290
|
8 |
2113 |
if ($last_type eq '}' and $last_token ne ')') { }
|
|
634 |
1479 |
elsif ($last_type eq 'k') { }
|
|
848 |
631 |
elsif ($is_wCUG{$last_type} or $is_wi{$last_type} and $last_token =~ /^([\&]|->)/ || $rtokh_last_last->[7] eq '->' || $rtokh_last_last->[7] eq 't' && $rtokh_last_last->[5] =~ /^\&\s*$/) { }
|
|
37 |
594 |
elsif ($last_type eq 'i' and $last_token =~ /^[\$\%\@]/) { }
|
|
0 |
594 |
elsif ($last_type eq 'C' and $$rLL[$j + 1][5] eq ')') { }
|
3301
|
295 |
332 |
unless $rOpts_space_keyword_paren or $space_after_keyword{$last_token}
|
3349
|
32 |
816 |
$rOpts_space_function_paren ? :
|
3386
|
3707 |
674 |
if ($type eq "{")
|
3387
|
161 |
3546 |
if ($last_token eq "sub" and $last_type eq "k")
|
3392
|
261 |
3446 |
if ($last_token eq ")" and $token eq "{")
|
3396
|
0 |
3707 |
if ($last_type eq "i" and $last_token =~ /^\@/)
|
3403
|
60 |
4321 |
if ($rOpts_extended_block_tightness and $token eq "{")
|
3405
|
32 |
22 |
if (not $rblock_type_of_seqno->{$seqno} and $extended_block_tightness_list{$last_token})
|
3421
|
48 |
34842 |
if ($last_type eq 'Z' && $last_token ne '_' || $last_type eq 'h' and $type ne "#")
|
3430
|
0 |
48 |
if ($last_type eq 'Z' and $last_token eq '$' and $token eq '{') { }
|
3441
|
24761 |
10129 |
unless (defined $ws)
|
3447
|
1101 |
23660 |
if (defined $binary_ws_rules{$last_type}{$type}) { }
|
3478
|
6266 |
17394 |
if (not defined $wl) { }
|
|
5706 |
11688 |
elsif (not defined $wr) { }
|
3479
|
5952 |
314 |
defined $wr ? :
|
3485
|
11138 |
550 |
$wl == $wr || $wl == -1 || !$wr ? :
|
3497
|
258 |
34632 |
if (not $ws and $rtokh->[2] != $rtokh_last->[2])
|
3519
|
0 |
0 |
unless (defined $ws_1)
|
3520
|
0 |
0 |
unless (defined $ws_2)
|
3521
|
0 |
0 |
unless (defined $ws_3)
|
3522
|
0 |
0 |
unless (defined $ws_4)
|
3534
|
1 |
552 |
if ($rOpts->{'tight-secret-operators'})
|
3545
|
1471 |
12 |
unless %keyword_paren_inner_tightness
|
3551
|
12 |
0 |
if ($word and $sequence_number)
|
3553
|
6 |
6 |
if (defined $tightness and $tightness != 1)
|
3554
|
6 |
0 |
$tightness == 0 ? :
|
3578
|
0 |
1191 |
if ($j + 1 > $j_closing)
|
3584
|
5 |
0 |
if $token eq "-" and $last_token eq "{" and $$rLL[$j + 1][7] eq "w"
|
3592
|
0 |
0 |
if ($type eq 'm' || $type eq 'p' and $j < $j_closing + 1 and $$rLL[$j + 1][7] eq "b" and $$rLL[$j + 2][7] eq "n" and $$rLL[$j + 2][5] =~ /^\d/)
|
3603
|
0 |
1191 |
if ($j_here + 1 > $j_closing)
|
3604
|
92 |
1099 |
$$rLL[$j_here + 1][7] eq 'b' ? :
|
3612
|
999 |
192 |
if ($j_next == $j_closing and $token ne "<<>>")
|
3663
|
0 |
6 |
if ($type_ll eq "k" and $is_indirect_object_taker{$tok_ll})
|
3809
|
4951 |
1304 |
if $essential_whitespace_filter_l1{$typel} and not $essential_whitespace_filter_r1{$typer}
|
3814
|
295 |
1009 |
if $essential_whitespace_filter_r2{$typer} and not $essential_whitespace_filter_l2{$typel}
|
3829
|
6 |
1003 |
if ($typer eq "#")
|
3831
|
2 |
4 |
if $tokenl and $typel eq '?' || substr($tokenl, -1) eq '$'
|
4060
|
3 |
6 |
if $type eq "b"
|
4061
|
4 |
2 |
unless $is_leading_secret_token{$token}
|
4068
|
1 |
3 |
if $jend <= $jmax and $rlong_array->[$jend][7] eq "b"
|
4072
|
1 |
3 |
if ($jend > $jmax or $tok ne $rlong_array->[$jend][5])
|
4080
|
1 |
1 |
if ($jend)
|
4627
|
18538 |
12693 |
if ($type ne "b")
|
4634
|
11582 |
19649 |
if ($type eq "b" and $last_type ne "b")
|
4647
|
12693 |
6956 |
$next_type eq 'b' ? :
|
4667
|
1226 |
18423 |
if ($type eq "k")
|
4668
|
157 |
1069 |
if (defined $right_bond_strength{$token})
|
4675
|
1111 |
18538 |
if ($i_next_nonblank > $max_index_to_go)
|
4682
|
556 |
555 |
if (not defined $bsr or $bsr > "0.55")
|
4684
|
72 |
484 |
if ($ris_list_by_seqno->{$seqno_px})
|
4688
|
17 |
55 |
if ($seqno_n and $seqno_n eq $seqno_px)
|
4696
|
729 |
18920 |
if ($next_nonblank_type eq "k")
|
4697
|
157 |
572 |
if (defined $left_bond_strength{$next_nonblank_token})
|
4709
|
5680 |
13969 |
unless (defined $bsr)
|
4710
|
4291 |
15358 |
unless (defined $bsl)
|
4711
|
12330 |
7319 |
$bsr < $bsl ? :
|
4735
|
89 |
19560 |
if ($type eq "||" or $type eq "k" and $token eq "or")
|
4738
|
4 |
85 |
if ($is_die_confess_croak_warn{$next_nonblank_token})
|
4739
|
4 |
0 |
if ($want_break_before{$token} and $i > 0) { }
|
4744
|
1 |
3 |
if ($types_to_go[$i - 1] eq "b" and $i > 2)
|
4755
|
194 |
1789 |
if ($type eq "}" and $block_type and $next_nonblank_type ne ";")
|
4761
|
1226 |
18423 |
if ($type eq "k")
|
4764
|
5 |
41 |
if ($next_nonblank_type eq "k" and $is_last_next_redo_return{$token})
|
4777
|
233 |
993 |
if ($token eq "my")
|
4783
|
728 |
18921 |
if ($next_nonblank_type eq 'k' and $type ne 'CORE::') { }
|
|
890 |
18031 |
elsif ($next_nonblank_type eq '=>') { }
|
4785
|
65 |
663 |
if ($is_keyword_returning_list{$next_nonblank_token})
|
4786
|
0 |
65 |
if $bond_str > $list_str
|
4791
|
19 |
709 |
if ($is_good_keyword_breakpoint{$next_nonblank_token})
|
4798
|
185 |
705 |
if ($bond_str < "2.1")
|
4809
|
0 |
214 |
if ($token eq "(" and $next_nonblank_type eq "i" and $last_nonblank_type eq "k" and $is_sort_map_grep{$last_nonblank_token})
|
4821
|
2 |
19647 |
if ($last_nonblank_type eq "F" and $next_nonblank_token eq "(")
|
4838
|
2365 |
17284 |
if ($type eq '{') { }
|
|
2 |
17282 |
elsif ($type eq 'Z') { }
|
4840
|
0 |
9 |
if ($token eq "(" and $next_nonblank_type eq "w" and $last_nonblank_type eq "k" and $last_nonblank_token eq "open" and not $old_breakpoint_to_go[$i])
|
4856
|
1 |
1 |
if ($next_type ne "b" and defined $want_left_space{$next_type} and $want_left_space{$next_type} == -1 or not $old_breakpoint_to_go[$i] and substr($next_nonblank_token, 0, 1) eq "/")
|
4886
|
125 |
19524 |
if ($next_nonblank_type eq '?') { }
|
|
116 |
19408 |
elsif ($next_nonblank_type eq '.') { }
|
|
995 |
18413 |
elsif ($type eq 'w') { }
|
4887
|
1 |
124 |
if $types_to_go[$i_next_nonblank + 1] eq "Q"
|
4897
|
0 |
116 |
if $types_to_go[$i_next_nonblank + 1] eq "n"
|
4903
|
0 |
983 |
if not $old_breakpoint_to_go[$i] and substr($next_nonblank_token, 0, 1) eq "/" and $next_nonblank_type ne "//"
|
4927
|
4948 |
250 |
if ($seqno and $is_container_token{$token})
|
4931
|
4831 |
258 |
if ($next_nonblank_seqno and $is_container_token{$next_nonblank_token})
|
4952
|
1654 |
17995 |
if ($binary_bond_strength{$ltype}{$rtype})
|
4958
|
255 |
19394 |
if ($binary_bond_strength_nospace{$ltype}{$next_type})
|
4963
|
48 |
19601 |
if ($nobreak_rhs{$ltype} or $nobreak_lhs{$rtype})
|
4997
|
0 |
1226 |
$token eq 'err' ? :
|
|
1226 |
18423 |
$type eq 'k' ? :
|
4999
|
0 |
729 |
$next_nonblank_token eq 'err' ? :
|
|
729 |
18920 |
$next_nonblank_type eq 'k' ? :
|
5007
|
452 |
19197 |
if (defined $bias{$left_key})
|
5008
|
30 |
422 |
unless ($want_break_before{$left_key})
|
5015
|
451 |
19198 |
if (defined $bias{$right_key})
|
5016
|
421 |
30 |
if ($want_break_before{$right_key})
|
5020
|
115 |
306 |
if ($right_key eq '.') { }
|
5027
|
75 |
40 |
unless ($is_short_quote)
|
5048
|
18243 |
1406 |
if (defined $bond_str and not $nobreak_to_go[$i]) { }
|
5049
|
14641 |
3602 |
if ($total_nesting_depth > 0) { }
|
5063
|
92 |
1314 |
if $nobreak_to_go[$i] and $nobreak_to_go[$i] > 1
|
5073
|
383 |
19266 |
if ($total_weld_count and $seqno)
|
5075
|
68 |
315 |
if ($rK_weld_right->{$KK}) { }
|
|
27 |
288 |
elsif ($rK_weld_left->{$KK} and $is_opening_token{$token}) { }
|
5091
|
50 |
19599 |
if ($type eq "#")
|
5098
|
2743 |
16906 |
if ($strength >= 10000 and $next_nonblank_type ne "?")
|
5144
|
12 |
547 |
if ($rOpts->{'cuddled-else'})
|
5148
|
12 |
0 |
unless $rOpts->{'cuddled-block-list-exclusive'}
|
5155
|
2 |
10 |
if ($cuddled_block_list)
|
5197
|
0 |
66 |
unless $string
|
5201
|
0 |
66 |
if @words <= 0
|
5207
|
0 |
66 |
if (@words > 1)
|
5213
|
12 |
54 |
unless (defined $rcuddled_block_types->{$start})
|
5221
|
0 |
66 |
unless $word
|
5222
|
0 |
66 |
if ($no_cuddle{$word})
|
5272
|
0 |
0 |
unless $cuddled_string
|
5275
|
0 |
0 |
if $rOpts->{'cuddled-else'}
|
5278
|
0 |
0 |
unless ($rOpts->{'cuddled-else'})
|
5304
|
1 |
558 |
if ($rOpts->{'static-block-comment-prefix'})
|
5310
|
1 |
0 |
unless ($prefix =~ /^\^#/)
|
5311
|
0 |
1 |
unless ($prefix =~ /^#/)
|
5318
|
0 |
1 |
if (bad_pattern($pattern))
|
5331
|
1116 |
2 |
unless ($param)
|
5333
|
0 |
1118 |
unless ($param =~ /^#/)
|
5337
|
0 |
1118 |
if (bad_pattern($pattern))
|
5354
|
1 |
558 |
if ($rOpts->{'non-indenting-brace-prefix'})
|
5357
|
0 |
1 |
unless ($prefix =~ /^#/)
|
5361
|
0 |
1 |
if (bad_pattern($pattern))
|
5375
|
1 |
0 |
if (defined $rOpts->{'closing-side-comment-list'} and $rOpts->{'closing-side-comment-list'})
|
5406
|
3 |
556 |
if ($sub_alias_list) { }
|
5414
|
559 |
0 |
unless (defined $rOpts->{'use-feature'} and $rOpts->{'use-feature'} =~ /\bnoclass\b/)
|
5423
|
559 |
0 |
if (@words > 1)
|
5443
|
1 |
0 |
if (defined $rOpts->{'brace-left-list'} and $rOpts->{'brace-left-list'})
|
5448
|
1 |
558 |
if ($bl_list_string =~ /\bsub\b/)
|
5452
|
1 |
558 |
if ($bl_list_string =~ /\basub\b/)
|
5460
|
558 |
1 |
if ($bl_pattern =~ /\.\*/)
|
5467
|
1 |
0 |
if (defined $rOpts->{'brace-left-exclusion-list'} and $rOpts->{'brace-left-exclusion-list'})
|
5471
|
0 |
1 |
if ($bl_exclusion_list_string =~ /\bsub\b/)
|
5474
|
0 |
1 |
if ($bl_exclusion_list_string =~ /\basub\b/)
|
5490
|
3 |
0 |
if (defined $rOpts->{'brace-left-and-indent-list'} and $rOpts->{'brace-left-and-indent-list'})
|
5498
|
1 |
0 |
if (defined $rOpts->{'brace-left-and-indent-exclusion-list'} and $rOpts->{'brace-left-and-indent-exclusion-list'})
|
5515
|
0 |
0 |
if (defined $rOpts->{'keyword-group-blanks-list'} and $rOpts->{'keyword-group-blanks-list'})
|
5522
|
0 |
0 |
if ($word eq 'BC' or $word eq 'SBC') { }
|
5524
|
0 |
0 |
if ($word eq "SBC")
|
5543
|
0 |
0 |
if (defined $rOpts->{'block-brace-vertical-tightness-list'} and $rOpts->{'block-brace-vertical-tightness-list'})
|
5557
|
1 |
0 |
if (defined $rOpts->{$key} and $rOpts->{$key})
|
5564
|
1 |
0 |
if (defined $rOpts->{$key} and $rOpts->{$key})
|
5593
|
562 |
8356 |
if ($i eq "*")
|
5594
|
0 |
8356 |
if $seen{$i}
|
5596
|
558 |
7798 |
if ($i eq 'sub') { }
|
|
559 |
7239 |
elsif ($i eq 'asub') { }
|
|
0 |
7239 |
elsif ($i eq ';') { }
|
|
0 |
7239 |
elsif ($i eq '{') { }
|
|
556 |
6683 |
elsif ($i eq ':') { }
|
|
6683 |
0 |
elsif ($i =~ /^\w/) { }
|
5619
|
560 |
1117 |
unless (@words)
|
5623
|
558 |
1119 |
if ($seen{'sub'})
|
5626
|
559 |
1118 |
if ($seen{'asub'})
|
5629
|
1116 |
561 |
if ($sub_patterns)
|
5642
|
0 |
559 |
if ($rOpts->{'static-side-comment-prefix'})
|
5646
|
0 |
0 |
if (bad_pattern($pattern))
|
5661
|
557 |
2 |
if (not defined $csc_prefix) { }
|
5667
|
0 |
2 |
unless ($test_csc_prefix =~ /^#/)
|
5686
|
0 |
2 |
if (bad_pattern($test_csc_prefix_pattern)) { }
|
5744
|
0 |
0 |
if $jmax < 0
|
5749
|
0 |
0 |
unless defined $seqno
|
5753
|
0 |
0 |
if (not $seqno) { }
|
5758
|
0 |
0 |
if ($is_opening_sequence_token{$token} and $type ne "q" and $type ne "Q")
|
5774
|
0 |
0 |
unless (defined $initial_seqno)
|
5776
|
0 |
0 |
if ($is_opening_sequence_token{$token}) { }
|
|
0 |
0 |
elsif ($is_closing_sequence_token{$token}) { }
|
5779
|
0 |
0 |
if ($initial_seqno == 2 and $seqno != $last_seqno + 1)
|
5789
|
0 |
0 |
if ($saw_opening_seqno{$seqno})
|
5802
|
0 |
0 |
if ($saw_closing_seqno{$seqno})
|
5813
|
0 |
0 |
unless ($saw_opening_seqno{$seqno})
|
5838
|
0 |
970 |
unless $block_type
|
5845
|
173 |
797 |
if ($matches_ASUB{$block_type}) { }
|
|
117 |
680 |
elsif ($block_type =~ /$SUB_PATTERN/) { }
|
5897
|
173 |
7485 |
if ($line_type ne 'CODE') { }
|
5915
|
6679 |
806 |
if ($jmax >= 0) { }
|
5917
|
6123 |
556 |
defined $Klimit ? :
|
5959
|
5 |
7653 |
if ($tee_output)
|
5962
|
5 |
0 |
if $fh_tee
|
5982
|
0 |
6679 |
if ($jmax < 0)
|
6009
|
556 |
6123 |
unless (defined $nesting_depth)
|
6011
|
0 |
556 |
if $nesting_depth < 0
|
6031
|
9142 |
42272 |
if ($$rtype_sequence[++$j])
|
6034
|
4384 |
4758 |
if ($is_opening_token{$token}) { }
|
|
4384 |
374 |
elsif ($is_closing_token{$token}) { }
|
|
187 |
187 |
elsif ($token eq '?') { }
|
|
187 |
0 |
elsif ($token eq ':') { }
|
6042
|
970 |
3414 |
if $rblock_type->[$j]
|
6053
|
0 |
4384 |
unless (defined $opening_depth)
|
6055
|
0 |
0 |
if $opening_depth < 0
|
6092
|
4571 |
4571 |
if ($sign > 0) { }
|
6101
|
840 |
3731 |
if ($level > $self->[77])
|
6174
|
0 |
560 |
if (not $severe_error and $maximum_level >= $maximum_table_index)
|
6183
|
0 |
560 |
if ($rOpts->{'dump-block-summary'})
|
6184
|
0 |
0 |
if ($severe_error)
|
6190
|
0 |
560 |
if ($severe_error or $rOpts->{'notidy'})
|
6199
|
558 |
2 |
if ($logger_object)
|
6216
|
10 |
550 |
if $rOpts_delete_side_comments or $rOpts_delete_closing_side_comments
|
6230
|
0 |
560 |
if ($error)
|
6253
|
4 |
556 |
if $rOpts_line_up_parentheses and $rOpts_extended_line_up_parentheses
|
6305
|
0 |
0 |
$sseq > 0 ? :
|
6307
|
0 |
0 |
unless $rblock_type_of_seqno->{$seq_next}
|
6308
|
0 |
0 |
if ($sseq > 0) { }
|
6314
|
0 |
0 |
if ($item->{'maximum_depth'} < $stack_depth)
|
6327
|
0 |
0 |
if ($is_loop_type{$block_type} and defined $item)
|
6343
|
0 |
0 |
if ($seq_test != $seq_next)
|
6375
|
0 |
0 |
unless defined $Kp
|
6376
|
0 |
0 |
if ($rLL->[$Kp][5] eq ")")
|
6381
|
0 |
0 |
unless defined $K_opening
|
6386
|
0 |
0 |
if $lx < 0
|
6391
|
0 |
0 |
if $line_type ne "CODE"
|
6397
|
0 |
0 |
unless defined $Kfirst
|
6400
|
0 |
0 |
if ($rLL->[$Kfirst][7] eq "J")
|
6406
|
0 |
0 |
if $lx < $lx_open
|
6440
|
0 |
0 |
if ($type eq 'k') { }
|
6442
|
0 |
0 |
if ($is_mccabe_logic_keyword{$token})
|
6445
|
0 |
0 |
if ($is_mccabe_logic_operator{$type})
|
6477
|
0 |
0 |
if ($line_type eq 'CODE') { }
|
6481
|
0 |
0 |
if (defined $Kfirst)
|
6484
|
0 |
0 |
defined $Kfirst ? :
|
6485
|
0 |
0 |
if ($jmax > 0 or $rLL->[$Klast][7] ne "#")
|
6496
|
0 |
0 |
unless ($line_type =~ /^POD/)
|
6512
|
0 |
0 |
unless ($rdump_block_types->{'*'} or $rdump_block_types->{'package'} or $rdump_block_types->{'class'})
|
6530
|
0 |
0 |
if $type ne "P"
|
6533
|
0 |
0 |
if (substr($token, 0, 7) eq "package" and $token =~ /^package\s/ or substr($token, 0, 5) eq "class" and $token =~ /^class\s/)
|
6545
|
0 |
0 |
if ($keyword eq "class")
|
6549
|
0 |
0 |
if ($rLL->[$K_last][7] eq "#")
|
6552
|
0 |
0 |
if (defined $K_last)
|
6559
|
0 |
0 |
if (defined $block_type_next and $block_type_next =~ /^(class|package)\b/)
|
6568
|
0 |
0 |
if ($parent_seqno != 1)
|
6570
|
0 |
0 |
if (defined $Kc)
|
6576
|
0 |
0 |
if (defined(my $ix = $package_sweep[$level]))
|
6579
|
0 |
0 |
if ($Kc > $KK)
|
6642
|
0 |
0 |
if (not defined $Kfirst && defined $Klast or $Kfirst > $K_opening)
|
6656
|
0 |
0 |
if (defined $item)
|
6663
|
0 |
0 |
$item->{'is_inner_loop'} ? :
|
6667
|
0 |
0 |
if ($block_type eq '}' || $block_type eq ';' and $rdump_block_types->{'closure'}) { }
|
|
0 |
0 |
elsif ($ris_asub_block->{$seqno} and $dump_all_types || $rdump_block_types->{'sub'} || $rdump_block_types->{'asub'}) { }
|
|
0 |
0 |
elsif ($ris_sub_block->{$seqno} and $dump_all_types || $rdump_block_types->{'sub'}) { }
|
|
0 |
0 |
elsif ($block_type =~ /^(package|class)\b/ and $dump_all_types || $rdump_block_types->{'package'} || $rdump_block_types->{'class'}) { }
|
|
0 |
0 |
elsif ($is_loop_type{$block_type} and $dump_all_types || $rdump_block_types->{$block_type} || $$rdump_block_types{$block_type . $inner_loop_plus} || $rdump_block_types->{$inner_loop_plus}) { }
|
|
0 |
0 |
elsif ($dump_all_types or $rdump_block_types->{$block_type}) { }
|
6692
|
0 |
0 |
if ($token_type eq "b")
|
6693
|
0 |
0 |
if ($token_type eq "=>")
|
6694
|
0 |
0 |
if ($token_type eq "=")
|
6695
|
0 |
0 |
if ($token_type eq "i" and $saw_equals or $token_type eq 'w' || $token_type eq 'Q' and $saw_fat_comma)
|
6740
|
0 |
0 |
if ($is_loop_type{$block_type})
|
6778
|
0 |
0 |
unless (defined $rOpts_dump_block_types)
|
6791
|
0 |
0 |
unless @{$rselected_blocks;} or @{$rpackage_list;}
|
6802
|
0 |
0 |
unless (defined $rOpts_dump_block_minimum_lines)
|
6824
|
0 |
0 |
if (defined $code_lines_open and defined $code_lines_close)
|
6829
|
0 |
0 |
if ($code_lines < $rOpts_dump_block_minimum_lines)
|
6837
|
0 |
0 |
if (defined $mccabe_opening and defined $mccabe_closing)
|
6858
|
0 |
0 |
unless @{$routput_lines;}
|
6919
|
4 |
556 |
unless defined $Klimit
|
6966
|
0 |
104 |
unless defined $Kc
|
6968
|
0 |
104 |
unless defined $Kcn
|
6972
|
70 |
34 |
if $seqno_n
|
6974
|
0 |
34 |
unless defined $Knn
|
6976
|
9 |
25 |
unless $seqno_nn
|
6978
|
12 |
13 |
unless $K_nno and $K_nno == $Knn
|
6981
|
6 |
7 |
if ($block_type)
|
6992
|
0 |
187 |
unless defined $Km
|
6994
|
0 |
180 |
if ($rLL->[$Kt][7] eq "#")
|
7019
|
22274 |
36224 |
if ($type eq "b")
|
7030
|
1092 |
35132 |
if ($type eq "#")
|
7041
|
4 |
1088 |
if ($parent_container_type eq "Ternary")
|
7043
|
4 |
0 |
if ($Kn)
|
7045
|
4 |
0 |
if ($is_ternary{$type_kn})
|
7051
|
4 |
0 |
if ($Kn == $rparent->{'_Kc'})
|
7063
|
18 |
0 |
if ($ci_this and !$rparent->{'_ci_close'} || !$rparent->{'_ci_open_next'} && ($rparent->{'_comma_count'} || $last_type eq ',' || $is_closing_type{$last_type}))
|
7079
|
37 |
0 |
if ($rK_range)
|
7080
|
11 |
26 |
if (defined $Kfirst and $Kfirst == $KK)
|
7084
|
11 |
0 |
unless $Kn
|
7086
|
0 |
0 |
if ($Kn and $Kc and $Kn == $Kc || $rLL->[$Kn][7] eq ',' && $want_break_before_comma && $parent_container_type eq 'List')
|
7109
|
0 |
0 |
if ($level_Kc < $level_KK)
|
7138
|
9142 |
25990 |
if ($rtoken_K->[8]) { }
|
|
2679 |
23311 |
elsif ($type eq ';' or $type eq 'J' or $type eq 'f') { }
|
|
2809 |
20502 |
elsif ($type eq 'k') { }
|
|
3034 |
17468 |
elsif ($type eq ',') { }
|
|
54 |
17414 |
elsif ($type eq 'q' and $token eq '') { }
|
7145
|
4571 |
4571 |
if ($is_opening_sequence_token{$token}) { }
|
7157
|
187 |
4384 |
$type eq '?' ? :
|
7161
|
4571 |
0 |
if ($KK < $Klimit)
|
7163
|
3128 |
1443 |
if ($rLL->[$Kn][7] eq "b" and $Kn < $Klimit)
|
7170
|
4449 |
122 |
if ($Kc and $Kc < $Klimit)
|
7172
|
2333 |
2116 |
if ($rLL->[$Kcn][7] eq "b" and $Kcn < $Klimit)
|
7175
|
90 |
4359 |
if ($rLL->[$Kcn][7] eq "#")
|
7180
|
4571 |
0 |
$Kn ? :
|
7188
|
3854 |
717 |
if ($opening_level_jump > 0)
|
7194
|
1890 |
2681 |
if ($rtype_count)
|
7202
|
398 |
1492 |
if ($semicolon_count and $semicolon_count == 1)
|
7204
|
378 |
20 |
if ($rLL->[$Kcm][7] eq ";")
|
7216
|
969 |
3602 |
if ($block_type) { }
|
|
187 |
3415 |
elsif ($type eq '?') { }
|
7227
|
538 |
431 |
unless ($no_semicolon)
|
7234
|
347 |
191 |
if ($is_block_with_ci{$block_type})
|
7238
|
6 |
341 |
if ($parent_seqno != 1 and not $rparent->{'_comma_count'} and not $rparent->{'_semicolon_count'} and &$map_block_follows($seqno)) { }
|
7250
|
0 |
6 |
if ($ci_last)
|
7260
|
174 |
364 |
if (not $ci_close and $Kcn)
|
7263
|
1 |
33 |
if ($type_kcn =~ /^(\.|\&\&|\|\|)$/ or $type_kcn eq "k" and $is_and_or{$token_kcn})
|
7271
|
963 |
6 |
if ($rparent->{'_container_type'} ne "Ternary")
|
7283
|
52 |
135 |
if ($rparent->{'_container_type'} eq "List" and not $rparent->{'_ci_open_next'})
|
7292
|
187 |
0 |
unless ($opening_level_jump)
|
7309
|
1894 |
1521 |
if (not $is_logical and $token eq "(")
|
7313
|
433 |
1461 |
if ($last_type eq 'k') { }
|
|
576 |
885 |
elsif ($last_type eq 'i' and defined $Kcn) { }
|
|
61 |
824 |
elsif ($last_token eq '(') { }
|
7317
|
28 |
405 |
if ($last_token eq "for")
|
7327
|
34 |
542 |
if ($seqno_kcn and $type_kcn eq "{")
|
7342
|
0 |
588 |
unless defined $Km
|
7343
|
539 |
49 |
unless $rLL->[$Km][7] eq "k"
|
7345
|
12 |
37 |
if $tok eq "my"
|
7363
|
602 |
2813 |
if ($is_logical) { }
|
7367
|
6 |
596 |
if ($last_type eq "!")
|
7374
|
307 |
295 |
if ($type eq "[" and 1)
|
7379
|
7 |
300 |
if ($last_type eq "}")
|
7384
|
295 |
307 |
if ($opening_level_jump)
|
7398
|
1656 |
1157 |
if ($rparent->{'_container_type'} eq 'Block') { }
|
7401
|
1655 |
1 |
if (defined $Kcn)
|
7404
|
58 |
1597 |
if ($closing_level_jump < 0)
|
7413
|
566 |
591 |
unless ($rparent->{'_comma_count'})
|
7419
|
20 |
76 |
if ($ci_close_next != $ci_close and defined $Kcn and $bin_op_type{$rLL->[$Kcn][7]})
|
7427
|
55 |
1102 |
if ($rparent->{'_container_type'} eq "Ternary")
|
7433
|
0 |
2813 |
if ($token ne "(" and $last_type eq "}")
|
7444
|
728 |
858 |
if ($type eq "{" and $token ne "(" and $is_list_end_type{$last_type} and not $ris_asub_block->{$seqno})
|
7457
|
0 |
4571 |
if ($ci_close < $ci_this)
|
7480
|
0 |
4571 |
if ($seqno_test ne $seqno)
|
7494
|
4571 |
0 |
if (@{$rstack;}) { }
|
7507
|
205 |
3155 |
if ($ci_this > 0 and not $ci_open_old and not $rparent->{'_ci_close'})
|
7510
|
5 |
27 |
if ($Kc and $Kn and $Kc == $Kn)
|
7524
|
1252 |
1427 |
if ($is_closing_type{$last_type})
|
7532
|
1 |
2808 |
if (substr($token, 0, 6) eq "format")
|
7544
|
2815 |
219 |
if ($rparent->{'_container_type'} eq "List")
|
7616
|
2 |
554 |
if ($self->[76])
|
7619
|
3 |
7 |
if $line_type ne "CODE"
|
7621
|
1 |
6 |
unless defined $Kfirst
|
7703
|
173 |
7485 |
if ($line_type ne "CODE")
|
7711
|
6679 |
806 |
defined $Kfirst ? :
|
7714
|
1114 |
6371 |
if ($jmax >= 0 and $rLL->[$Klast][7] eq "#")
|
7715
|
786 |
328 |
if ($jmax == 0) { }
|
7720
|
57 |
7428 |
if ($In_format_skipping_section)
|
7723
|
13 |
44 |
if ($is_block_comment and substr($rLL->[$Kfirst][5], 0, 4) eq '#>>>' || $rOpts_format_skipping_end and ($rLL->[$Kfirst][5] . ' ') =~ /$format_skipping_pattern_end/) { }
|
|
0 |
44 |
elsif ($is_block_comment and substr($rLL->[$Kfirst][5], 0, 4) eq '#<<<' || $rOpts_format_skipping_begin and $rOpts_format_skipping and ($rLL->[$Kfirst][5] . ' ') =~ /$format_skipping_pattern_begin/) { }
|
7766
|
47 |
7381 |
if ($line_of_tokens->{'_starting_in_quote'})
|
7770
|
28 |
19 |
if ($jmax <= 0)
|
7771
|
0 |
28 |
if ($self->[76] and $input_line =~ /\t/)
|
7781
|
13 |
19 |
if ($is_block_comment and substr($rLL->[$Kfirst][5], 0, 4) eq '#<<<' || $rOpts_format_skipping_begin and $rOpts_format_skipping and ($rLL->[$Kfirst][5] . " ") =~ /$format_skipping_pattern_begin/)
|
7802
|
145 |
7242 |
if ($jmax > 0 and $rLL->[$Klast][7] eq "b")
|
7807
|
801 |
6586 |
if ($jmax < 0)
|
7813
|
760 |
5826 |
if ($is_block_comment)
|
7818
|
21 |
4 |
if (substr($rLL->[$Kfirst][5], 0, 2) eq '##' || $rOpts_static_block_comment_prefix and $rOpts_static_block_comments and $input_line =~ /$static_block_comment_pattern/)
|
7837
|
2 |
758 |
if ($no_leading_space and $input_line =~ /^\# \s*
|
7849
|
61 |
8 |
if ($last_line_had_side_comment and not $no_leading_space and not $is_static_block_comment)
|
7857
|
26 |
35 |
if ($last_CODE_type eq "HSC")
|
7864
|
33 |
0 |
if ($rOpts->{'hanging-side-comments'} and (defined $Klast_prev and $Klast_prev > 1) and not $rOpts->{'static-side-comments'} && $rLL->[$Klast_prev][5] =~ /$static_side_comment_pattern/)
|
7884
|
31 |
2 |
if $rLL->[$K_penult][7] eq "b"
|
7891
|
33 |
0 |
unless ($follows_csc)
|
7899
|
23 |
678 |
if ($is_static_block_comment) { }
|
|
0 |
678 |
elsif ($last_line_had_side_comment and not $rOpts_maximum_consecutive_blank_lines and $rLL->[$Kfirst][4] > 0) { }
|
7900
|
13 |
10 |
$no_leading_space ? :
|
7922
|
12 |
5814 |
if ($rOpts_indent_only)
|
7927
|
64 |
5750 |
unless ($rOpts_add_newlines)
|
7953
|
4 |
5746 |
if (not $Saw_VERSION_in_this_file and $jmax < 80 and $input_line =~ /^[^;]*;?[^;]*([\$*])(([\w\:\']*)\bVERSION)\b.*\=/)
|
7970
|
387 |
7271 |
if ($has_side_comment)
|
7995
|
1 |
559 |
unless $rOpts->{'non-indenting-braces'}
|
7997
|
4 |
555 |
unless defined $rLL and @{$rLL;}
|
8006
|
0 |
381 |
if ($line_type ne "CODE")
|
8014
|
0 |
381 |
if (not defined $Kfirst or $rLL->[$Klast][7] ne "#")
|
8020
|
59 |
322 |
if $Klast <= $Kfirst
|
8024
|
316 |
6 |
if ($type_m eq "b" and $K_m > $Kfirst)
|
8029
|
111 |
211 |
if ($seqno_m)
|
8036
|
6 |
86 |
if ($block_type_m and $is_opening_type{$type_m} and $token_sc =~ /$non_indenting_brace_pattern/)
|
8065
|
0 |
23 |
if ($line_type ne "CODE")
|
8079
|
0 |
23 |
if (not defined $Kfirst or $rLL->[$Klast][7] ne "#")
|
8098
|
0 |
23 |
if ($rseqno_non_indenting_brace_by_ix->{$ix})
|
8102
|
0 |
0 |
if ($rOpts_delete_closing_side_comments and not $delete_side_comment and $Klast > $Kfirst and !$CODE_type || $CODE_type eq 'HSC' || $CODE_type eq 'IO' || $CODE_type eq 'NIN')
|
8115
|
3 |
0 |
if ($type_m eq "b" and $K_m > $Kfirst)
|
8117
|
2 |
1 |
if ($seqno_m)
|
8119
|
2 |
0 |
if ($block_type_m and $token =~ /$closing_side_comment_prefix_pattern/ and $block_type_m =~ /$closing_side_comment_list_pattern/)
|
8128
|
22 |
1 |
if ($delete_side_comment)
|
8138
|
2 |
20 |
if ($CODE_type eq "IO")
|
8148
|
5 |
17 |
if ($CODE_type eq "HSC")
|
8358
|
3 |
557 |
if ($rOpts->{'indent-only'})
|
8368
|
0 |
122 |
$length_function ? :
|
8410
|
173 |
7466 |
unless $line_type eq "CODE"
|
8413
|
803 |
6663 |
if ($CODE_type eq "BL")
|
8415
|
79 |
724 |
if (defined $seqno)
|
8418
|
48 |
31 |
if not $ris_permanently_broken->{$seqno} and $rOpts_maximum_consecutive_blank_lines
|
8425
|
803 |
6663 |
unless defined $Kfirst
|
8439
|
6110 |
553 |
if (defined $last_K_out) { }
|
8440
|
0 |
6110 |
if ($Kfirst != $last_K_out + 1)
|
8452
|
0 |
553 |
if ($Kfirst != 0)
|
8459
|
849 |
68 |
if ($CODE_type and $CODE_type ne "NIN" and $CODE_type ne "VER")
|
8478
|
54 |
795 |
if ($CODE_type eq "HSC")
|
8482
|
54 |
0 |
if ($Kfirst == $Klast and $rvars_Kfirst->[7] eq '#') { }
|
8525
|
470 |
5344 |
if ($type_end eq '#' || $type_end eq 'b' and $Klast_old_code > $Kfirst_old)
|
8529
|
319 |
151 |
if ($rLL->[$Klast_old_code][7] eq "b" and $Klast_old_code > $Kfirst_old)
|
8541
|
5503 |
311 |
if ($last_line_type eq "CODE")
|
8544
|
127 |
5376 |
if (is_essential_whitespace($last_last_nonblank_code_token, $last_last_nonblank_code_type, $last_nonblank_code_token, $last_nonblank_code_type, $token_next, $type_next))
|
8574
|
553 |
4 |
if (@{$rLL_new;})
|
8604
|
15151 |
34838 |
if ($type eq "b")
|
8610
|
160 |
14991 |
if $KK >= $Klast
|
8613
|
0 |
14991 |
if ($rOpts_freeze_whitespace)
|
8619
|
752 |
14239 |
if ($ws == -1 or $rOpts_delete_old_whitespace)
|
8636
|
639 |
113 |
unless $do_not_delete
|
8648
|
9088 |
25750 |
if ($rtoken_vars->[8]) { }
|
|
7110 |
18640 |
elsif ($is_witPS{$type}) { }
|
|
2388 |
16252 |
elsif ($type eq ';') { }
|
|
1861 |
14391 |
elsif ($type eq 'n') { }
|
|
274 |
14117 |
elsif ($type eq 'q') { }
|
|
2957 |
11160 |
elsif ($type eq ',') { }
|
|
79 |
11081 |
elsif ($type eq 'J') { }
|
|
2463 |
8618 |
elsif ($type eq 'Q') { }
|
8651
|
4358 |
4730 |
if ($is_closing_token{$token})
|
8659
|
970 |
3388 |
if ($block_type) { }
|
8662
|
542 |
428 |
if ($last_nonblank_code_type ne ";")
|
8666
|
535 |
7 |
if $rOpts->{'add-semicolons'}
|
8677
|
1020 |
6 |
if ($rtype_count and $rtype_count->{','} and not $rtype_count->{';'} and not $rtype_count->{'f'})
|
8684
|
735 |
285 |
if ($last_nonblank_code_type ne ',') { }
|
8687
|
24 |
711 |
if ($rOpts_add_trailing_commas and %trailing_comma_rules)
|
8700
|
60 |
225 |
if ($rOpts_delete_trailing_commas and %trailing_comma_rules)
|
8709
|
1 |
0 |
if (not $deleted and $rOpts_delete_weld_interfering_commas and $is_closing_type{$last_last_nonblank_code_type})
|
8730
|
160 |
6950 |
if (index($token, " ") > 0 or index($token, "\t") > 0)
|
8736
|
6 |
154 |
if ($ord > 0 and $ord < 33 || $ord > 126)
|
8746
|
5 |
1 |
if ($is_sigil{$sigil})
|
8748
|
5 |
0 |
if defined $word
|
8762
|
0 |
160 |
if ($ord_ch > 0 and $ord_ch < 33 || $ord_ch > 126)
|
8774
|
130 |
30 |
if ($type eq 'S') { }
|
|
25 |
5 |
elsif ($type eq 'P') { }
|
8779
|
120 |
10 |
if (not defined $rOpts_space_prototype_paren or $rOpts_space_prototype_paren == 1) { }
|
|
5 |
5 |
elsif ($rOpts_space_prototype_paren == 0) { }
|
|
5 |
0 |
elsif ($rOpts_space_prototype_paren == 2) { }
|
8807
|
25 |
0 |
if ($token =~ s/\s+/ /g)
|
8825
|
9 |
2340 |
if ($rOpts->{'delete-semicolons'} and $last_nonblank_block_type && $last_nonblank_code_type eq '}' && ($is_block_without_semicolon{$last_nonblank_block_type} || $last_nonblank_block_type =~ /$SUB_PATTERN/ || $last_nonblank_block_type =~ /^\w+:$/) || $last_nonblank_code_type eq ';')
|
8857
|
15 |
1 |
if ($KK < $Klast) { }
|
8859
|
14 |
1 |
if (defined $Kn and $Kn <= $Klast)
|
8873
|
13 |
3 |
if ($ok_to_delete) { }
|
8887
|
0 |
1861 |
if (substr($token, 0, 1) eq "x" and $token =~ /^x\d+/)
|
8906
|
0 |
274 |
if ($self->[76] and $token =~ /\t/)
|
8909
|
66 |
191 |
if ($rwhitespace_flags->[$KK] == 1 and @{$rLL_new;} and $rLL_new->[-1][7] ne "b" and $rOpts_add_whitespace)
|
8922
|
3 |
7 |
if ($last_nonblank_code_type eq "," and $rOpts->{'delete-repeated-commas'})
|
8931
|
259 |
2695 |
if (%trailing_comma_rules)
|
8933
|
112 |
147 |
if (defined $seqno and not defined $self->[24]{$seqno})
|
8951
|
1 |
2462 |
if $self->[76]
|
8959
|
7474 |
14571 |
if ($rwhitespace_flags->[$KK] == 1 and @{$rLL_new;} and $rLL_new->[-1][7] ne "b" and $rOpts_add_whitespace)
|
8978
|
553 |
4 |
if (@{$rLL_new;})
|
8982
|
9136 |
49240 |
if ($rLL_new->[$KK][8])
|
8990
|
0 |
4381 |
unless defined $K_opening
|
8994
|
0 |
4381 |
unless defined $K_closing
|
9004
|
1890 |
2491 |
if ($rtype_count)
|
9008
|
17 |
1873 |
if ($rtype_count->{'f'})
|
9016
|
1218 |
672 |
if ($comma_count || $fat_comma_count and not $semicolon_count)
|
9022
|
731 |
487 |
if ($rLL_new->[$K_opening][5] eq "(")
|
9024
|
730 |
1 |
if (defined $Kp)
|
9030
|
125 |
605 |
$type_p eq 'k' ? :
|
9043
|
18 |
4363 |
if ($block_type and substr($block_type, -1, 1) eq " ")
|
9051
|
18 |
0 |
if (defined $Knn1)
|
9054
|
18 |
0 |
defined $Knn1 ? :
|
9055
|
18 |
0 |
defined $Knn2 ? :
|
9058
|
6 |
3 |
if ($wU{$type_nn1} and $wiq{$type_nn2})
|
9063
|
1 |
17 |
if ($is_list)
|
9071
|
1202 |
3179 |
if ($is_list and not $block_type) { }
|
|
43 |
3136 |
elsif ($block_type and $rOpts_line_up_parentheses) { }
|
9079
|
630 |
579 |
if (not $rhas_list->{$seqno_parent} or $rhas_list->{$seqno_parent} > $depth)
|
9085
|
391 |
818 |
if ($line_diff)
|
9096
|
177 |
163 |
if ($rlec_count_by_seqno->{$seqno} and $rlec_count_by_seqno->{$seqno} > 1 || $rtype_count_by_seqno->{$seqno}{'=>'})
|
9135
|
31 |
526 |
if ($rOpts_line_up_parentheses)
|
9141
|
1 |
0 |
if $line_Kh == $line_Kc
|
9149
|
0 |
557 |
if ($rOpts_comma_arrow_breakpoints == 3)
|
9153
|
0 |
0 |
unless $rtype_count and $rtype_count->{'=>'}
|
9156
|
0 |
0 |
unless (defined $roverride_cab3->{$seqno})
|
9157
|
0 |
0 |
if ($rhas_list->{$seqno}) { }
|
9164
|
0 |
0 |
if (defined $seqno_parent and $ris_list_by_seqno->{$seqno_parent})
|
9205
|
7667 |
50763 |
unless ($item)
|
9209
|
7667 |
0 |
if (@{$rLL_new;} and $rLL_new->[-1][7] ne 'b') { }
|
9249
|
0 |
58430 |
$length_function && !$is_ascii_type{$type} && $token =~ /[[:^ascii:][:^print:]]/ ? :
|
9255
|
22362 |
36068 |
if ($type eq 'b') { }
|
|
1091 |
34977 |
elsif ($type eq '#') { }
|
9260
|
5 |
22357 |
if (@{$rLL_new;} and $rLL_new->[-1][7] eq "b")
|
9270
|
20 |
1071 |
if ($ord > 0 and $ord < 33 || $ord > 126 and $token =~ s/\s+$//)
|
9277
|
0 |
20 |
$length_function ? :
|
9285
|
7 |
851 |
if (not $ignore_sc_length || $rOpts_ignore_perlcritic_comments and $token_length > 10 and substr($token, 1, 1) eq "#" and $token =~ /^##\s*no\s+critic\b/)
|
9293
|
3 |
4 |
if ($Ktoken_vars > $Kfirst_old) { }
|
9316
|
17 |
28 |
if ($ignore_sc_length and !$CODE_type || $CODE_type eq 'HSC')
|
9321
|
296 |
795 |
if (defined $seqno)
|
9322
|
75 |
221 |
if $CODE_type eq "BC"
|
9325
|
116 |
180 |
unless $ris_permanently_broken->{$seqno}
|
9335
|
9136 |
25841 |
if ($type_sequence)
|
9340
|
4381 |
4755 |
if ($is_opening_token{$token}) { }
|
|
4381 |
374 |
elsif ($is_closing_token{$token}) { }
|
9348
|
5 |
167 |
if ($last_nonblank_code_type eq "," and $Ktoken_vars == $Klast_old_code and $Ktoken_vars > $Kfirst_old)
|
9355
|
394 |
3987 |
if ($last_nonblank_code_type eq "=" or $last_nonblank_code_type eq "=>")
|
9363
|
1864 |
2517 |
unless defined $seqno_parent
|
9370
|
1236 |
3145 |
if ($depth_next > $depth_next_max)
|
9380
|
300 |
4081 |
if ($last_nonblank_code_type eq "," or $last_nonblank_code_type eq "=>")
|
9386
|
165 |
0 |
if ($Ktoken_vars == $Kfirst_old and $last_nonblank_code_type eq "," and $rlec_count_by_seqno->{$type_sequence})
|
9401
|
220 |
154 |
unless defined $seqno_parent
|
9405
|
187 |
187 |
if ($token eq '?') { }
|
|
187 |
0 |
elsif ($token eq ':') { }
|
9441
|
6565 |
28412 |
if ($is_counted_type{$type})
|
9443
|
4869 |
1696 |
if (defined $seqno)
|
9447
|
978 |
3891 |
if ($type eq "," and $Ktoken_vars == $Klast_old_code)
|
9452
|
6 |
4863 |
if ($type eq "h" and not $K_first_here_doc_by_seqno{$seqno})
|
9493
|
0 |
535 |
unless $type_sequence
|
9495
|
0 |
535 |
unless $block_type
|
9497
|
226 |
167 |
unless $ok_to_add_semicolon_for_block_type{$block_type} or $block_type =~ /^(sub|package)/ or $block_type =~ /^\w+\:$/
|
9503
|
0 |
309 |
unless defined $Kp
|
9518
|
0 |
175 |
if $type_p eq "#" or $type_sequence_p and $rblock_type_of_seqno->{$type_sequence_p} or $type_p eq "J" or $type_p eq "k" and $token_p =~ /format/
|
9539
|
38 |
5 |
if ($seqno_inner and $is_closing_token{$token_p} and defined $rchildren_of_seqno->{$type_sequence} and @{$rchildren_of_seqno->{$type_sequence};} == 1)
|
9552
|
38 |
0 |
if (defined $K_outer_opening)
|
9554
|
38 |
0 |
if (defined $K_nxt)
|
9560
|
8 |
30 |
if $seqno_nxt and $seqno_nxt == $seqno_inner
|
9571
|
127 |
40 |
if ($rLL_new->[$Ktop][7] eq 'b' and $want_left_space{';'} == -1) { }
|
9585
|
3 |
124 |
if ($rOpts_one_line_block_semicolons == 2)
|
9616
|
1 |
39 |
if ($rLL_new->[$Ktop][7] eq "b")
|
9619
|
0 |
1 |
if ($new_top_ix < $old_top_ix)
|
9653
|
0 |
24 |
unless defined $Kp
|
9655
|
0 |
24 |
if $type_p eq "#"
|
9683
|
11 |
13 |
if ($match)
|
9714
|
0 |
60 |
unless defined $Kp
|
9715
|
0 |
60 |
if ($rLL_new->[$Kp][7] ne ",")
|
9724
|
0 |
60 |
if ($rLL_new->[$Kp][4] >= $high_stress_level)
|
9735
|
0 |
48 |
unless ($match or $rOpts_add_whitespace)
|
9737
|
0 |
0 |
if (defined $Kn)
|
9739
|
0 |
0 |
if ($type_n ne ";" and $type_n ne "#")
|
9746
|
0 |
48 |
if (not $match and $rOpts_add_trailing_commas and $rLL->[$Kfirst][7] eq "R")
|
9753
|
0 |
0 |
if (defined $Kp_old and $Kp_old > $Kfirst and $rLL->[$Kp_old][7] eq ",")
|
9760
|
0 |
0 |
if (defined $Kpp_old and $Kpp_old eq $Kfirst)
|
9769
|
48 |
12 |
unless ($match)
|
9802
|
0 |
1 |
unless $type_sequence
|
9806
|
0 |
1 |
unless defined $Kp
|
9807
|
0 |
1 |
if ($rLL_new->[$Kp][7] ne ",")
|
9818
|
0 |
1 |
unless defined $rtype_count and $rtype_count->{','} and $rtype_count->{','} == 1
|
9822
|
0 |
1 |
unless defined $Kpp
|
9827
|
1 |
0 |
if ($seqno_pp and $is_closing_type{$type_pp})
|
9828
|
1 |
0 |
if ($seqno_pp == $type_sequence + 1)
|
9855
|
0 |
49 |
if (@{$rLL_new;} < 3)
|
9863
|
6 |
43 |
if ($rLL_new->[-1][7] eq $type) { }
|
|
43 |
0 |
elsif ($rLL_new->[-1][7] eq 'b' and $rLL_new->[-2][7] eq $type) { }
|
9892
|
49 |
0 |
if ($rLL_new->[-1][7] ne "b")
|
9893
|
43 |
6 |
if (defined $rblank)
|
9928
|
0 |
84 |
unless $trailing_comma_rule
|
9950
|
0 |
84 |
unless (defined $trailing_comma_style)
|
9956
|
0 |
84 |
unless $type_sequence
|
9959
|
0 |
84 |
unless defined $rtype_count and $rtype_count->{','}
|
9966
|
0 |
84 |
unless defined $K_opening
|
9979
|
0 |
84 |
if (not defined $iline_first) { }
|
9995
|
24 |
60 |
$if_add ? :
|
10005
|
12 |
72 |
if ($trailing_comma_style eq '0') { }
|
|
4 |
68 |
elsif ($trailing_comma_style eq '*' or $trailing_comma_style eq '1') { }
|
|
20 |
48 |
elsif ($trailing_comma_style eq 'm') { }
|
|
16 |
32 |
elsif ($trailing_comma_style eq 'b') { }
|
|
32 |
0 |
elsif ($trailing_comma_style eq 'h' or $trailing_comma_style eq 'i') { }
|
10040
|
22 |
10 |
unless $is_bare_multiline_comma
|
10045
|
4 |
6 |
if $if_add
|
10047
|
2 |
8 |
if ($excess_commas > 0)
|
10053
|
0 |
2 |
if ($trailing_comma_style eq 'i' and $iline_c - $rLL_new->[$Kp][2] > 1 and $new_comma_count <= 2) { }
|
|
0 |
2 |
elsif ($trailing_comma_style eq 'h' and not $if_add and $rOpts_add_trailing_commas and $rOpts_break_at_old_comma_breakpoints and not $rOpts_ignore_old_breakpoints) { }
|
10088
|
4 |
4 |
if (not $match and $fat_comma_count and $fat_comma_count >= 2)
|
10097
|
2 |
6 |
if (not $match and $trailing_comma_style eq "i")
|
10118
|
0 |
0 |
if ($match and $paren_flag and $paren_flag ne 1 and $paren_flag ne "*" and $closing_token eq ")")
|
10132
|
23 |
37 |
if ($match)
|
10133
|
17 |
6 |
if ($if_add and $rOpts_delete_trailing_commas or not $if_add and $rOpts_add_trailing_commas)
|
10141
|
0 |
17 |
if ($rOpts_comma_arrow_breakpoints == 3)
|
10169
|
2 |
9 |
if ($top_is_space and $want_left_space{$type} == -1) { }
|
10190
|
2 |
0 |
if ($is_counted_type{$type})
|
10192
|
2 |
0 |
if ($seqno)
|
10216
|
0 |
9 |
if ($top_is_space)
|
10219
|
0 |
0 |
if ($new_top_ix < $old_top_ix)
|
10238
|
0 |
1 |
if ($token =~ /\t/)
|
10248
|
1 |
0 |
unless $is_s_y_m_slash{substr $token, 0, 1} or substr($token, 0, 2) eq "tr"
|
10253
|
0 |
0 |
unless defined $Kp
|
10255
|
0 |
0 |
unless $is_unexpected_equals{$previous_nonblank_type}
|
10261
|
0 |
0 |
if (defined $Kpp)
|
10269
|
0 |
0 |
if ($Kn <= $Kmax and $rLL->[$Kn][7] eq "b")
|
10270
|
0 |
0 |
if ($Kn <= $Kmax)
|
10277
|
0 |
0 |
if ($previous_nonblank_type_2 eq "i" and $previous_nonblank_token_2 =~ /^\$/ and $next_nonblank_token =~ /^[; \)\}]$/ and not $type_0 eq 'k' && $is_my_our_local{$token_0})
|
10308
|
0 |
298 |
unless (defined $token)
|
10309
|
0 |
0 |
if ($type eq 'b') { }
|
|
0 |
0 |
elsif ($type eq 'q') { }
|
|
0 |
0 |
elsif ($type eq '->') { }
|
|
0 |
0 |
elsif ($type eq ';') { }
|
|
0 |
0 |
elsif ($type eq ',') { }
|
10351
|
0 |
532 |
unless defined $KK
|
10352
|
0 |
532 |
if $KK < 0
|
10355
|
532 |
0 |
unless defined $rLL
|
10359
|
0 |
904 |
unless (defined $rLL->[$Knnb])
|
10367
|
515 |
389 |
if ($rLL->[$Knnb][7] ne "b" and $rLL->[$Knnb][7] ne "#")
|
10382
|
0 |
545 |
unless defined $KK
|
10383
|
0 |
545 |
if $KK < 0
|
10389
|
509 |
36 |
unless defined $rLL
|
10392
|
1 |
544 |
if $Knnb >= $Num
|
10393
|
86 |
458 |
if $rLL->[$Knnb][7] ne "b"
|
10394
|
0 |
458 |
if ++$Knnb >= $Num
|
10395
|
458 |
0 |
if $rLL->[$Knnb][7] ne "b"
|
10407
|
0 |
0 |
unless (defined $rLL->[$Knnb])
|
10411
|
0 |
0 |
if ($rLL->[$Knnb][7] ne "b")
|
10424
|
1749 |
732 |
unless defined $rLL
|
10426
|
1 |
2480 |
unless (defined $KK)
|
10428
|
0 |
2481 |
if ($KK > $Num)
|
10440
|
2480 |
1036 |
if ($rLL->[$Kpnb][7] ne "b" and $rLL->[$Kpnb][7] ne "#")
|
10457
|
379 |
401 |
unless defined $rLL
|
10459
|
394 |
386 |
unless (defined $KK)
|
10460
|
0 |
780 |
if ($KK > $Num)
|
10471
|
9 |
771 |
if $Kpnb < 0
|
10472
|
233 |
538 |
if $rLL->[$Kpnb][7] ne "b"
|
10473
|
0 |
538 |
if --$Kpnb < 0
|
10474
|
538 |
0 |
if $rLL->[$Kpnb][7] ne "b"
|
10478
|
0 |
0 |
if --$Kpnb < 0
|
10480
|
0 |
0 |
if ($rLL->[$Kpnb][7] ne "b")
|
10513
|
63 |
145 |
if ($type_sequence) { }
|
10518
|
122 |
23 |
if (defined $Kt)
|
10523
|
19 |
103 |
if ($is_closing_type{$type}) { }
|
10533
|
0 |
208 |
unless defined $parent_seqno
|
10546
|
0 |
316 |
if ($i < 0)
|
10552
|
175 |
141 |
if not $seqno or $seqno eq 1
|
10553
|
34 |
107 |
if $self->[7]{$seqno}
|
10563
|
0 |
1767 |
unless $seqno
|
10564
|
1178 |
589 |
if $seqno eq 1
|
10565
|
157 |
432 |
if ($self->[36]{$seqno})
|
10577
|
0 |
165 |
unless defined $parent_seqno
|
10586
|
0 |
46 |
unless defined $seqno
|
10611
|
553 |
4 |
defined $Klimit ? :
|
10640
|
7466 |
173 |
if ($line_type eq "CODE")
|
10646
|
6663 |
803 |
if (defined $Kfirst_old)
|
10663
|
4545 |
513 |
if ($Knext_guess > $Knext and $Knext_guess < $Kmax and $rLL->[$Knext_guess][2] <= $iline)
|
10678
|
6657 |
809 |
if ($Knext > $Knext_beg)
|
10683
|
5219 |
1438 |
if ($rLL->[$Klast][7] eq "b")
|
10685
|
0 |
6657 |
if ($Klast < $Knext_beg) { }
|
10694
|
5931 |
726 |
if ($rLL->[$Kfirst][7] ne "#")
|
10702
|
5749 |
908 |
if (not $CODE_type or $CODE_type eq "VER")
|
10713
|
145 |
7321 |
if ($line_of_tokens->{'_ended_in_blank_token'})
|
10720
|
809 |
6657 |
if (not defined $Kfirst) { }
|
10722
|
1 |
808 |
unless ($CODE_type)
|
10732
|
227 |
6430 |
if ($rLL->[$Kfirst][7] eq "q" or $rLL->[$Klast][7] eq "q")
|
10745
|
0 |
557 |
if ($Knext <= $Kmax)
|
10781
|
25 |
7 |
if (not $seqno) { }
|
10783
|
7 |
18 |
if ($rkeep_break_hash->{$type})
|
10784
|
0 |
7 |
$is_soft_keep_break_type{$type} ? :
|
10792
|
0 |
7 |
if ($flag)
|
10797
|
0 |
0 |
unless ($match)
|
10798
|
0 |
0 |
if ($token eq '(' or $token eq ')') { }
|
|
0 |
0 |
elsif ($token eq '{' or $token eq '}') { }
|
10807
|
0 |
0 |
if ($flag eq 'b') { }
|
|
0 |
0 |
elsif ($flag eq 'B') { }
|
10817
|
0 |
0 |
if ($match)
|
10819
|
0 |
0 |
$is_soft_keep_break_type{$type} ? :
|
10852
|
2 |
558 |
if ($rOpts->{'break-at-old-method-breakpoints'})
|
10860
|
4 |
12 |
if ($type eq '->') { }
|
|
2 |
10 |
elsif ($token eq ')') { }
|
10869
|
0 |
2 |
unless defined $Kn
|
10870
|
0 |
2 |
if $Kn > $Klast
|
10871
|
0 |
2 |
if $rLL->[$Kn][7] ne "->"
|
10873
|
0 |
2 |
unless $seqno
|
10898
|
559 |
1 |
unless %keep_break_before_type or %keep_break_after_type
|
10919
|
3 |
557 |
if $rOpts->{'indent-only'}
|
10920
|
6 |
551 |
unless $rOpts_add_newlines
|
10940
|
12 |
539 |
if %{$rcuddled_block_types;}
|
10942
|
23 |
528 |
if ($rOpts->{'weld-nested-containers'})
|
10969
|
0 |
110 |
if ($Kend <= $Kstart)
|
10987
|
17 |
93 |
if (defined $rK_weld_right->{$Kend} and not defined $rK_weld_left->{$Kstart})
|
10996
|
9 |
542 |
if (@K_multi_weld)
|
11001
|
0 |
17 |
if $Kstart <= $Kend
|
11033
|
0 |
59 |
$KK <= 0 ? :
|
11047
|
0 |
12 |
unless %{$rcuddled_block_types;}
|
11050
|
0 |
12 |
unless defined $rLL and @{$rLL;}
|
11072
|
0 |
394 |
unless ($type_sequence)
|
11073
|
0 |
0 |
if $KK == 0
|
11090
|
72 |
322 |
if ($level < $last_level) { }
|
|
72 |
250 |
elsif ($level > $last_level) { }
|
11099
|
176 |
218 |
unless $type eq $token
|
11101
|
65 |
153 |
if ($token eq '{') { }
|
|
65 |
88 |
elsif ($token eq '}') { }
|
11104
|
0 |
65 |
unless ($block_type)
|
11111
|
0 |
0 |
unless $Kp
|
11114
|
18 |
47 |
if ($in_chain{$level}) { }
|
11124
|
0 |
0 |
unless ($ris_broken_container->{$closing_seqno} or $rbreak_container->{$closing_seqno})
|
11127
|
0 |
0 |
unless $CBO == 2
|
11134
|
18 |
0 |
if (defined $Ko)
|
11139
|
18 |
0 |
if (defined $Kon and $rLL->[$Kon][7] ne "#")
|
11147
|
18 |
0 |
if $CBO
|
11163
|
0 |
47 |
if ($rcuddled_block_types->{$block_type}) { }
|
11173
|
65 |
0 |
if ($in_chain{$level})
|
11178
|
8 |
57 |
unless $Knn
|
11182
|
18 |
39 |
if ($rcuddled_block_types->{$chain_type}{$next_nonblank_token}) { }
|
11209
|
0 |
23 |
unless defined $rLL and @{$rLL;}
|
11237
|
132 |
116 |
if $K_outer_closing < $Num and $rLL->[$K_outer_closing][7] eq "b"
|
11241
|
4 |
244 |
if $K_outer_closing >= $Num
|
11243
|
145 |
99 |
unless $outer_seqno
|
11245
|
22 |
77 |
unless $is_closing_token{$token_outer_closing}
|
11249
|
11 |
66 |
if ($rtype_count)
|
11250
|
8 |
3 |
if $rtype_count->{','} or $rtype_count->{';'}
|
11256
|
0 |
69 |
unless defined $K_outer_opening
|
11257
|
0 |
69 |
unless defined $K_inner_opening
|
11265
|
0 |
69 |
unless defined $K_io_check
|
11266
|
8 |
61 |
if ($K_io_check != $K_inner_opening)
|
11284
|
6 |
2 |
if not $inner_blocktype or $inner_blocktype ne "sub"
|
11285
|
0 |
2 |
if $rLL->[$K_io_check][5] ne "("
|
11287
|
0 |
2 |
unless defined $seqno_signature
|
11289
|
0 |
2 |
unless defined $K_signature_closing
|
11292
|
0 |
2 |
unless defined $K_test and $K_test == $K_inner_opening
|
11308
|
0 |
2 |
if $Kdiff > 4
|
11312
|
0 |
0 |
if $rtc and $rtc->{','}
|
11322
|
0 |
63 |
if ($K_diff < 0)
|
11337
|
81 |
117 |
if $rLL->[$Kn][7] eq "b"
|
11338
|
64 |
53 |
unless ($nonblank_count)
|
11339
|
60 |
57 |
if ($Kn eq $K_inner_opening)
|
11346
|
0 |
57 |
if ($type eq "#")
|
11348
|
9 |
48 |
if $is_name and $last_is_name
|
11351
|
1 |
47 |
if $type eq "m" and not $last_type
|
11354
|
3 |
44 |
if $nonblank_count > 2
|
11358
|
0 |
63 |
if $saw_comment
|
11362
|
2 |
37 |
if (defined $Kn_last_nonblank and $rLL->[$K_inner_opening][5] eq "(" and $rLL->[$Kn_last_nonblank][7] eq "k")
|
11369
|
0 |
2 |
if ($is_sort_map_grep{$token})
|
11374
|
17 |
0 |
if ($nonblank_count == 1 or $inner_blocktype and $inner_blocktype eq "sub" and $rLL->[$Kn_first][5] eq "sub" and not $outer_blocktype or $nonblank_count == 2 and $token_oo eq "(" or $type eq "=>" and $nonblank_count <= 3 and %weld_fat_comma_rules and $weld_fat_comma_rules{$token_oo})
|
11442
|
6 |
0 |
unless defined $rLL
|
11444
|
0 |
6 |
unless defined $flag
|
11445
|
0 |
6 |
if $flag eq 0
|
11446
|
0 |
6 |
if $flag eq 1
|
11447
|
0 |
6 |
if $flag eq "*"
|
11448
|
0 |
6 |
unless $seqno
|
11450
|
0 |
6 |
unless defined $K_opening
|
11454
|
6 |
0 |
if (defined $Kp)
|
11467
|
0 |
6 |
if ($flag eq 'k') { }
|
|
6 |
0 |
elsif ($flag eq 'K') { }
|
|
0 |
0 |
elsif ($flag eq 'f') { }
|
|
0 |
0 |
elsif ($flag eq 'F') { }
|
|
0 |
0 |
elsif ($flag eq 'w') { }
|
|
0 |
0 |
elsif ($flag eq 'W') { }
|
11487
|
21 |
14 |
unless defined $rflags
|
11488
|
7 |
7 |
$is_leading ? :
|
11489
|
4 |
10 |
unless defined $flag
|
11490
|
4 |
6 |
if $flag eq "*"
|
11553
|
46 |
9 |
if (defined $Kprev)
|
11559
|
1 |
45 |
if ($Kouter_opening == $Kfirst and $token_oo eq '(' and $has_tight_paren{$type_prev}) { }
|
|
0 |
45 |
elsif ($rOpts_line_up_parentheses or $want_break_before{$type_prev}) { }
|
11580
|
0 |
0 |
if ($no_previous_seq_item and substr($type_prev, 0, 1) eq "=")
|
11587
|
0 |
0 |
if ($type_prev eq "=>")
|
11592
|
0 |
0 |
if $rLL->[$KK][7] eq "b"
|
11608
|
49 |
6 |
if ($Kref < $Kouter_opening)
|
11612
|
8 |
6 |
if ($rLL->[$Knext][4] == $level_oo)
|
11613
|
4 |
4 |
if ($is_ternary{$rLL->[$Knext][7]} or $rLL->[$Knext][5] eq ")")
|
11626
|
7 |
48 |
$Kref <= 0 ? :
|
11637
|
49 |
6 |
if ($Kref < $Kouter_opening)
|
11649
|
1 |
48 |
if ($lentot_oo + $maximum_text_length_oo < $starting_lentot + $maximum_text_length)
|
11673
|
0 |
0 |
if ($starting_ci and $rOpts_line_up_parentheses and $rOpts_delete_old_whitespace and not $rOpts_add_whitespace and $rLL->[$Kinner_opening][7] ne "q" and $rLL->[$Kinner_opening][7] ne "Q" and defined $Kprev)
|
11685
|
0 |
0 |
if ($Kprev >= 0)
|
11700
|
0 |
0 |
unless ($is_good_location)
|
11717
|
0 |
10 |
$Kfirst <= 0 ? :
|
11724
|
0 |
10 |
if ($rOpts_ignore_side_comment_lengths and $rLL->[$Klast][7] eq "#")
|
11728
|
0 |
0 |
if (defined $Kprev and $Kprev >= $Kfirst)
|
11776
|
1 |
22 |
unless defined $rnested_pairs and @{$rnested_pairs;}
|
11804
|
0 |
22 |
$rOpts_variable_maximum_line_length && $rOpts_line_up_parentheses ? :
|
11827
|
0 |
22 |
$opening_vertical_tightness{'('} ? :
|
11850
|
4 |
53 |
if ($Kinner_closing - $Kinner_opening <= 4)
|
11852
|
0 |
4 |
unless defined $Knext_nonblank
|
11854
|
4 |
0 |
unless $type eq "h"
|
11866
|
1 |
52 |
if ($inner_opening->[7] eq "L")
|
11871
|
0 |
52 |
if ($inner_opening->[7] eq "[")
|
11873
|
0 |
0 |
unless $rtype_count and $rtype_count->{','}
|
11880
|
0 |
0 |
if $Kdiff > 2
|
11882
|
0 |
0 |
if $Kdiff == 2 and $$rLL[$Kouter_opening + 1][7] ne "b"
|
11893
|
0 |
52 |
if ($inner_level >= $high_stress_level)
|
11917
|
0 |
52 |
if (not $do_not_weld_rule and $rOpts_break_at_old_method_breakpoints and $iline_io > $iline_oo)
|
11924
|
0 |
0 |
unless defined $rK_range
|
11926
|
0 |
0 |
unless defined $Kfirst
|
11927
|
0 |
0 |
if ($rLL->[$Kfirst][7] eq "->")
|
11933
|
0 |
52 |
if $do_not_weld_rule
|
11940
|
0 |
8 |
if (%opening_vertical_tightness and $iline_ic == $iline_io and $opening_vertical_tightness{$token_oo})
|
11966
|
0 |
0 |
if (not $is_multiline_weld and $iline_ic == $iline_io + 1 and $token_oo eq "(" and $token_io eq "(")
|
11980
|
48 |
4 |
if (not $touch_previous_pair or not $weld_count_this_start and $iline_oo > $iline_outer_opening) { }
|
11997
|
0 |
0 |
if (not $new_weld_ok and $iline_oo != $iline_io || $iline_ic != $iline_oc)
|
12013
|
4 |
44 |
if ($iline_oo == $iline_oc)
|
12057
|
1 |
3 |
if ($level_oc > $level_last)
|
12062
|
1 |
3 |
if ($Kouter_opening > $Kfirst and $level_oo > $level_first)
|
12068
|
0 |
1 |
if $rLL->[$KK][7] eq "b"
|
12069
|
1 |
0 |
if $rLL->[$KK][4] < $level_oo
|
12104
|
1 |
2 |
if ($iline_oc == $iline_oo + 1 and $iline_io == $iline_ic and $token_oo eq "(")
|
12111
|
1 |
0 |
defined $Knext_nonblank ? :
|
12115
|
1 |
0 |
if ($next_nonblank_type eq ";")
|
12120
|
0 |
1 |
if ($Knext_seq_item == $Kinner_closing)
|
12172
|
6 |
46 |
if (not $do_not_weld_rule || $is_one_line_weld and $iline_ic == $iline_io)
|
12176
|
6 |
0 |
if $token_oo eq "(" or $iline_oo != $iline_io
|
12187
|
0 |
0 |
if (not $do_not_weld_rule and $rOpts_line_up_parentheses and $rOpts_asbl and $ris_asub_block->{$outer_seqno})
|
12199
|
46 |
6 |
unless ($do_not_weld_rule)
|
12212
|
0 |
46 |
unless defined $Knext_io
|
12217
|
7 |
39 |
if ($type_io_next eq "w")
|
12219
|
0 |
7 |
unless defined $Knext_io2
|
12221
|
0 |
7 |
unless ($type_ok_after_bareword{$type_io_next2})
|
12229
|
27 |
19 |
$is_one_line_weld || $is_multiline_weld ? :
|
12244
|
0 |
46 |
if ($excess > 0)
|
12271
|
2 |
44 |
if (not $do_not_weld_rule and $rOpts->{'cuddled-else'})
|
12273
|
1 |
1 |
if ($block_type and $rcuddled_block_types->{'*'}{$block_type})
|
12277
|
0 |
1 |
if ($oo_line < $io_line and $ic_line == $io_line)
|
12284
|
6 |
10 |
if (not $do_not_weld_rule and %weld_nested_exclusion_rules and $self->is_excluded_weld($Kouter_opening, $starting_new_weld) || $self->is_excluded_weld($Kinner_opening, 0))
|
12296
|
12 |
40 |
if ($do_not_weld_rule) { }
|
|
36 |
4 |
elsif ($starting_new_weld) { }
|
12302
|
12 |
0 |
defined $Kprev ? :
|
12303
|
11 |
1 |
unless ($has_tight_paren{$type_prev})
|
12328
|
12 |
0 |
if (not @welds or @{$welds[-1];} < 4)
|
12371
|
3 |
1 |
if ($iline_ic - $iline_io > 1)
|
12377
|
2 |
1 |
if ($is_chain_end)
|
12385
|
40 |
0 |
if ($dlevel != 0)
|
12398
|
39 |
1 |
if ($weld_starts_in_block)
|
12417
|
1 |
22 |
if defined $rflags and defined $rflags->[1]
|
12423
|
0 |
22 |
unless defined $rLL and @{$rLL;}
|
12437
|
39 |
32 |
if $test_type eq "b"
|
12438
|
0 |
32 |
if $test_type ne $quote_type
|
12454
|
0 |
468 |
unless ($outer_seqno)
|
12455
|
0 |
0 |
if $KK == 0
|
12467
|
230 |
238 |
if ($is_opening_token{$token})
|
12471
|
132 |
98 |
if $Kn < $Num and $rLL->[$Kn][7] eq "b"
|
12473
|
0 |
230 |
if $Kn >= $Num
|
12478
|
223 |
7 |
unless $next_type eq 'q' || $next_type eq 'Q' and substr($next_token, 0, 1) eq "q"
|
12484
|
0 |
7 |
unless $rLL->[$Kinner_closing][7] eq $next_type
|
12491
|
0 |
7 |
if $Kinner_closing == $Kinner_opening
|
12499
|
0 |
7 |
unless $is_closing_token{$closing_delimiter} or $closing_delimiter eq ">"
|
12505
|
0 |
7 |
unless &$is_single_quote($Kinner_opening + 1, $Kinner_closing - 1, $next_type)
|
12533
|
0 |
2 |
if not $is_old_weld and $next_type eq "Q" and $iline_ic != $iline_oc
|
12541
|
0 |
7 |
unless ($ok_to_weld)
|
12550
|
5 |
2 |
$is_old_weld ? :
|
12551
|
0 |
7 |
if ($excess >= $excess_max)
|
12562
|
7 |
0 |
unless ($do_not_weld)
|
12564
|
1 |
6 |
if ($self->is_excluded_weld($KK, $is_leading))
|
12574
|
6 |
1 |
unless ($do_not_weld)
|
12587
|
5 |
1 |
defined $rK_weld_right->{$Kouter_closing} ? :
|
12588
|
0 |
6 |
if ($excess_ic + $weld_len + 2 > 0)
|
12597
|
1 |
6 |
if ($do_not_weld)
|
12621
|
0 |
6 |
if ($qw_seqno and $self->[88]{$qw_seqno}) { }
|
12643
|
6 |
0 |
if (length $rLL->[$Kinner_closing][5] == 1)
|
12659
|
0 |
83 |
unless $total_weld_count and defined $seqno
|
12661
|
0 |
83 |
unless defined $KK_o
|
12689
|
3 |
557 |
if $rOpts->{'indent-only'}
|
12692
|
4 |
553 |
unless defined $rLL and @{$rLL;}
|
12694
|
552 |
1 |
unless $rOpts->{'one-line-block-nesting'}
|
12726
|
0 |
4 |
unless ($type_sequence)
|
12727
|
0 |
0 |
if $KK == 0
|
12740
|
0 |
4 |
if ($total_weld_count and $self->is_welded_at_seqno($type_sequence))
|
12747
|
0 |
4 |
unless $type eq $token
|
12748
|
0 |
4 |
unless $rblock_type_of_seqno->{$type_sequence}
|
12755
|
1 |
3 |
if ($iline != $iline_last)
|
12757
|
2 |
2 |
if ($token eq "}")
|
12758
|
2 |
0 |
if (@open_block_stack)
|
12760
|
2 |
2 |
unless $token eq "{"
|
12765
|
0 |
2 |
unless defined $K_opening and defined $K_closing
|
12770
|
0 |
2 |
if $ris_broken_container->{$type_sequence} or $rbreak_container->{$type_sequence}
|
12774
|
0 |
2 |
$KK <= 0 ? :
|
12783
|
0 |
2 |
if (&$excess_length_to_K($K_closing) > 0)
|
12793
|
1 |
1 |
if @open_block_stack <= 1
|
12821
|
4 |
556 |
unless defined $Klimit
|
12842
|
6 |
550 |
if $rOpts_extended_continuation_indentation
|
12857
|
0 |
556 |
unless defined $radjusted_levels and @{$radjusted_levels;}
|
12859
|
0 |
556 |
if ($min < 0)
|
12862
|
0 |
0 |
if $_ < 0
|
12877
|
554 |
2 |
unless %{$rseqno_non_indenting_brace_by_ix;}
|
12896
|
6 |
0 |
if defined $Kc
|
12898
|
0 |
2 |
unless @K_stack
|
12906
|
8 |
4 |
if ($ndeep > 0)
|
12914
|
6 |
2 |
if ($inc < 0)
|
12929
|
0 |
556 |
unless defined $rLL and @{$rLL;}
|
12933
|
2 |
0 |
if ($rOpts_whitespace_cycle and $rOpts_whitespace_cycle > 0 and $rOpts_whitespace_cycle < $maximum_level)
|
12947
|
26 |
208 |
if ($level_abs < $whitespace_last_level)
|
12950
|
2 |
232 |
if (not @whitespace_level_stack) { }
|
12954
|
26 |
206 |
if ($level_abs > $whitespace_last_level)
|
12958
|
0 |
25 |
if ($level > $rOpts_whitespace_cycle and $last_nonblank_type eq "{" and $last_nonblank_token eq "{" or $level > $rOpts_whitespace_cycle + 1 and $last_nonblank_token =~ /^[\{\[]$/ or $level > $rOpts_whitespace_cycle + 2)
|
12985
|
150 |
84 |
if ($type ne "b")
|
13006
|
549 |
7 |
unless %break_before_container_types
|
13009
|
0 |
7 |
unless defined $rLL and @{$rLL;}
|
13029
|
0 |
7 |
if ($rOpts_ignore_old_breakpoints)
|
13044
|
2 |
45 |
if $rblock_type_of_seqno->{$seqno}
|
13057
|
0 |
45 |
if ($total_weld_count)
|
13059
|
0 |
0 |
if (defined $KK_test)
|
13066
|
4 |
7 |
unless $is_list or $has_list and $has_list == 1
|
13073
|
25 |
16 |
unless $break_option
|
13078
|
0 |
16 |
if ($level >= $stress_level_beta)
|
13087
|
0 |
16 |
if $Kprev < 0
|
13089
|
16 |
0 |
if ($prev_type eq "b")
|
13091
|
0 |
16 |
if $Kprev < 0
|
13094
|
2 |
14 |
unless $is_equal_or_fat_comma{$prev_type}
|
13105
|
2 |
12 |
if ($break_option == 2)
|
13107
|
0 |
2 |
if ($rOpts_line_up_parentheses or $rOpts_variable_maximum_line_length)
|
13115
|
0 |
0 |
unless ($is_complex)
|
13117
|
0 |
0 |
if ($self->is_list_by_seqno($parent))
|
13125
|
0 |
0 |
unless ($is_complex)
|
13127
|
0 |
0 |
defined $Kp ? :
|
13128
|
0 |
0 |
if ($is_opening_token{$token_p} and $token_p ne "(")
|
13132
|
0 |
0 |
defined $Km ? :
|
13136
|
0 |
0 |
if ($token_m eq ",")
|
13138
|
0 |
0 |
defined $Km ? :
|
13148
|
0 |
0 |
unless $is_complex
|
13166
|
0 |
14 |
if ($break_option == 1) { }
|
|
2 |
12 |
elsif ($break_option == 2) { }
|
|
12 |
0 |
elsif ($break_option == 3) { }
|
13171
|
0 |
0 |
unless $KK == $Kfirst
|
13180
|
1 |
1 |
if ($has_list_with_lec)
|
13185
|
1 |
1 |
unless ($ok_to_break)
|
13193
|
0 |
1 |
if ($has_list)
|
13196
|
1 |
0 |
if ($self->is_list_by_seqno($parent))
|
13202
|
0 |
2 |
unless ($ok_to_break)
|
13213
|
0 |
2 |
if $rOpts_line_up_parentheses
|
13235
|
10 |
4 |
unless $ci_flag
|
13239
|
2 |
2 |
if ($ci_flag == 1)
|
13248
|
0 |
2 |
if ($rOpts_variable_maximum_line_length)
|
13267
|
0 |
2 |
unless $ris_broken_container->{$seqno}
|
13272
|
0 |
2 |
if not $rOpts_add_whitespace and $rOpts_continuation_indentation > $rOpts_indent_columns
|
13276
|
0 |
2 |
if ($ris_permanently_broken->{$seqno}) { }
|
|
1 |
1 |
elsif ($has_list_with_lec) { }
|
13286
|
0 |
1 |
unless $rlec_count_by_seqno->{$seqno}
|
13292
|
0 |
1 |
if ($rOpts_break_at_old_comma_breakpoints)
|
13296
|
1 |
0 |
unless ($OK or $rOpts_ignore_old_breakpoints)
|
13298
|
0 |
1 |
unless $rtype_count
|
13302
|
1 |
0 |
if ($fat_comma_count and $fat_comma_count >= 2)
|
13310
|
0 |
1 |
unless ($OK)
|
13321
|
0 |
0 |
if ($excess_length > $length_tol) { }
|
13352
|
0 |
2 |
unless $ci
|
13355
|
0 |
2 |
if ($ci_flag == 1) { }
|
|
2 |
0 |
elsif ($ci_flag == 2) { }
|
13370
|
2 |
0 |
if $ci >= 0
|
13406
|
0 |
6 |
unless defined $rLL and @{$rLL;}
|
13437
|
150 |
54 |
if ($seqno_top)
|
13444
|
322 |
304 |
if $rLL->[$Kt][0]
|
13449
|
196 |
0 |
if ($is_list or $rLL->[$Kt][6] < $space or $rLL->[$Kt][7] eq "#")
|
13468
|
62 |
142 |
if ($seqno_top and $seqno == $seqno_top)
|
13477
|
24 |
180 |
if ($block_type and $is_block_with_ci{$block_type}) { }
|
13479
|
16 |
8 |
if ($seqno_top)
|
13487
|
66 |
114 |
unless ($rLL->[$KK][0])
|
13488
|
50 |
16 |
if ($seqno_top)
|
13499
|
76 |
62 |
unless defined $K_opening and $KK == $K_opening
|
13504
|
0 |
62 |
unless defined $K_closing
|
13507
|
0 |
62 |
if $rno_xci_by_seqno->{$seqno}
|
13513
|
0 |
62 |
if $ris_bli_container->{$seqno}
|
13518
|
0 |
62 |
if ($rLL->[$K_opening][2] == $rLL->[$K_closing][2] and $rLL->[$K_closing][1] - $rLL->[$K_opening][1] > $rOpts_maximum_line_length)
|
13542
|
0 |
62 |
if ($level >= $stress_level_beta)
|
13553
|
0 |
62 |
if ($space < 0)
|
13562
|
34 |
28 |
if $seqno_top
|
13576
|
533 |
2 |
unless $rOpts_bl or $rOpts_sbl or $rOpts_asbl
|
13579
|
0 |
23 |
unless defined $rLL and @{$rLL;}
|
13592
|
14 |
48 |
if ($ris_asub_block->{$seqno}) { }
|
|
4 |
44 |
elsif ($ris_sub_block->{$seqno}) { }
|
13593
|
10 |
4 |
if ($rOpts_asbl)
|
13600
|
4 |
0 |
if ($rOpts_sbl)
|
13607
|
21 |
13 |
if ($rOpts_bl and $block_type =~ /$bl_pattern/ and not $block_type =~ /$bl_exclusion_pattern/)
|
13623
|
550 |
6 |
unless $rOpts->{'brace-left-and-indent'}
|
13625
|
0 |
6 |
unless defined $rLL and @{$rLL;}
|
13635
|
25 |
24 |
if ($block_type and $block_type =~ /$bli_pattern/ and not $block_type =~ /$bli_exclusion_pattern/)
|
13643
|
25 |
0 |
if (defined $Ko and defined $Kc)
|
13674
|
3 |
557 |
if (not defined $rqw_lines) { }
|
13681
|
508 |
49 |
unless (@{$rqw_lines;})
|
13704
|
0 |
246 |
unless $line_type eq "CODE"
|
13707
|
3 |
243 |
unless defined $Kfirst and defined $Klast
|
13710
|
137 |
106 |
if (defined $K_start_multiline_qw)
|
13714
|
0 |
137 |
if ($type ne "q")
|
13723
|
137 |
0 |
defined $Kprev ? :
|
13724
|
137 |
0 |
defined $Knext ? :
|
13725
|
32 |
105 |
if ($type_m eq "q" and $type_p ne "q")
|
13735
|
41 |
202 |
if (not defined $K_start_multiline_qw and $rLL->[$Klast][7] eq "q")
|
13740
|
41 |
0 |
defined $Kprev ? :
|
13741
|
41 |
0 |
defined $Knext ? :
|
13742
|
32 |
9 |
if ($type_m ne "q" and $type_p eq "q")
|
13754
|
1 |
51 |
if ($rOpts_extended_continuation_indentation)
|
13764
|
0 |
1 |
unless length $token_end == 1 and $is_closing_token{$token_end} || $token_end eq '>'
|
13770
|
0 |
1 |
if (length $token_beg > 3 and substr($token_beg, 2, 1) =~ /\s/)
|
13775
|
0 |
1 |
unless length $token_beg == 3
|
13789
|
1 |
51 |
if ($rOpts_line_up_parentheses and not $rOpts_extended_line_up_parentheses)
|
13796
|
0 |
0 |
unless $parent_seqno
|
13802
|
0 |
0 |
defined $Kn ? :
|
13803
|
0 |
0 |
if (defined $seqno_n and $seqno_n eq $parent_seqno)
|
13806
|
0 |
0 |
defined $Kp ? :
|
13808
|
0 |
0 |
if (defined $seqno_p and $seqno_p eq $parent_seqno)
|
13813
|
0 |
0 |
unless $is_tightly_contained
|
13819
|
0 |
0 |
unless defined $parent_seqno
|
13820
|
0 |
0 |
if $parent_seqno eq 1
|
13879
|
0 |
0 |
if ($is_sort_map_grep_eval{$block_type} or $block_type eq "t" or $self->[39]{$seqno})
|
13929
|
0 |
24 |
if ($rLL->[$KK][7] eq "b")
|
13931
|
18 |
6 |
if ($KK < $K_comma and $rLL->[$K_comma][7] eq "," and $K_closing - $K_comma > 2 || $K_closing - $K_comma == 2 && $$rLL[$K_comma + 1][7] ne 'b' and $rLL->[$K_comma][4] - 1 == $rLL->[$K_closing][4])
|
13964
|
0 |
18 |
if (defined $K_prev and $K_prev >= $KK and $rLL->[$K_prev][8])
|
13970
|
0 |
0 |
if ($closing_vertical_tightness{$token} and $type ne "R")
|
13976
|
18 |
0 |
$KK >= 0 ? :
|
14033
|
0 |
172 |
if ($skip_next_line)
|
14038
|
2 |
170 |
if $line_type ne "CODE"
|
14042
|
37 |
133 |
if $CODE_type eq "BL"
|
14057
|
0 |
133 |
unless defined $K_first and defined $K_last
|
14062
|
7 |
126 |
if $has_comment and $K_first == $K_last
|
14069
|
0 |
126 |
if ($rLL->[$K_first][7] eq "q")
|
14076
|
0 |
0 |
unless (defined $K_start_multiline_qw)
|
14082
|
0 |
0 |
unless ($seqno_qw)
|
14084
|
0 |
0 |
if (defined $Kp and $rLL->[$Kp][7] eq 'q') { }
|
14098
|
0 |
0 |
if (defined $K_start_multiline_qw)
|
14108
|
0 |
0 |
if ($ci_level) { }
|
14116
|
0 |
0 |
if ($level > $level_start_multiline_qw)
|
14121
|
0 |
0 |
if ($len > $max_prong_len)
|
14128
|
0 |
0 |
if $K_begin_loop > $K_last
|
14136
|
5 |
121 |
if ($has_comment)
|
14138
|
5 |
0 |
if $rLL->[$K_terminal][7] eq "b" and $K_terminal > $K_first
|
14144
|
50 |
76 |
if (@stack and $stack[-1][6])
|
14146
|
50 |
0 |
if (defined $K_c)
|
14156
|
2 |
48 |
if ($is_opening_type{$rLL->[$K_terminal][7]} and not $has_comment)
|
14175
|
0 |
2 |
if (defined $Kc_test and $seqno_end == $rLL->[$Kc_test][8] and $rLL->[$Kc_test][2] == $iline + 1)
|
14186
|
0 |
0 |
if (defined $K_terminal_next and $rLL->[$K_terminal_next][7] eq "#")
|
14191
|
0 |
0 |
if (defined $Kprev and $Kprev >= $K_first_next)
|
14198
|
0 |
0 |
if (defined $K_terminal_next and $rLL->[$K_terminal_next][7] eq "," and $K_terminal_next - $Kc_test == 1 || $K_terminal_next - $Kc_test == 2 && $$rLL[$K_terminal_next - 1][7] eq 'b' and not defined $rtype_count && $rtype_count->{','} and $K_terminal_next - $K_terminal <= 5)
|
14236
|
24 |
26 |
if ($rLL->[$K_terminal][7] eq ",")
|
14245
|
0 |
24 |
if ($last_nonblank_type eq "=>")
|
14248
|
17 |
7 |
if ($length > $max_prong_len)
|
14262
|
5 |
121 |
if ($has_comment)
|
14263
|
0 |
5 |
if ($rOpts_ignore_side_comment_lengths) { }
|
14270
|
5 |
0 |
$K_terminal > 0 ? :
|
14275
|
2 |
3 |
if ($len > $max_prong_len)
|
14314
|
194 |
471 |
if $type eq "b"
|
14320
|
120 |
351 |
if ($seqno)
|
14327
|
60 |
60 |
if ($is_opening_token{$token} and defined $K_closing_container->{$seqno}) { }
|
|
60 |
0 |
elsif ($is_closing_token{$token} and @stack) { }
|
14337
|
10 |
50 |
if ($rblock_type_of_seqno->{$seqno}) { }
|
14345
|
40 |
10 |
if ($is_handle_type{$last_nonblank_type})
|
14347
|
23 |
17 |
if $KK > 0 and $$rLL[$KK - 1][7] eq "b"
|
14382
|
0 |
60 |
if ($interrupted_list_rule and $rOpts_variable_maximum_line_length)
|
14386
|
0 |
0 |
if ($rtype_count and $rtype_count->{'=>'})
|
14397
|
0 |
16 |
if ($interrupted_list_rule and $KK < $K_terminal and $rLL->[$K_terminal][7] eq ",")
|
14441
|
0 |
60 |
if ($seqno_o ne $seqno)
|
14459
|
10 |
50 |
if ($block_type)
|
14465
|
10 |
0 |
if (defined $K_o and defined $K_c)
|
14476
|
6 |
4 |
if ($block_length < 40) { }
|
|
0 |
4 |
elsif ($is_one_line_block and $block_length < $maximum_line_length_at_level[$level] and $self->is_fragile_block_type($block_type, $seqno)) { }
|
|
0 |
4 |
elsif ($collapsed_len < 40) { }
|
14519
|
60 |
0 |
if (@stack)
|
14522
|
33 |
27 |
if ($collapsed_len > $max_prong_len)
|
14544
|
11 |
340 |
if ($type eq '=>') { }
|
|
9 |
331 |
elsif ($last_nonblank_type eq '=>') { }
|
|
1 |
330 |
elsif ($type eq 'h') { }
|
14548
|
0 |
11 |
unless ($rOpts_add_whitespace)
|
14549
|
0 |
0 |
if (defined $$rLL[$KK + 1] and $$rLL[$KK + 1][7] ne "b")
|
14556
|
3 |
8 |
if ($len > $max_prong_len)
|
14560
|
1 |
8 |
if ($len > $max_prong_len)
|
14570
|
1 |
0 |
if ($len > $max_prong_len)
|
14576
|
58 |
272 |
if ($len > $max_prong_len)
|
14610
|
241 |
79 |
unless (defined $rflags)
|
14622
|
39 |
40 |
unless ($match_flag1)
|
14627
|
39 |
0 |
if (defined $Kp)
|
14642
|
0 |
39 |
if ($flag1 eq 'k') { }
|
|
0 |
39 |
elsif ($flag1 eq 'K') { }
|
|
13 |
26 |
elsif ($flag1 eq 'f') { }
|
|
13 |
13 |
elsif ($flag1 eq 'F') { }
|
|
0 |
13 |
elsif ($flag1 eq 'w') { }
|
|
13 |
0 |
elsif ($flag1 eq 'W') { }
|
14654
|
66 |
13 |
if ($line_up_parentheses_control_is_lxpl) { }
|
14655
|
45 |
21 |
if $match_flag1
|
14658
|
4 |
9 |
unless $match_flag1
|
14672
|
30 |
0 |
if ($flag2)
|
14681
|
7 |
8 |
if (not $is_list or $has_list or $flag2 eq 2 and $has_code_block || $has_ternary)
|
14694
|
529 |
31 |
unless $rOpts_line_up_parentheses
|
14696
|
0 |
31 |
unless defined $rLL and @{$rLL;}
|
14705
|
43 |
320 |
if $rblock_type_of_seqno->{$seqno}
|
14708
|
0 |
320 |
unless defined $KK
|
14711
|
71 |
249 |
if ($self->is_excluded_lp($KK))
|
14748
|
12 |
7646 |
if (defined $rwant_blank_line_after->{$i} and $rwant_blank_line_after->{$i} == 1)
|
14780
|
13 |
7645 |
if ($last_line_type eq "POD_END" and not $self->[69])
|
14783
|
0 |
11 |
unless ($in_format_skipping_section or $input_line =~ /^\s*$/)
|
14789
|
7485 |
173 |
if ($line_type eq 'CODE') { }
|
14795
|
807 |
6678 |
if ($CODE_type eq 'BL') { }
|
14807
|
3 |
755 |
if ($kgb_keep == 1 and defined $rwant_blank_line_after->{$i} and $rwant_blank_line_after->{$i} == 2)
|
14815
|
0 |
807 |
if ($i - $i_last_POD_END < 3 and not $kgb_keep)
|
14819
|
779 |
28 |
if ($kgb_keep)
|
14831
|
6 |
6672 |
if ($save_logfile and $logger_object)
|
14838
|
98 |
6580 |
if ($CODE_type eq "VB" or $CODE_type eq "FS")
|
14853
|
67 |
106 |
if (substr($line_type, 0, 3) eq 'POD') { }
|
|
7 |
99 |
elsif ($line_type eq 'END_START' or $line_type eq 'DATA_START') { }
|
|
2 |
97 |
elsif ($line_type eq 'SKIP_END') { }
|
14858
|
12 |
55 |
if ($rOpts->{'delete-pod'})
|
14859
|
6 |
61 |
if ($rOpts->{'trim-pod'})
|
14864
|
9 |
40 |
if (not $skip_line || $in_format_skipping_section and $line_type eq "POD_START" and not $self->[69])
|
14890
|
161 |
12 |
unless ($skip_line)
|
14954
|
0 |
548 |
if ($rOpts_kgb_size_min and not $rOpts_kgb_size_min =~ /^\d+$/ or $rOpts_kgb_size_max and not $rOpts_kgb_size_max =~ /^\d+$/)
|
14967
|
0 |
548 |
unless $rOpts_kgb_size_min
|
14969
|
0 |
548 |
if ($rOpts_kgb_size_max and $rOpts_kgb_size_max < $rOpts_kgb_size_min)
|
14985
|
542 |
6 |
unless $ok
|
15035
|
542 |
6 |
if ($quit)
|
15053
|
0 |
12 |
if (defined $rhash_of_desires->{$ip} and $rhash_of_desires->{$ip} == 2)
|
15065
|
0 |
9 |
unless $rOpts_kgb_inside
|
15084
|
5 |
18 |
if ($num >= $rOpts_kgb_size_min)
|
15089
|
0 |
5 |
if (@iblanks and not $rOpts_kgb_delete)
|
15098
|
3 |
2 |
if ($nog_b and $k > $kbeg)
|
15101
|
2 |
3 |
if ($nog_e and $k < $kend)
|
15116
|
0 |
0 |
if $i < 0 or $i >= @{$rlines;}
|
15117
|
0 |
0 |
if $rlines->[$i]{'_line_type'} ne "CODE"
|
15119
|
0 |
0 |
if ($code_type eq "BL")
|
15126
|
5 |
1 |
unless @iblanks
|
15128
|
1 |
0 |
if ($ibl < $iend)
|
15133
|
0 |
1 |
unless $rOpts_kgb_delete
|
15144
|
9 |
16 |
if (defined $ibeg and $ibeg >= 0)
|
15147
|
6 |
3 |
if ($count >= $rOpts_kgb_size_min)
|
15155
|
6 |
0 |
if ($ibeg > 0)
|
15160
|
2 |
4 |
if ($ibeg == 1 and not $code_type)
|
15162
|
1 |
1 |
if $line_text and $line_text =~ /^#/
|
15168
|
4 |
2 |
unless ($code_type =~ /(?:BC|SBC|SBCX)/)
|
15169
|
4 |
0 |
if ($rOpts_kgb_before == 2) { }
|
|
0 |
0 |
elsif ($rOpts_kgb_before == 0) { }
|
15187
|
5 |
1 |
if ($line_type eq "CODE" and defined $K_first)
|
15197
|
3 |
0 |
if ($level == $level_beg and $ci_level == 0 and not $bad_ending and $iend < @{$rlines;} and $CODE_type ne "HSC")
|
15203
|
3 |
0 |
if ($rOpts_kgb_after == 2) { }
|
|
0 |
0 |
elsif ($rOpts_kgb_after == 0) { }
|
15238
|
0 |
75 |
unless defined $Knext_nonblank
|
15241
|
68 |
7 |
if $level_next != $level_beg + 1
|
15245
|
0 |
7 |
unless defined $parent_seqno
|
15249
|
0 |
7 |
if $total_weld_count and $self->is_welded_at_seqno($parent_seqno)
|
15254
|
0 |
7 |
if not defined $Ko or $Ko <= $K_first or $Ko > $K_last
|
15258
|
0 |
7 |
if not defined $Kc or $Kc <= $K_last
|
15271
|
0 |
75 |
if ($rOpts_kgb_size_max and @group >= $rOpts_kgb_size_max)
|
15275
|
9 |
66 |
if (@group == 0)
|
15285
|
23 |
52 |
if (not @group or $token ne $group[-1][1])
|
15322
|
12 |
548 |
unless ($rOpts_maximum_consecutive_blank_lines)
|
15330
|
542 |
6 |
if ($quit)
|
15347
|
0 |
181 |
if $Opt_repeat_count > 0 and $number_of_groups_seen >= $Opt_repeat_count
|
15355
|
5 |
176 |
if ($line_type ne "CODE")
|
15360
|
0 |
176 |
if ($CODE_type and $CODE_type eq "FS")
|
15366
|
6 |
170 |
if ($CODE_type eq "VB")
|
15367
|
6 |
0 |
if ($ibeg >= 0)
|
15372
|
5 |
165 |
if ($CODE_type eq "BL")
|
15373
|
3 |
2 |
if ($ibeg >= 0)
|
15387
|
0 |
165 |
unless (defined $K_first)
|
15410
|
118 |
47 |
if ($ibeg >= 0)
|
15413
|
19 |
99 |
if (defined $K_closing and $K_first < $K_closing) { }
|
|
1 |
98 |
elsif ($level != $level_beg) { }
|
15414
|
1 |
18 |
if $level != $level_beg + 1
|
15426
|
27 |
138 |
if ($self->is_list_by_K($K_first))
|
15427
|
15 |
12 |
if ($ibeg >= 0)
|
15432
|
0 |
5 |
if ($CODE_type and $keyword_group_list_comment_pattern and $CODE_type =~ /$keyword_group_list_comment_pattern/)
|
15440
|
0 |
0 |
if ($ibeg >= 0 and $level == $level_beg) { }
|
15449
|
0 |
0 |
if ($ibeg >= 0)
|
15457
|
75 |
63 |
if ($ci_level == 0 and $type eq 'k' and $token =~ /$keyword_group_list_pattern/) { }
|
|
35 |
28 |
elsif ($ibeg >= 0) { }
|
15463
|
66 |
9 |
if ($ibeg >= 0 and $level == $level_beg) { }
|
15472
|
0 |
9 |
if ($ibeg >= 0)
|
15484
|
0 |
35 |
if ($level > $level_beg + 1 or $level < $level_beg)
|
15493
|
25 |
10 |
if ($level == $level_beg and $ci_level > 0 or $CODE_type eq "HSC")
|
15502
|
5 |
5 |
if (defined $K_closing and $K_first <= $K_closing)
|
15505
|
3 |
2 |
if ($K_last <= $K_closing)
|
15509
|
1 |
1 |
if ($rLL->[$KK][7] eq ";")
|
15510
|
0 |
1 |
if ($KK < $K_last)
|
15511
|
0 |
0 |
if ($$rLL[++$KK][7] eq "b")
|
15512
|
0 |
0 |
if ($KK > $K_last or $rLL->[$KK][7] ne "#")
|
15663
|
0 |
5025 |
if $ii < 0
|
15665
|
492 |
4533 |
ref $indentation ? :
|
15730
|
50133 |
4760 |
if ($max_index_to_go >= 0) { }
|
15731
|
0 |
50133 |
if ($Ktoken_vars != $K_to_go[$max_index_to_go] + 1) { }
|
|
0 |
50133 |
elsif ($type eq 'b' and $types_to_go[$max_index_to_go] eq 'b') { }
|
15757
|
202 |
4558 |
if ($type eq "b")
|
15761
|
4558 |
50133 |
unless (++$max_index_to_go)
|
15779
|
883 |
3675 |
if ($seqno) { }
|
15784
|
3382 |
293 |
if (defined $Kt)
|
15789
|
521 |
2861 |
if ($is_closing_type{$type_t}) { }
|
15800
|
0 |
4558 |
unless defined $next_parent_seqno
|
15812
|
0 |
54691 |
if ($level < 0)
|
15860
|
9138 |
45553 |
if ($seqno)
|
15867
|
4408 |
4730 |
if ($is_opening_token{$token}) { }
|
|
4358 |
372 |
elsif ($is_closing_token{$token}) { }
|
15883
|
0 |
4358 |
unless defined $parent_seqno
|
15899
|
32957 |
21734 |
if ($ci_level)
|
15905
|
19 |
54672 |
if ($current_line_starts_in_quote and $Ktoken_vars == $K_first)
|
15909
|
19 |
0 |
if ($max_index_to_go == 0)
|
15930
|
4555 |
902 |
if ($max_index_to_go >= 0)
|
15935
|
19 |
4536 |
if $starting_in_quote
|
15936
|
156 |
4399 |
if $ending_in_quote
|
15938
|
1190 |
3365 |
if ($CODE_type or $last_CODE_type)
|
15939
|
1137 |
53 |
$K_to_go[$max_index_to_go] >= $K_first ? :
|
15950
|
13 |
4542 |
if ($is_static_block_comment and not $last_line_had_side_comment)
|
15979
|
0 |
4965 |
if ($max_index_to_go < 0)
|
15989
|
3969 |
996 |
if ($types_to_go[$max_index_to_go] ne "#")
|
15994
|
48 |
3921 |
if $total_weld_count and $self->[71]{$K_to_go[$max_index_to_go]}
|
15998
|
432 |
3489 |
if (defined $index_start_one_line_block)
|
16027
|
779 |
972 |
if ($CODE_type_flush and $CODE_type_flush eq 'BL') { }
|
16028
|
153 |
626 |
if $max_index_to_go >= 0
|
16052
|
0 |
1 |
if (not $K_dangling_elsif or $K_dangling_elsif < $K_first or $rLL->[$K_dangling_elsif][7] ne "}")
|
16062
|
0 |
1 |
if (substr($comment, 0, 1) ne "#")
|
16110
|
0 |
6580 |
unless (defined $rK_range->[0])
|
16135
|
119 |
6461 |
if (not $rOpts_add_newlines or $CODE_type eq "NIN")
|
16142
|
1065 |
5515 |
if ($rLL->[$K_last][7] eq "#")
|
16143
|
701 |
364 |
if ($K_last == $K_first) { }
|
16153
|
4 |
6576 |
if ($CODE_type eq "VER")
|
16162
|
2482 |
4098 |
if ($max_index_to_go >= 0)
|
16165
|
2306 |
135 |
if (not $is_block_comment and $types_to_go[$max_index_to_go] ne "b" and $K_first > 0 and $$rLL[$K_first - 1][7] eq "b")
|
16182
|
701 |
5879 |
if ($is_block_comment)
|
16184
|
21 |
680 |
if ($rOpts->{'delete-block-comments'})
|
16190
|
38 |
642 |
if $max_index_to_go >= 0
|
16193
|
50 |
15 |
if ($self->[51] ne "#" and $self->[51] ne "b" and $rOpts->{'blanks-before-comments'} and $rtok_first->[5] ne '#' || $last_line_had_side_comment && $rLL->[$K_first][4] > 0 and not $self->[50] and not $is_static_block_comment)
|
16225
|
632 |
48 |
if ($rOpts->{'indent-block-comments'} and !$rOpts->{'indent-spaced-block-comments'} || $input_line =~ /^\s+/ and not $is_static_block_comment_without_leading_space) { }
|
16254
|
5 |
5874 |
if ($self->[76])
|
16269
|
3 |
2 |
unless ($exception)
|
16280
|
12 |
5867 |
if ($CODE_type eq "IO")
|
16287
|
11 |
1 |
unless $line_of_tokens->{'_starting_in_quote'}
|
16311
|
2441 |
3426 |
if ($max_index_to_go >= 0)
|
16316
|
0 |
2441 |
if ($rOpts_ignore_old_breakpoints and $rOpts_line_up_parentheses)
|
16318
|
0 |
0 |
if ($is_assignment_or_fat_comma{$type_first})
|
16323
|
30 |
2411 |
if (not $index_start_one_line_block and $last_old_nonblank_type eq ";" and $first_new_nonblank_token ne "}" or $rOpts_break_at_old_comma_breakpoints and $last_old_nonblank_type eq ",")
|
16337
|
18 |
12 |
if $rOpts_break_at_old_comma_breakpoints
|
16349
|
9 |
2402 |
if ($max_index_to_go >= 0 and $self->[82]{$K_first_true})
|
16353
|
4 |
5 |
if ($self->[82]{$K_first_true} == 2) { }
|
16368
|
3260 |
2607 |
if ($max_index_to_go >= 0)
|
16374
|
562 |
2698 |
if ($type eq '#' or $in_quote or $CODE_type eq 'VER' or $type eq 'J' and $rOpts_break_after_labels != 2 or $break_flag and $break_flag != 2 or not $rOpts->{'delete-old-newlines'} or $max_index_to_go == 2 and $types_to_go[0] eq 'k' and $tokens_to_go[0] eq 'use' and $tokens_to_go[$max_index_to_go] eq 'overload') { }
|
16424
|
0 |
2698 |
if ($break_flag and $break_flag == 2)
|
16429
|
2688 |
0 |
if (not $rOpts_ignore_old_breakpoints or $rOpts_line_up_parentheses and $is_assignment_or_fat_comma{$type})
|
16446
|
1 |
5866 |
if ($K_dangling_elsif and $rOpts_add_missing_else)
|
16462
|
20 |
5847 |
if ($max_index_to_go < 0 and $rLL->[$K_first][7] eq "b")
|
16473
|
19140 |
35059 |
if ($rtoken_vars->[7] eq "b")
|
16486
|
197 |
34862 |
if ($rbrace_follower)
|
16488
|
156 |
41 |
unless ($rbrace_follower->{$token})
|
16489
|
136 |
20 |
if $max_index_to_go >= 0
|
16500
|
9088 |
25971 |
if ($rtoken_vars->[8])
|
16506
|
1934 |
4 |
if ($block_type and $token eq $type and $block_type ne "t" and not $self->[39]{$type_sequence})
|
16512
|
967 |
967 |
if ($type eq '{') { }
|
|
967 |
0 |
elsif ($type eq '}') { }
|
16532
|
2196 |
32863 |
if ($has_side_comment)
|
16535
|
364 |
1832 |
if ($Ktoken_vars == $K_last)
|
16542
|
364 |
1468 |
if ($Ktoken_vars == $K_last - 1 or $Ktoken_vars == $K_last - 2 and $$rLL[$K_last - 1][7] eq "b")
|
16555
|
2542 |
32153 |
if ($type eq ';') { }
|
|
967 |
31186 |
elsif ($is_opening_BLOCK) { }
|
|
967 |
30219 |
elsif ($is_closing_BLOCK) { }
|
|
9 |
30210 |
elsif ($type eq 'h') { }
|
16559
|
530 |
2012 |
if ($Ktoken_vars < $K_last)
|
16561
|
519 |
11 |
if $rLL->[$Knnb][7] eq "b"
|
16566
|
1 |
0 |
if ($rOpts_break_at_old_semicolon_breakpoints and $Ktoken_vars == $K_first and $max_index_to_go >= 0 and not defined $index_start_one_line_block)
|
16576
|
2094 |
242 |
if not $no_internal_newlines and !$rOpts_keep_interior_semicolons || $Ktoken_vars >= $K_last and $next_nonblank_token ne "}"
|
16604
|
0 |
0 |
if ($max_index_to_go >= 0 and defined $K_last_nonblank_code and $rLL->[$K_last_nonblank_code][7] eq ")" and $rtoken_vars->[4] < $levels_to_go[0] || $too_long)
|
16619
|
21 |
946 |
if ($total_weld_count and defined $self->[70]{$Ktoken_vars})
|
16626
|
50 |
917 |
if ($want_break and not defined $index_start_one_line_block or not $keyword_on_same_line || $rOpts_opening_brace_always_on_right)
|
16643
|
50 |
0 |
unless ($nobreak_BEFORE_BLOCK)
|
16649
|
47 |
3 |
if $max_index_to_go >= 0
|
16658
|
918 |
49 |
if $max_index_to_go >= 0 and not $no_internal_newlines
|
16669
|
417 |
550 |
if ($Ktoken_vars < $K_last)
|
16671
|
253 |
164 |
if $rLL->[$Knnb][7] eq "b"
|
16677
|
355 |
612 |
if (defined $index_start_one_line_block)
|
16684
|
17 |
17 |
if ($has_side_comment and not $rOpts_ignore_side_comment_lengths and $next_nonblank_token_type eq "#")
|
16692
|
0 |
355 |
if ($self->excess_line_length($index_start_one_line_block, $max_index_to_go) + $added_length >= 0)
|
16707
|
68 |
361 |
if $max_index_to_go >= 0 and not $nobreak_BEFORE_BLOCK and not defined $index_start_one_line_block
|
16721
|
355 |
612 |
if (defined $index_start_one_line_block)
|
16739
|
1 |
11 |
if ($rOpts_line_up_parentheses and $next_nonblank_token_type eq "," and $Knnb eq $K_last)
|
16746
|
1 |
0 |
unless $is_excluded
|
16766
|
88 |
1 |
if ($is_block_without_semicolon{$block_type} || $one_line_block_type =~ /^[UG]$/ && $Ktoken_vars == $K_last and $next_nonblank_token ne ";")
|
16780
|
76 |
12 |
unless $no_internal_newlines
|
16787
|
188 |
779 |
if ($is_if_unless_elsif_else{$block_type}) { }
|
|
45 |
734 |
elsif ($block_type eq 'do') { }
|
|
133 |
601 |
elsif ($is_sort_map_grep_eval{$block_type} or $one_line_block_type eq 'G') { }
|
|
173 |
428 |
elsif ($self->[8]{$type_sequence}) { }
|
16792
|
3 |
42 |
if ($self->tight_paren_follows($K_to_go[0], $Ktoken_vars))
|
16810
|
81 |
92 |
if ($one_line_block_type) { }
|
16816
|
2 |
79 |
if ($Ktoken_vars < $K_last and $next_nonblank_token eq '}') { }
|
|
1 |
78 |
elsif ($Ktoken_vars == $K_last and $rOpts_line_up_parentheses) { }
|
16841
|
1 |
0 |
if $keep_going
|
16863
|
27 |
940 |
if ($block_type eq "elsif")
|
16866
|
8 |
19 |
if ($next_nonblank_token_type ne 'b' and $next_nonblank_token_type ne '#') { }
|
16870
|
0 |
8 |
unless ($is_elsif_else{$next_nonblank_token})
|
16876
|
0 |
0 |
if ($rOpts_warn_missing_else and Deparse error: Can't locate object method "object_2svref" via package "B::SPECIAL" at /usr/local/lib/perl5/5.26.1/B/Deparse.pm line 5018.
|
16887
|
0 |
13 |
if (not defined $K_next or $rLL->[$K_next][7] ne "k" or not $is_elsif_else{$rLL->[$K_next][5]})
|
16893
|
0 |
6 |
if ($rOpts_warn_missing_else and Deparse error: Can't locate object method "object_2svref" via package "B::SPECIAL" at /usr/local/lib/perl5/5.26.1/B/Deparse.pm line 5018.
|
16896
|
0 |
0 |
if ($rOpts_add_missing_else) { }
|
16912
|
136 |
831 |
if ($keep_going) { }
|
|
511 |
320 |
elsif ($next_nonblank_token_type eq 'b' and $rOpts_add_newlines) { }
|
|
292 |
28 |
elsif ($rbrace_follower) { }
|
16923
|
160 |
351 |
unless ($rbrace_follower)
|
16924
|
116 |
44 |
if not $no_internal_newlines and $max_index_to_go >= 0
|
16931
|
192 |
100 |
if ($rbrace_follower->{$next_nonblank_token}) { }
|
16937
|
0 |
0 |
if ($next_nonblank_token eq "," and $Knnb eq $K_last and $block_type eq "do" and $rOpts_add_newlines and $self->is_trailing_comma($Knnb))
|
16947
|
57 |
43 |
if not $no_internal_newlines and $max_index_to_go >= 0
|
16956
|
17 |
11 |
if not $no_internal_newlines and $max_index_to_go >= 0
|
16980
|
3 |
5 |
if ($rOpts_break_after_labels and $type eq "J" and $rOpts_break_after_labels == 1)
|
16984
|
3 |
0 |
unless $no_internal_newlines
|
17009
|
0 |
0 |
if ($type_KK ne ",")
|
17015
|
0 |
0 |
if (defined $Knnb)
|
17018
|
0 |
0 |
if ($type_sequence and $is_closing_type{$type_Knnb})
|
17062
|
0 |
45 |
unless defined $K_ic
|
17067
|
0 |
45 |
unless $seqno_i
|
17071
|
1 |
44 |
unless defined $K_oc
|
17073
|
37 |
7 |
unless $token_next eq ")"
|
17078
|
0 |
7 |
unless defined $K_io and defined $K_oo
|
17086
|
3 |
4 |
if (defined $K_test and $rLL->[$K_test][7] eq "{")
|
17088
|
3 |
0 |
if ($seqno_test)
|
17089
|
3 |
0 |
if ($self->[8]{$seqno_test} or $self->[9]{$seqno_test})
|
17116
|
4 |
0 |
if $K_ic - $K_io > 16
|
17132
|
0 |
0 |
if $K_io - $K_oo > 9
|
17135
|
0 |
0 |
if $K_oo < $K_to_go_0
|
17153
|
0 |
0 |
unless ($rOpts_ignore_old_breakpoints)
|
17156
|
0 |
0 |
if $iline_oo != $iline_oc
|
17211
|
0 |
967 |
if (not defined $max_index_to_go or $max_index_to_go < 0)
|
17219
|
20 |
947 |
if ($rbreak_container->{$type_sequence_j})
|
17227
|
0 |
947 |
unless defined $block_type
|
17231
|
929 |
18 |
if (defined $K_last_nonblank)
|
17233
|
825 |
104 |
if ($i_last_nonblank >= 0)
|
17241
|
148 |
799 |
if ($max_index_to_go == 0 or $is_brace_semicolon_colon{$block_type} or substr($block_type, 0, 7) eq 'package') { }
|
|
576 |
223 |
elsif ($i_last_nonblank >= 0 and $previous_nonblank_token eq $block_type || $self->[8]{$type_sequence_j} || $self->[9]{$type_sequence_j} || substr($block_type, -2, 2) eq '()') { }
|
|
219 |
4 |
elsif ($previous_nonblank_token eq ')') { }
|
|
4 |
0 |
elsif ($block_type eq 'case' or $block_type eq 'when') { }
|
17267
|
33 |
543 |
if ($tokens_to_go[$i_start] eq ")")
|
17271
|
0 |
33 |
unless defined $K_start
|
17273
|
0 |
33 |
unless $seqno
|
17275
|
0 |
33 |
unless defined $K_opening
|
17279
|
0 |
33 |
if $i_opening < 0
|
17283
|
33 |
0 |
if ($i_start > 0)
|
17284
|
19 |
14 |
if ($types_to_go[$i_start] eq "b" and $i_start > 0)
|
17286
|
2 |
31 |
if ($lev > $rLL->[$Kj][4])
|
17299
|
2 |
217 |
if ($types_to_go[$i_start] eq "b")
|
17309
|
0 |
219 |
if (substr($block_type, -2, 2) eq "()")
|
17312
|
9 |
210 |
if ($tokens_to_go[$i_start] ne $stripped_block_type)
|
17323
|
0 |
4 |
if ($types_to_go[$i_start] eq "b")
|
17326
|
0 |
4 |
if ($tokens_to_go[$i_start] ne $block_type)
|
17344
|
14 |
922 |
if ($pos > $maximum_line_length)
|
17359
|
0 |
922 |
unless defined $K_closing
|
17366
|
24 |
898 |
if ($total_weld_count and $self->is_welded_at_seqno($type_sequence_j))
|
17370
|
273 |
649 |
if ($excess > 0)
|
17374
|
271 |
2 |
if $excess > 1
|
17382
|
2 |
0 |
if $ldiff
|
17391
|
1261 |
2045 |
if ($rLL->[$Ki][7] eq 'b') { }
|
17399
|
0 |
3306 |
if ($pos > $maximum_line_length) { }
|
|
2629 |
677 |
elsif (not $type_sequence_i) { }
|
|
26 |
651 |
elsif ($rLL->[$Ki][5] eq '{' and $rLL->[$Ki][7] eq '{' and $rblock_type_of_seqno->{$type_sequence_i} and not $nobreak) { }
|
|
334 |
317 |
elsif ($rLL->[$Ki][5] eq '}' and $rLL->[$Ki][7] eq '}' and $rblock_type_of_seqno->{$type_sequence_i} and not $nobreak) { }
|
17427
|
183 |
151 |
if ($Ki_nonblank < $K_last)
|
17429
|
111 |
72 |
if ($rLL->[$Ki_nonblank][7] eq "b" and $Ki_nonblank < $K_last)
|
17462
|
19 |
8 |
if ($Ki < $K_last and $rLL->[$K_last][7] eq "#" and $rLL->[$K_last][4] == $rLL->[$Ki][4] and not $rOpts_ignore_side_comment_lengths and not $is_sort_map_grep_eval{$block_type} and $K_last - $Ki_nonblank <= 2)
|
17480
|
19 |
0 |
if (not $is_if_unless_elsif_else{$block_type} or $K_last == $Ki_nonblank)
|
17486
|
19 |
0 |
if ($Ki_nonblank > $Ki + 1)
|
17490
|
17 |
2 |
if ($$rLL[$Ki + 1][7] eq 'b') { }
|
17496
|
0 |
19 |
if ($pos >= $maximum_line_length)
|
17532
|
47 |
242 |
if ($want_one_line_block{$block_type} and not $is_bli)
|
17535
|
26 |
21 |
$rtype_count && $rtype_count->{';'} ? :
|
17538
|
44 |
3 |
if ($semicolon_count <= 2)
|
17542
|
23 |
21 |
if (defined $Kp and $rLL->[$Kp][7] eq ";")
|
17548
|
26 |
21 |
if ($semicolon_count <= 0) { }
|
|
18 |
3 |
elsif ($semicolon_count == 1 and $block_type eq 'eval') { }
|
17569
|
47 |
3 |
if ($max_index_to_go > 0) { }
|
17585
|
0 |
3 |
unless defined $K_first
|
17591
|
0 |
3 |
if $type eq "b"
|
17596
|
0 |
3 |
if ($structural_indentation_level > $self->[79])
|
17607
|
0 |
3 |
if ($guessed_indentation_level ne $structural_indentation_level) { }
|
17610
|
0 |
0 |
if ($is_closing_block)
|
17612
|
0 |
0 |
unless ($self->[67])
|
17615
|
0 |
0 |
unless ($self->[66])
|
17620
|
0 |
0 |
unless ($self->[65])
|
17623
|
0 |
0 |
if ($self->[64] <= 6)
|
17629
|
0 |
0 |
unless $self->[62]
|
17635
|
0 |
3 |
if $is_closing_block
|
17638
|
0 |
3 |
if ($in_tabbing_disagreement)
|
17640
|
0 |
0 |
if ($self->[64] <= 6)
|
17645
|
0 |
0 |
if ($self->[64] == 6)
|
17714
|
0 |
3943 |
if (not defined $i or $i < 0)
|
17732
|
1581 |
2362 |
if (defined $i_nonblank and $is_opening_sequence_token{$tokens_to_go[$i_nonblank]})
|
17782
|
0 |
4497 |
unless defined $i
|
17783
|
0 |
4497 |
if $i < 0
|
17787
|
752 |
3745 |
if ($i > 0 and $types_to_go[$i] eq "b")
|
17792
|
43 |
4454 |
if $total_weld_count and $self->[71]{$K_to_go[$i]}
|
17799
|
1925 |
2529 |
if ($break_before_or_after_token{$token} and $type eq $token || $type eq 'k') { }
|
|
12 |
2517 |
elsif ($is_if_unless{$token} and $type eq 'k') { }
|
17802
|
238 |
1687 |
if ($want_break_before{$token} and $i >= 0)
|
17811
|
4448 |
6 |
if ($i >= 0 and $i <= $max_index_to_go)
|
17812
|
4206 |
242 |
$types_to_go[$i] ne 'b' ? :
|
17814
|
3520 |
928 |
if ($i_nonblank >= 0 and not $nobreak_to_go[$i_nonblank] and not $forced_breakpoint_to_go[$i_nonblank])
|
17820
|
2391 |
1129 |
if ($i_nonblank > $index_max_forced_break)
|
17853
|
0 |
451 |
if ($i_start < 0)
|
17867
|
750 |
0 |
if ($i >= 0 and $i <= $max_index_to_go) { }
|
17911
|
561 |
1688 |
if (defined $mate_index_to_go[$i_break]) { }
|
17915
|
554 |
7 |
if ($mate_index_to_go[$i_break] > $i_break + 2)
|
17919
|
23 |
531 |
$tokens_to_go[$i_break] eq '?' ? :
|
17926
|
1688 |
0 |
if ($type_sequence)
|
17999
|
0 |
0 |
if ($max_index_to_go < 0)
|
18014
|
0 |
0 |
if (not defined $KK or $KK < 0 or $KK > $Klimit)
|
18015
|
0 |
0 |
unless defined $KK
|
18021
|
0 |
0 |
if ($ii > 0 and $KK != $Km + 1)
|
18082
|
222 |
4333 |
if ($max_index_to_go >= 0 and $types_to_go[$max_index_to_go] eq "b")
|
18086
|
0 |
4555 |
if $max_index_to_go < 0
|
18089
|
302 |
4253 |
if ($rOpts_line_up_parentheses)
|
18098
|
629 |
657 |
if (not $max_index_to_go and $types_to_go[0] eq "#" and not $lp_object_count_this_batch)
|
18135
|
18716 |
35074 |
if ($types_to_go[$i] eq "b")
|
18145
|
22020 |
13054 |
unless $quick_filter{$types_to_go[$i]}
|
18150
|
9088 |
3966 |
if ($type_sequence_to_go[$i]) { }
|
|
2916 |
1050 |
elsif ($type eq ',') { }
|
|
1016 |
34 |
elsif ($type eq '=>') { }
|
|
34 |
0 |
elsif ($type eq 'f') { }
|
18156
|
120 |
8968 |
if ($self->[75]{$seqno})
|
18160
|
4544 |
4544 |
if ($is_opening_sequence_token{$token}) { }
|
18161
|
22 |
4522 |
if ($self->[38]{$seqno})
|
18165
|
186 |
4358 |
if ($type eq "?")
|
18171
|
3 |
3897 |
if ($i > 0 and $self->[38]{$seqno})
|
18176
|
3729 |
815 |
if (defined $i_mate and $i_mate >= 0) { }
|
18177
|
3729 |
0 |
if ($type_sequence_to_go[$i_mate] == $type_sequence_to_go[$i]) { }
|
18183
|
447 |
3282 |
if $cac
|
18194
|
186 |
4358 |
if ($type eq ":")
|
18203
|
948 |
68 |
if (@unmatched_opening_indexes_in_this_batch)
|
18219
|
2 |
3924 |
if (@i_for_semicolon and @i_for_semicolon == 1)
|
18222
|
2 |
0 |
if ($inext <= $max_index_to_go and $types_to_go[$inext] ne "#")
|
18230
|
712 |
3214 |
if (@unmatched_opening_indexes_in_this_batch)
|
18235
|
40 |
3886 |
if (@ix_seqno_controlling_ci)
|
18249
|
355 |
728 |
if ($block_type_to_go[$max_index_to_go] and $max_index_to_go > 0 and not $is_block_without_semicolon{$block_type_to_go[$max_index_to_go]})
|
18269
|
22 |
730 |
if $levels_to_go[$i] < $lev
|
18270
|
0 |
730 |
if $levels_to_go[$i] > $lev
|
18272
|
0 |
730 |
if ($block_type_to_go[$i]) { }
|
|
323 |
407 |
elsif (not $types_to_go[$i] =~ /^[\(\)Gwib]$/) { }
|
18273
|
0 |
0 |
if ($tokens_to_go[$i] eq "}")
|
18296
|
0 |
3926 |
if ($types_to_go[$imin] eq "b")
|
18297
|
0 |
3926 |
if ($types_to_go[$imax] eq "b")
|
18299
|
0 |
3926 |
if ($imin > $imax)
|
18318
|
3073 |
853 |
if ($last_line_leading_type ne "#")
|
18323
|
1141 |
1932 |
if ($leading_type eq 'k') { }
|
|
73 |
1859 |
elsif ($leading_type eq 'S' or $leading_type eq 'P') { }
|
|
602 |
1257 |
elsif ($leading_token eq '}') { }
|
18324
|
7 |
1134 |
if ($leading_token eq 'BEGIN' or $leading_token eq 'END') { }
|
|
102 |
1032 |
elsif ($last_line_leading_type ne 'b' and $is_if_unless_while_until_for_foreach{$leading_token}) { }
|
18325
|
1 |
6 |
if terminal_type_i(0, $max_index_to_go) ne "}"
|
18336
|
0 |
102 |
unless (defined $lc)
|
18340
|
32 |
70 |
if ($levels_to_go[0] != $last_line_leading_level)
|
18344
|
1 |
0 |
if ($rOpts->{'blanks-before-blocks'} and $lc >= $rOpts->{'long-block-line-count'} and $self->consecutive_nonblank_lines >= $rOpts->{'long-block-line-count'} and terminal_type_i(0, $max_index_to_go) ne "}")
|
18363
|
73 |
0 |
if ($special_identifier)
|
18365
|
55 |
18 |
if ($special_identifier eq 'sub') { }
|
|
18 |
0 |
elsif ($special_identifier eq 'package') { }
|
18367
|
22 |
33 |
unless terminal_type_i(0, $max_index_to_go) =~ /^[\;\}\,]$/
|
18380
|
18 |
0 |
unless $self->[93]{$pseqno}
|
18393
|
2 |
0 |
if ($rOpts->{'blank-lines-before-closing-block'} and $block_type_to_go[0] and $block_type_to_go[0] =~ /$blank_lines_before_closing_block_pattern/)
|
18399
|
2 |
0 |
if ($nblanks > $blank_count)
|
18408
|
43 |
3030 |
if ($blank_count)
|
18419
|
2297 |
1629 |
if ($leading_level == $last_line_leading_level and $leading_type ne '#' and defined $nonblank_lines_at_depth[$leading_level]) { }
|
18446
|
3269 |
657 |
if ($max_index_to_go > 0) { }
|
|
494 |
163 |
elsif ($is_unbalanced_batch) { }
|
18460
|
191 |
294 |
if ($block_type and not $lp_object_count_this_batch and $is_block_without_semicolon{$block_type})
|
18466
|
14 |
177 |
if ($leading_type eq '{') { }
|
18469
|
14 |
0 |
if ($rtype_count)
|
18471
|
14 |
0 |
unless ($comma_count)
|
18489
|
56 |
2185 |
if ($is_long_line or $multiple_old_lines_in_batch or $is_unbalanced_batch or $comma_count_in_batch and $rOpts_maximum_fields_per_table > 0 && $rOpts_maximum_fields_per_table <= $comma_count_in_batch || $rOpts_comma_arrow_breakpoints == 0 or $comma_arrow_count_contained and $rOpts_comma_arrow_breakpoints != 3)
|
18526
|
657 |
3269 |
if (not $max_index_to_go) { }
|
18537
|
2158 |
1111 |
if (not +($is_long_line || $saw_good_break || $forced_breakpoint_count) && $rOpts_add_newlines) { }
|
18566
|
0 |
1111 |
unless $called_pad_array_to_go
|
18575
|
501 |
610 |
if @{$ri_first;} >= 3
|
18581
|
731 |
380 |
if $rOpts_recombine and @{$ri_first;} > 1
|
18583
|
81 |
1030 |
if @colon_list
|
18587
|
50 |
3219 |
if %break_before_container_types and $max_index_to_go > 0
|
18592
|
19 |
3250 |
if (not $token_lengths_to_go[$imax] and $types_to_go[$imax] eq ";")
|
18596
|
6 |
3263 |
if ($rOpts_one_line_block_semicolons == 0)
|
18602
|
957 |
2312 |
if ($max_index_to_go > $peak_batch_size)
|
18610
|
134 |
3792 |
if ($lp_object_count_this_batch)
|
18625
|
6 |
3920 |
if ($rOpts_blank_lines_after_opening_block)
|
18627
|
0 |
6 |
if ($types_to_go[$iterm] eq "#" and $iterm > $imin)
|
18629
|
0 |
0 |
if ($types_to_go[$iterm] eq "b" and $iterm > $imin)
|
18634
|
2 |
0 |
if ($types_to_go[$iterm] eq "{" and $block_type_to_go[$iterm] and $block_type_to_go[$iterm] =~ /$blank_lines_after_opening_block_pattern/)
|
18654
|
3915 |
171 |
$i - 1 > 0 && $types_to_go[$i - 1] eq 'b' ? :
|
18676
|
0 |
19 |
unless $type eq ";"
|
18679
|
0 |
19 |
if ($want_left_space{$type} != -1)
|
18709
|
128 |
712 |
unless defined $runmatched_opening_indexes
|
18716
|
149 |
691 |
if ($types_to_go[$max_index_to_go] eq "q")
|
18720
|
32 |
117 |
if ($seqno_qw_opening)
|
18731
|
32 |
815 |
unless ($seqno)
|
18732
|
32 |
0 |
if ($seqno_qw_opening and $_ == $max_index_to_go) { }
|
18756
|
865 |
0 |
if ($seqno)
|
18757
|
865 |
0 |
if ($saved_opening_indentation{$seqno})
|
18794
|
0 |
1397 |
unless (@{$ri_last;})
|
18807
|
183 |
1214 |
if $i_opening < $ri_start->[$nline]
|
18810
|
1397 |
0 |
if ($i_opening <= $ri_last->[-1]) { }
|
18851
|
8 |
61 |
if ($type_i eq "#")
|
18853
|
0 |
8 |
if ($i < $ibeg)
|
18854
|
0 |
0 |
wantarray ? :
|
18860
|
7 |
62 |
if ($type_i eq "b")
|
18862
|
0 |
7 |
if ($i < $ibeg)
|
18863
|
0 |
0 |
wantarray ? :
|
18872
|
1 |
33 |
if ($type_i eq "}" and !$block_type || $is_sort_map_grep_eval_do{$block_type})
|
18880
|
5 |
64 |
wantarray ? :
|
18901
|
224 |
1517 |
if ($is_closing_type{$types_to_go[$max_index_to_go]}) { }
|
|
560 |
957 |
elsif ($is_opening_type{$types_to_go[$max_index_to_go]}) { }
|
18902
|
0 |
224 |
if ($nesting_depth_to_go[$max_index_to_go] <= 0) { }
|
18907
|
0 |
0 |
unless (get_saw_brace_error())
|
18952
|
5 |
3982 |
if $typel eq "-"
|
18953
|
10 |
3977 |
if $typer eq "-"
|
18954
|
4 |
3983 |
if $typel eq "/"
|
18955
|
13 |
3974 |
if $typer eq "/"
|
18957
|
697 |
3290 |
$typel eq 'k' ? :
|
18958
|
56 |
3931 |
$typer eq 'k' ? :
|
18959
|
321 |
65 |
if ($is_chain_operator{$keyl} and $want_break_before{$typel})
|
18960
|
66 |
255 |
if $typel eq "?"
|
18965
|
48 |
3873 |
if ($is_chain_operator{$keyr} and not $want_break_before{$typer})
|
18966
|
1 |
47 |
if $typer eq "?"
|
18972
|
987 |
124 |
unless $count
|
18982
|
110 |
4073 |
$type eq 'k' ? :
|
18983
|
54 |
4129 |
if $key eq "-"
|
18984
|
85 |
4098 |
if $key eq "/"
|
18985
|
193 |
3990 |
if ($saw_chain_type{$key})
|
18992
|
91 |
33 |
unless $count
|
19000
|
0 |
19 |
if ($has_interior_dot_or_plus and $nmax == 1 and @keys == 1)
|
19014
|
71 |
122 |
if ($left_chain_type{$key})
|
19015
|
0 |
71 |
if $nobreak_to_go[$itest - 1]
|
19017
|
131 |
15 |
unless $self->in_same_container_i($i, $itest)
|
19028
|
1 |
14 |
if ($key eq ":" and $levels_to_go[$i] != $levels_to_go[$itest])
|
19032
|
1 |
0 |
if (defined $i_question and $i_question > 0)
|
19041
|
122 |
71 |
if ($right_chain_type{$key})
|
19042
|
0 |
122 |
if $nobreak_to_go[$itest]
|
19044
|
196 |
31 |
unless $self->in_same_container_i($i, $itest)
|
19048
|
0 |
31 |
if ($key eq ":" and $levels_to_go[$i] != $levels_to_go[$itest])
|
19052
|
0 |
0 |
if (defined $i_question)
|
19063
|
20 |
13 |
if (@insert_list)
|
19080
|
0 |
216 |
if $nobreak_to_go[$i_break_left]
|
19088
|
0 |
383 |
if ($line_number >= @{$ri_last;})
|
19101
|
11 |
205 |
if ($types_to_go[$i_break_left] eq "b")
|
19104
|
101 |
0 |
if ($i_break_left >= $i_f and $i_break_left < $i_l and $i_break_right > $i_f and $i_break_right <= $i_l)
|
19143
|
316 |
58 |
if $parent_seqno_to_go[$i2] ne $parent_seqno_1
|
19145
|
52 |
6 |
if ($i2 < $i1)
|
19151
|
0 |
58 |
if $depth_1 < 0
|
19154
|
0 |
58 |
unless $nesting_depth_to_go[$i2] == $depth_1
|
19158
|
55 |
3 |
$type_1 ne ':' ? :
|
19164
|
3 |
323 |
unless defined $KK
|
19165
|
55 |
268 |
if $KK >= $K2
|
19168
|
0 |
268 |
if $depth_i < $depth_1
|
19169
|
217 |
51 |
if $depth_i > $depth_1
|
19170
|
45 |
6 |
if ($type_1 ne ":")
|
19172
|
0 |
45 |
if $tok_i eq "?" or $tok_i eq ":"
|
19183
|
0 |
58 |
if $i2 - $i1 > 200
|
19188
|
1268 |
400 |
if $depth_i > $depth_1
|
19189
|
0 |
400 |
if $depth_i < $depth_1
|
19191
|
11 |
389 |
if $rbreak->{$tok_i}
|
19219
|
0 |
501 |
if $nmax < 2
|
19228
|
41 |
491 |
$typel eq 'k' ? :
|
19231
|
482 |
50 |
unless $has_leading_op
|
19232
|
19 |
31 |
if ($n > 1)
|
19234
|
4 |
15 |
unless $tokenl eq $tokbeg and $nesting_depth_to_go[$il] eq $depth_beg
|
19249
|
1 |
131 |
if ($is_assignment{$type} and $nesting_depth_to_go[$i] eq $depth_beg)
|
19252
|
0 |
1 |
if ($want_break_before{$type}) { }
|
19273
|
4 |
1 |
if ($types_to_go[$i] eq "k" and $tokens_to_go[$i] eq "return" and $ir > $il and $nesting_depth_to_go[$i] eq $depth_beg)
|
19281
|
10 |
5 |
unless @insert_list
|
19296
|
0 |
100 |
if $is_assignment{$type} and $nesting_depth_to_go[$i] eq $depth_beg
|
19302
|
5 |
0 |
if (@insert_list)
|
19372
|
2 |
4 |
if ($type_end eq "#")
|
19374
|
2 |
0 |
if (defined $K_end)
|
19379
|
0 |
6 |
unless $type_end eq "}" and $rLL->[$K_end][5] eq "}"
|
19383
|
0 |
6 |
unless defined $K_semicolon
|
19385
|
0 |
6 |
if $i_semicolon <= $i_beg
|
19386
|
0 |
6 |
unless $rLL->[$K_semicolon][7] eq ";"
|
19390
|
0 |
6 |
if ($types_to_go[$i_semicolon] ne ";")
|
19399
|
0 |
6 |
unless defined $K_opening
|
19401
|
0 |
6 |
if $i_opening < $i_beg
|
19406
|
2 |
20 |
if ($rLL->[$K][7] eq ";")
|
19411
|
2 |
4 |
if $semicolon_count
|
19454
|
1 |
730 |
if $high_stress_level <= 2
|
19457
|
0 |
730 |
if $nmax_start <= 0
|
19460
|
46 |
684 |
if ($types_to_go[$iend_max] eq "#")
|
19488
|
200 |
5116 |
if ($is_math_op{$type} or $is_amp_amp{$type} or $is_assignment{$type} or $type eq ":")
|
19502
|
2584 |
162 |
if ($excess <= 1 or defined $nend_sec and $nn < 5 || $nmax_start - $nn < 5) { }
|
19514
|
29 |
133 |
if (defined $nend_sec)
|
19517
|
19 |
10 |
if ($num > $nmax_section)
|
19525
|
656 |
74 |
if (defined $nend_sec)
|
19528
|
647 |
9 |
if ($num > $nmax_section)
|
19660
|
69 |
2515 |
if ($is_amp_amp{$types_to_go[$ibeg_2]})
|
19668
|
0 |
3020 |
unless $Perl::Tidy::Formatter::b->[1] <=> $Perl::Tidy::Formatter::a->[1]
|
19709
|
685 |
807 |
if ($nmax_batch >= $nmax_last)
|
19720
|
0 |
807 |
if ($rhash->{'_num_compares'} > $max_compares)
|
19778
|
42 |
765 |
if ($rhash->{'_optimization_on'} and $num_joints <= 2)
|
19837
|
389 |
2524 |
if $excess > 0
|
19852
|
609 |
1915 |
if ($n == $nmax)
|
19854
|
39 |
570 |
if ($type_ibeg_2 eq "{")
|
19857
|
1 |
0 |
if ($rOpts_cuddled_paren_brace and $type_iend_1 eq "}" and $iend_1 == $ibeg_1 and $ibeg_2 == $iend_2)
|
19862
|
1 |
0 |
if ($tokens_to_go[$iend_1] eq ")" and $tokens_to_go[$ibeg_2] eq "{")
|
19873
|
38 |
0 |
if $type_iend_1 ne "=>"
|
19890
|
339 |
2146 |
if ($itok)
|
19892
|
167 |
172 |
unless $ok_0
|
19900
|
0 |
78 |
if ($total_weld_count and $type_sequence_to_go[$iend_1] && defined $$rK_weld_right{$K_to_go[$iend_1]} || $type_sequence_to_go[$ibeg_2] && defined $$rK_weld_left{$K_to_go[$ibeg_2]})
|
19921
|
1700 |
618 |
unless $ok_2
|
19932
|
12 |
606 |
if ($skip_Section_3)
|
19943
|
230 |
376 |
unless $ok_3
|
19951
|
227 |
149 |
if $forced_breakpoint_to_go[$iend_1]
|
19977
|
0 |
1 |
if $old_breakpoint_to_go[$iend_1] and not $this_line_is_semicolon_terminated and $n < $nmax and $excess + 4 > 0 and $type_iend_2 ne ","
|
19984
|
138 |
11 |
if ($n < $nmax)
|
19988
|
0 |
5 |
if $levels_to_go[$ibeg_1] < $levels_to_go[$ibeg_2] and $levels_to_go[$ibeg_2] < $levels_to_go[$if_next] and not $n == 1 && $iend_1 - $ibeg_1 <= 2 && $type_ibeg_1 eq 'k' && $tokens_to_go[$ibeg_1] eq 'if' && $tokens_to_go[$iend_1] ne '('
|
20006
|
109 |
40 |
if (not $n_best) { }
|
20016
|
40 |
69 |
if ($rhash->{'_optimization_on'} == 1)
|
20026
|
0 |
40 |
if ($bs > $bs_best or $bs == $bs_best and $n < $n_best)
|
20038
|
122 |
685 |
if ($n_best)
|
20052
|
361 |
365 |
if ($n_old > $n_best)
|
20064
|
69 |
53 |
if (not $rhash->{'_optimization_on'} || $incomplete_loop and $num_bs)
|
20123
|
339 |
0 |
if ($itok)
|
20127
|
103 |
236 |
if ($type eq ':') { }
|
|
87 |
149 |
elsif ($is_math_op{$type}) { }
|
|
60 |
89 |
elsif ($is_amp_amp{$type}) { }
|
|
89 |
0 |
elsif ($is_assignment{$type}) { }
|
20131
|
1 |
102 |
if ($itok eq $iend_1) { }
|
20132
|
1 |
0 |
unless $want_break_before{$type}
|
20135
|
102 |
0 |
if $want_break_before{$type}
|
20163
|
26 |
61 |
if ($types_to_go[$itokp] eq "n")
|
20166
|
2 |
24 |
if ($itokp == $iend_2) { }
|
20181
|
15 |
72 |
if (not $good_combo and $types_to_go[$itokm] eq "n")
|
20184
|
6 |
9 |
if ($itokm == $ibeg_1) { }
|
20201
|
68 |
19 |
unless ($good_combo)
|
20207
|
42 |
26 |
$itok eq $iend_1 ? :
|
20255
|
64 |
23 |
unless ($good_combo)
|
20259
|
40 |
24 |
$itok == $iend_1 ? :
|
20267
|
64 |
23 |
unless $good_combo
|
20315
|
1785 |
533 |
$n < $nmax ? :
|
20324
|
345 |
1973 |
if ($type_iend_1 eq '}') { }
|
|
596 |
1377 |
elsif ($type_iend_1 eq '{') { }
|
|
0 |
1377 |
elsif ($is_amp_amp{$type_iend_1}) { }
|
|
1 |
1376 |
elsif ($type_iend_1 eq '?') { }
|
|
805 |
571 |
elsif ($type_iend_1 eq ',') { }
|
|
0 |
571 |
elsif ($type_iend_1 eq '(') { }
|
|
0 |
571 |
elsif ($type_iend_1 eq ')') { }
|
|
8 |
563 |
elsif ($type_iend_1 eq 'f') { }
|
|
78 |
485 |
elsif ($is_assignment{$type_iend_1}) { }
|
|
26 |
459 |
elsif ($type_iend_1 eq 'k') { }
|
|
0 |
459 |
elsif ($type_iend_1 eq '.') { }
|
20384
|
16 |
329 |
if ($is_amp_amp{$type_ibeg_2})
|
20388
|
5 |
10 |
if ($is_amp_amp{$type_t} or $type_t eq ":")
|
20422
|
7 |
0 |
if ($block_type_to_go[$iend_1] and $rOpts_brace_follower_vertical_tightness > 0 and $tokens_to_go[$iend_2] eq '{' && $block_type_to_go[$iend_1] eq 'eval' && !ref($leading_spaces_to_go[$iend_1]) && !$rOpts_indent_closing_brace || $rOpts_brace_follower_vertical_tightness > 1 && $ibeg_1 == $iend_1 and $type_ibeg_2 =~ /^(\&\&|\|\|)$/ || $type_ibeg_2 eq 'k' && $is_and_or{$tokens_to_go[$ibeg_2]} || $is_if_unless{$tokens_to_go[$ibeg_2]})
|
20454
|
244 |
89 |
unless $skip_Section_3 or $type_ibeg_2 =~ /^[\.\?]$/ or $type_ibeg_2 eq "=="
|
20471
|
585 |
11 |
if $forced_breakpoint_to_go[$iend_1]
|
20476
|
0 |
0 |
unless $want_break_before{$type_iend_1}
|
20484
|
0 |
1 |
if $levels_to_go[$ibeg_1] ne $levels_to_go[$ibeg_2]
|
20487
|
0 |
1 |
unless $type_iend_2 eq ":"
|
20497
|
665 |
140 |
if $old_breakpoint_to_go[$iend_1]
|
20502
|
1 |
139 |
if ($type_ibeg_1 eq '}' and $type_ibeg_2 eq 'i') { }
|
20506
|
1 |
0 |
unless $ibeg_1 == $iend_1 - 1 and $iend_2 == $ibeg_2 + 1 and $this_line_is_semicolon_terminated
|
20519
|
112 |
27 |
if $n + 1 < $nmax
|
20524
|
17 |
10 |
if $levels_to_go[$iend_1] != $levels_to_go[$iend_2]
|
20530
|
0 |
29 |
if ($tokens_to_go[$ii] eq "(")
|
20535
|
0 |
10 |
if $saw_paren
|
20562
|
36 |
42 |
if $old_breakpoint_to_go[$iend_1] and $iend_1 != $ibeg_1
|
20580
|
42 |
0 |
if ($ibeg_1 != $iend_1 and not $is_short_quote and not $is_ternary)
|
20619
|
21 |
21 |
unless $combine_ok
|
20621
|
1 |
20 |
if ($nmax >= $n + 2 and not $ibeg_3 > 0 && ref $leading_spaces_to_go[$ibeg_3] && $type_iend_2 eq ',')
|
20643
|
0 |
1 |
unless $ok
|
20648
|
19 |
2 |
unless ($tokens_to_go[$ibeg_2] =~ /^[\{\(\[]$/)
|
20662
|
11 |
15 |
if $is_last_next_redo_return{$tokens_to_go[$iend_1]} and $n < $nmax
|
20668
|
0 |
15 |
if ($is_and_or{$tokens_to_go[$iend_1]})
|
20670
|
0 |
0 |
unless $want_break_before{$tokens_to_go[$iend_1]}
|
20717
|
0 |
0 |
unless $combine_ok
|
20738
|
0 |
2 |
if ($nesting_depth_to_go[$i] != $depth)
|
20740
|
0 |
0 |
if $tv > 1
|
20747
|
0 |
1 |
if ($tv > 0)
|
20751
|
0 |
0 |
if $tv > 1
|
20756
|
0 |
0 |
$n < $nmax ? :
|
20761
|
0 |
0 |
if ($nesting_depth_to_go[$i] != $depth)
|
20763
|
0 |
0 |
if $tv > 2
|
20770
|
0 |
0 |
if $tv > 2
|
20803
|
496 |
110 |
$n > 1 ? :
|
20804
|
436 |
170 |
$n < $nmax ? :
|
20805
|
312 |
294 |
$n + 2 <= $nmax ? :
|
20814
|
44 |
562 |
if ($is_amp_amp{$type_ibeg_2}) { }
|
|
87 |
475 |
elsif ($type_ibeg_2 eq '?') { }
|
|
144 |
331 |
elsif ($type_ibeg_2 eq '.') { }
|
|
33 |
298 |
elsif ($type_ibeg_2 eq 'k') { }
|
|
0 |
298 |
elsif ($is_amp_amp{$type_ibeg_2}) { }
|
|
11 |
287 |
elsif ($is_assignment{$type_ibeg_2}) { }
|
20851
|
0 |
2 |
if $ibeg_3 < 0 and $type_ibeg_2 eq "&&" and $type_ibeg_1 eq "||" and $nesting_depth_to_go[$ibeg_2] == $nesting_depth_to_go[$ibeg_1]
|
20858
|
43 |
0 |
if not $ok and $want_break_before{$type_ibeg_2}
|
20871
|
15 |
72 |
if $lev ne $levels_to_go[$ibeg_1]
|
20880
|
17 |
55 |
unless $follows_colon or $precedes_colon
|
20883
|
29 |
26 |
unless ($follows_colon)
|
20890
|
34 |
71 |
if $ii >= 0 and $types_to_go[$ii] eq ":" and $levels_to_go[$ii] == $lev
|
20895
|
24 |
5 |
if $local_count <= 1
|
20948
|
95 |
49 |
unless $combine_ok
|
20955
|
8 |
25 |
if ($tokens_to_go[$ibeg_2] eq 'or') { }
|
|
8 |
17 |
elsif ($tokens_to_go[$ibeg_2] eq 'and' or $tokens_to_go[$ibeg_2] eq 'xor') { }
|
|
8 |
9 |
elsif ($is_if_unless{$tokens_to_go[$ibeg_2]}) { }
|
20977
|
4 |
4 |
unless $combine_ok
|
20980
|
3 |
1 |
unless $old_breakpoint_to_go[$iend_1]
|
21011
|
6 |
2 |
unless $this_line_is_semicolon_terminated and ($type_ibeg_1 eq "k" and $is_if_unless{$tokens_to_go[$ibeg_1]} || $tokens_to_go[$ibeg_1] eq 'or')
|
21031
|
1 |
0 |
unless $this_line_is_semicolon_terminated and $type_ibeg_1 eq "k" and $is_and_or{$tokens_to_go[$ibeg_1]}
|
21041
|
8 |
1 |
unless ($is_assignment{$type_iend_1})
|
21043
|
8 |
0 |
if $type_iend_1 ne "k" and $tokens_to_go[$ibeg_2] ne "while"
|
21065
|
0 |
0 |
unless $this_line_is_semicolon_terminated and $type_ibeg_1 eq "k" and $is_if_unless{$tokens_to_go[$ibeg_1]}
|
21072
|
0 |
11 |
unless $n == 1 or $n == $nmax
|
21073
|
0 |
11 |
if $old_breakpoint_to_go[$iend_1]
|
21078
|
10 |
0 |
unless $nmax == 2 or $nmax == 3 and $types_to_go[$ibeg_nmax] eq ";" or $type_iend_2 eq "h" or $n == $nmax and $this_line_is_semicolon_terminated
|
21116
|
35 |
229 |
if $typel eq "?"
|
21117
|
1 |
228 |
if $typer eq "?"
|
21118
|
20 |
208 |
if ($typel eq ":")
|
21119
|
1 |
207 |
if ($typer eq ":")
|
21126
|
20 |
25 |
if ($i_first_colon > 0)
|
21128
|
12 |
8 |
if (defined $i_question and $i_question > 0)
|
21145
|
1 |
7 |
if ($type eq ',' || $type eq 'k' && ($nmax > 1 && $token eq 'return') and $self->in_same_container_i($ii, $i_question))
|
21159
|
1 |
11 |
if (@insert_list)
|
21176
|
0 |
50 |
unless %break_before_container_types
|
21179
|
0 |
50 |
if $nmax < 0
|
21192
|
21 |
122 |
if $ir <= $il
|
21199
|
4 |
118 |
if ($type_end eq "#")
|
21201
|
0 |
4 |
unless defined $Kend
|
21206
|
0 |
122 |
if ($total_weld_count)
|
21208
|
0 |
0 |
if (defined $Kend_test and $Kend_test > $Kl)
|
21215
|
0 |
0 |
if defined $Kend_test
|
21219
|
92 |
30 |
unless $is_opening_token{$token}
|
21220
|
0 |
30 |
if $Kl >= $Kend - 1
|
21223
|
0 |
30 |
unless defined $seqno
|
21226
|
16 |
14 |
unless $rbreak_before_container_by_seqno->{$seqno}
|
21231
|
0 |
14 |
if $ibreak < $il
|
21232
|
0 |
14 |
if $nobreak_to_go[$ibreak]
|
21237
|
10 |
40 |
if (@insert_list)
|
21246
|
16 |
3 |
if ($self->[53] == 0)
|
21257
|
2 |
11 |
if ($self->[56] == 0)
|
21269
|
0 |
0 |
unless ($self->[60])
|
21273
|
0 |
0 |
if ($self->[59] <= 6)
|
21305
|
5 |
129 |
if (@{$ri_starting_one_line_block;})
|
21330
|
804 |
3065 |
unless ref $indentation
|
21333
|
2457 |
608 |
if $indentation->get_marked
|
21340
|
379 |
229 |
unless $align_seqno
|
21345
|
229 |
0 |
if (defined $Ko and defined $Kc)
|
21346
|
99 |
130 |
if $Ko >= $K_to_go[$ibeg] and $Kc <= $K_to_go[$iend]
|
21365
|
50 |
80 |
if ($line == 1 and $i == $ibeg)
|
21378
|
118 |
12 |
if ($i == $ibeg) { }
|
21381
|
7 |
111 |
if ($line == 0) { }
|
21387
|
7 |
0 |
if (defined $indent)
|
21407
|
89 |
22 |
if $types_to_go[$iendm + 1] eq "b"
|
21422
|
10 |
2 |
if ($closing_index > $iend)
|
21424
|
9 |
1 |
if ($ci_levels_to_go[$ibeg_next] > 0)
|
21443
|
52 |
78 |
if ($move_right == 0)
|
21451
|
68 |
10 |
unless defined $collapsed_length
|
21461
|
10 |
68 |
if ($closing_index < 0 and not $collapsed_length)
|
21482
|
67 |
1 |
if ($have_child or $move_right > 0)
|
21487
|
3 |
64 |
if ($Kc > $K_to_go[$max_index_to_go])
|
21491
|
61 |
6 |
if ($i == $ibeg)
|
21493
|
60 |
1 |
if ($length > $max_length)
|
21500
|
60 |
463 |
if $closing_index <= $ibeg_t
|
21509
|
96 |
367 |
if ($length_t > $max_length)
|
21517
|
0 |
67 |
if ($right_margin < 0)
|
21540
|
62 |
6 |
if ($move_right < 0 or $rOpts_extended_line_up_parentheses and $Kc > $K_to_go[$max_index_to_go] or $closing_index < 0 or $comma_count == 0 or $comma_count > 0 and not $is_vertically_aligned) { }
|
21558
|
36 |
26 |
$move_right <= $right_margin ? :
|
21592
|
0 |
5 |
unless @ilist
|
21601
|
6 |
9 |
if $inext > $iend
|
21605
|
7 |
2 |
ref $leading_spaces_to_go[$ibeg] ? :
|
21610
|
0 |
9 |
if ($excess > 0)
|
21613
|
0 |
0 |
if ($available_spaces > 0)
|
21624
|
0 |
4 |
if $inext <= $iend
|
21625
|
4 |
0 |
if $inext > $iend
|
21627
|
5 |
4 |
if $inext <= $iend
|
21654
|
0 |
9 |
if $max_line <= $line_open
|
21667
|
0 |
9 |
if ($ibeg eq $closing_index)
|
21668
|
0 |
9 |
if $lev_start != $levels_to_go[$ibeg]
|
21669
|
9 |
0 |
if $ci_start_plus != $ci_levels_to_go[$ibeg]
|
21670
|
0 |
0 |
if $closing_index <= $iend
|
21728
|
1 |
1110 |
if ($types_to_go[0] eq ":")
|
21734
|
13 |
1098 |
if (@{$rbond_strength_bias;})
|
21737
|
31 |
0 |
if ($ii >= 0 and $ii <= $max_index_to_go) { }
|
21754
|
0 |
1111 |
if ($types_to_go[$imin] eq "b")
|
21755
|
0 |
1111 |
if ($types_to_go[$imax] eq "b")
|
21766
|
9 |
196 |
if ($_ eq $last_tok)
|
21796
|
439 |
3514 |
if (@{$rcolon_list;})
|
21805
|
383 |
56 |
unless ($is_colon_chain)
|
21807
|
1769 |
66 |
unless $tokens_to_go[$i] eq "?"
|
21811
|
0 |
66 |
if $tokens_to_go[$max_index_to_go] eq "#" and not terminal_type_i(0, $max_index_to_go) =~ /^[\;\}]$/
|
21817
|
61 |
5 |
if defined $mate_index_to_go[$i] and $mate_index_to_go[$i] <= $i_next_nonblank
|
21821
|
4 |
1 |
if ($want_break_before{'?'})
|
21836
|
32 |
407 |
if ($next_nonblank_type eq '?') { }
|
|
4 |
403 |
elsif ($types_to_go[$i_lowest] eq '?') { }
|
21851
|
88 |
351 |
if ($next_nonblank_type eq ':') { }
|
|
4 |
347 |
elsif ($types_to_go[$i_lowest] eq ':') { }
|
21866
|
0 |
3953 |
if ($i_lowest <= $i_last_break)
|
21879
|
0 |
3953 |
$types_to_go[$i_begin] eq 'b' ? :
|
21881
|
281 |
3672 |
$types_to_go[$i_lowest] eq 'b' ? :
|
21886
|
10 |
3943 |
if ($tokens_to_go[$i_lowest] eq '{' || $tokens_to_go[$i_lowest] eq '[' and not $forced_breakpoint_to_go[$i_lowest])
|
21903
|
2295 |
1658 |
if ($i_begin <= $imax and $types_to_go[$i_begin] eq "b")
|
21916
|
49 |
1062 |
if (@i_colon_breaks)
|
21918
|
38 |
11 |
unless ($is_chain)
|
21988
|
0 |
3953 |
if ($types_to_go[$i_begin] eq "i" and substr($tokens_to_go[$i_begin], 0, 1) =~ /\w/)
|
21992
|
0 |
0 |
if ($tokens_to_go[$i_next_nonblank] eq "(")
|
22002
|
521 |
38 |
if ($i_begin < $imax and $tokens_to_go[$i_begin] eq $types_to_go[$i_begin] and not $forced_breakpoint_to_go[$i_begin] and not $tokens_to_go[$i_begin] eq '}' && $block_type_to_go[$i_begin] && $block_type_to_go[$i_begin] eq 'eval' and $leading_spaces + $summed_lengths_to_go[$i_begin + 1] - $starting_sum < $maximum_line_length)
|
22052
|
10915 |
22348 |
if ($type eq "b")
|
22055
|
503 |
32760 |
if ($old_breakpoint_to_go[$i_test] and $type eq ',' and not $want_break_before{$type} and $i_next_nonblank <= $imax and $want_break_before{$next_nonblank_type} || $token_lengths_to_go[$i_next_nonblank] > 2 || $next_nonblank_type eq ',' || $is_opening_type{$next_nonblank_type}) { }
|
22087
|
323 |
32437 |
if ($len >= $maximum_line_length)
|
22116
|
28 |
10 |
if ($strength <= $lowest_strength and $nesting_depth_to_go[$i_begin] > $nesting_depth_to_go[$i_next_nonblank] and $next_nonblank_type =~ /^(\.|\&\&|\|\|)$/ || $next_nonblank_type eq 'k' && $is_and_or{$next_nonblank_token})
|
22136
|
28 |
30560 |
if ($forced_breakpoint_to_go[$i_test] or $line_count and $token eq ")" and $next_nonblank_type eq "{" and $next_nonblank_block_type and $next_nonblank_block_type ne $tokens_to_go[$i_begin] and not +($next_nonblank_block_type =~ /$SUB_PATTERN/ || $matches_ASUB{$next_nonblank_block_type}) && $nesting_depth_to_go[$i_begin] == $nesting_depth_to_go[$i_next_nonblank] and not $rOpts_opening_brace_always_on_right or $type eq "{" and $i_test == $imax)
|
22185
|
2703 |
0 |
if ($strength < 9999)
|
22195
|
45 |
2978 |
if ($next_nonblank_type eq ';' || $next_nonblank_type eq ',' and not $must_break and $leading_spaces + $summed_lengths_to_go[$i_next_nonblank + 1] - $starting_sum > $maximum_line_length)
|
22207
|
11 |
34 |
if ($i_lowest >= 0)
|
22218
|
14265 |
18987 |
if ($strength <= $lowest_strength and $strength < 10000)
|
22223
|
108 |
14157 |
if ($leading_alignment_type)
|
22237
|
6 |
0 |
if ($i_test == $imax and not $forced_breakpoint_count and $saw_good_break and $type =~ /^[#;\{]$/ and $i_last_break < 0 and $i_lowest >= 0 and $i_lowest < $imax - 1 and $strength - $lowest_strength < "0.4")
|
22269
|
6 |
308 |
if ($line_count > 2 and $i_lowest >= 0 and $i_lowest < $i_test and $i_test > $imax - 2 and $nesting_depth_to_go[$i_begin] > $nesting_depth_to_go[$i_lowest] and $lowest_strength < $last_break_strength - "0.4")
|
22282
|
3 |
3 |
if ($types_to_go[$il] =~ m[^[/\*\+\-\%]$] or $types_to_go[$ir] =~ m[^[/\*\+\-\%]$])
|
22295
|
2703 |
11445 |
if ($must_break)
|
22304
|
3515 |
4508 |
if ($line_count > 0 and $i_test < $imax and $lowest_strength - $last_break_strength <= "0.001")
|
22311
|
109 |
0 |
if ($tok_beg eq $next_nonblank_token and $is_chain_operator{$tok_beg} and $type_beg eq 'k' || $type_beg eq $tok_beg and $nesting_depth_to_go[$i_begin] >= $nesting_depth_to_go[$i_next_nonblank] or $tokens_to_go[$i_last_end] eq $token and $is_chain_operator{$token} and $type eq 'k' || $type eq $token and $nesting_depth_to_go[$i_last_end] >= $nesting_depth_to_go[$i_test])
|
22340
|
647 |
29785 |
if $i_test >= $imax
|
22349
|
29207 |
578 |
if ($excess < 0) { }
|
|
157 |
421 |
elsif ($excess == 0) { }
|
22369
|
115 |
42 |
if ($i_test + 1 < $imax and $next_nonblank_type ne ',' and not $is_closing_type{$next_nonblank_type}) { }
|
22404
|
3 |
87 |
if ($i_lowest == $i_test and $token_lengths_to_go[$i_test] > 1 and $next_nonblank_type eq ';' || $next_nonblank_type eq ',' and $rOpts_fuzzy_line_length)
|
22416
|
475 |
58 |
if ($i_lowest >= 0)
|
22431
|
0 |
3953 |
if ($i_lowest < 0)
|
22447
|
57 |
8 |
if (defined $i_question)
|
22448
|
56 |
1 |
if ($want_break_before{'?'})
|
22452
|
57 |
0 |
if ($i_question >= 0)
|
22573
|
31 |
529 |
if ($rOpts_line_up_parentheses)
|
22576
|
3 |
28 |
if ($rOpts_extended_continuation_indentation) { }
|
22585
|
168 |
0 |
unless $closing_vertical_tightness{$_}
|
22604
|
2367 |
0 |
if ($depth_t < $minimum_depth)
|
22613
|
0 |
2367 |
if ($rOpts_comma_arrow_breakpoints == 3 and $seqno)
|
22636
|
885 |
1482 |
if ($changed_seqno or not defined $has_broken_sublist[$depth_t])
|
22657
|
543 |
0 |
if ($item_count_stack[$dd])
|
22665
|
543 |
0 |
$seqno ? :
|
22668
|
40 |
503 |
if ($dont_align[$dd]) { }
|
|
497 |
6 |
elsif ($real_comma_count) { }
|
22699
|
251 |
246 |
if $must_break_open
|
22752
|
34 |
55 |
if ($old_breakpoint_to_go[$ii])
|
22804
|
0 |
40 |
if ($ci_start and $rOpts_extended_continuation_indentation)
|
22806
|
0 |
0 |
if ($self->[74]{$K0})
|
22808
|
8 |
27 |
if (not $ci_start and $old_breakpoint_to_go[$i_first_comma] and $level_comma == $levels_to_go[0])
|
22815
|
3 |
59 |
if ($old_breakpoint_to_go[$ii])
|
22817
|
0 |
3 |
if $obp_count > 1
|
22818
|
3 |
0 |
if $levels_to_go[$ii] == $level_comma
|
22824
|
3 |
0 |
if ($ibreak >= 0 and $obp_count == 1 and $old_comma_break_count > 0)
|
22827
|
0 |
3 |
if $types_to_go[$ibreak_m] eq "b"
|
22828
|
3 |
0 |
if ($ibreak_m >= 0)
|
22850
|
3 |
0 |
if ($is_uncontained_comma_break_included_type{$type_m})
|
22858
|
0 |
3 |
if (not $rOpts_break_at_old_ternary_breakpoints and $ibreak_p <= $max_index_to_go)
|
22865
|
3 |
0 |
unless $no_break
|
22903
|
69 |
0 |
if ($item_count_stack[$dd] == 0 and $is_logical_container{$container_type[$dd]} or $has_old_logical_breakpoints[$dd])
|
22915
|
42 |
168 |
if ($rand_or_list[$dd][$i])
|
22978
|
1741 |
0 |
if $current_depth < $minimum_depth
|
22990
|
22139 |
12704 |
if ($type ne "b")
|
23011
|
17 |
34826 |
if ($i_want_previous_break >= 0)
|
23019
|
2492 |
32351 |
if ($old_breakpoint_to_go[$i])
|
23025
|
12704 |
22139 |
if $type eq "b"
|
23036
|
134 |
22005 |
if ($type eq "#")
|
23037
|
0 |
134 |
if ($i != $max_index_to_go)
|
23051
|
8 |
4 |
if ($type eq "k" and $i > 0 and $is_if_unless_while_until_for_foreach{$token} and $last_nonblank_type ne 'n' || $i > 2 and !$last_nonblank_block_type || $last_nonblank_block_type ne 'do' and $is_long_line || $next_nonblank_token eq '(' && (!defined($mate_index_to_go[$i_next_nonblank]) || $mate_index_to_go[$i_next_nonblank] < $i))
|
23084
|
61 |
22078 |
if ($type eq '||') { }
|
|
55 |
22023 |
elsif ($type eq '&&') { }
|
|
28 |
21995 |
elsif ($type eq 'f') { }
|
|
1371 |
20624 |
elsif ($type eq 'k') { }
|
|
505 |
20119 |
elsif ($is_assignment{$type}) { }
|
23086
|
29 |
32 |
if $i == $i_line_start || $i == $i_line_end and $rOpts_break_at_old_logical_breakpoints
|
23092
|
26 |
29 |
if $i == $i_line_start || $i == $i_line_end and $rOpts_break_at_old_logical_breakpoints
|
23100
|
44 |
1327 |
if ($token eq 'and') { }
|
|
40 |
1287 |
elsif ($token eq 'or') { }
|
|
120 |
1167 |
elsif ($token eq 'if' or $token eq 'unless') { }
|
23102
|
19 |
25 |
if $i == $i_line_start || $i == $i_line_end and $rOpts_break_at_old_logical_breakpoints
|
23112
|
15 |
25 |
if $i == $i_line_start || $i == $i_line_end and $rOpts_break_at_old_logical_breakpoints
|
23115
|
9 |
31 |
if ($is_logical_container{$container_type[$depth]}) { }
|
23118
|
16 |
15 |
if ($is_long_line) { }
|
|
4 |
11 |
elsif ($i == $i_line_start || $i == $i_line_end and $rOpts_break_at_old_logical_breakpoints) { }
|
23131
|
7 |
113 |
if ($i == $i_line_start || $i == $i_line_end and $rOpts_break_at_old_logical_breakpoints)
|
23151
|
6133 |
16006 |
if ($type_sequence)
|
23161
|
3018 |
19121 |
if ($depth == $current_depth + 1 and $is_opening_type{$type}) { }
|
|
2855 |
16266 |
elsif ($depth == $current_depth - 1 and $is_closing_type{$type}) { }
|
23190
|
17189 |
4950 |
unless $quick_filter{$type}
|
23197
|
1454 |
3496 |
if ($is_non_list_type{$type}) { }
|
|
2396 |
1100 |
elsif ($type eq ',') { }
|
|
984 |
116 |
elsif ($type eq '=>') { }
|
|
116 |
0 |
elsif ($type eq '.') { }
|
23198
|
1444 |
10 |
unless ($self->is_in_list_by_i($i))
|
23204
|
28 |
1416 |
if ($type eq "f")
|
23215
|
0 |
984 |
if $last_nonblank_type eq "=>"
|
23216
|
6 |
978 |
if $rOpts_break_at_old_comma_breakpoints
|
23218
|
0 |
978 |
if $rOpts_comma_arrow_breakpoints == 3 and not defined $override_cab3[$depth]
|
23247
|
789 |
1741 |
if $dd < $current_depth
|
23248
|
90 |
2440 |
if $item_count_stack[$dd]
|
23250
|
46 |
2484 |
if $has_old_logical_breakpoints[$dd]
|
23256
|
789 |
1741 |
if (defined $i_opening and $i_opening >= 0)
|
23268
|
769 |
20 |
unless $no_break
|
23279
|
31 |
1710 |
if ($has_old_logical_breakpoints[$current_depth]) { }
|
|
12 |
1698 |
elsif ($i_old_assignment_break and $total_depth_variation > 4 and $old_breakpoint_count == 1 and $i_old_assignment_break < $max_index_to_go) { }
|
23318
|
610 |
1786 |
if ($want_comma_break[$depth])
|
23320
|
145 |
465 |
if ($next_nonblank_type =~ /^[\)\}\]R]$/)
|
23321
|
145 |
0 |
if ($rOpts_comma_arrow_breakpoints)
|
23327
|
465 |
0 |
unless $next_nonblank_type eq "#"
|
23340
|
460 |
5 |
if ($ibreak > 0 and not $tokens_to_go[$ibreak + 1] =~ /^[\)\}\]]$/)
|
23343
|
142 |
318 |
if ($tokens_to_go[$ibreak] eq "-")
|
23344
|
451 |
9 |
if ($types_to_go[$ibreak] eq "b")
|
23345
|
453 |
7 |
if ($types_to_go[$ibreak] =~ /^[,wiZCUG\(\{\[]$/)
|
23354
|
453 |
0 |
if ($tokens_to_go[$ibreak + 1] ne "->" and $tokens_to_go[$ibreak + 1] ne ",")
|
23374
|
8 |
11 |
if ($depth < $starting_depth and $comma_follows_last_closing_token and not $dont_align[$depth])
|
23378
|
8 |
0 |
unless $next_nonblank_type eq "#"
|
23385
|
543 |
1235 |
if ($item_count == 0)
|
23392
|
29 |
514 |
if ($opening_structure_index_stack[$depth] < 0 and $self->is_in_block_by_i($i))
|
23401
|
411 |
1367 |
if ($last_nonblank_type =~ /^[iR\]]$/)
|
23453
|
29 |
2463 |
if ($type eq 'k') { }
|
23456
|
150 |
2342 |
if ($next_nonblank_type eq 'k') { }
|
23463
|
6 |
2486 |
if ($poor_break)
|
23480
|
2484 |
2 |
if ($rOpts_break_at_old_keyword_breakpoints)
|
23481
|
12 |
0 |
if ($next_nonblank_type eq "k" and $is_keyword_returning_list{$next_nonblank_token} and $type =~ /^[=\)\]\}Riw]$/ || $type eq 'k' && $is_keyword_returning_list{$token})
|
23501
|
12 |
0 |
unless $skip
|
23508
|
2482 |
4 |
if ($rOpts_break_at_old_attribute_breakpoints)
|
23509
|
5 |
2477 |
if ($next_nonblank_type eq "A")
|
23517
|
73 |
2413 |
if ($is_assignment{$type}) { }
|
|
0 |
2413 |
elsif ($is_assignment{$next_nonblank_type}) { }
|
23538
|
2985 |
3148 |
if ($is_closing_sequence_token{$token}) { }
|
23540
|
130 |
2855 |
if ($type eq ":")
|
23544
|
73 |
1 |
if ($i == $i_line_start || $i == $i_line_end and $rOpts_break_at_old_ternary_breakpoints and $levels_to_go[$i] < $high_stress_level)
|
23555
|
6 |
67 |
unless (defined $mix)
|
23556
|
17 |
56 |
if ($ieq > 0 and $ieq < $mix)
|
23564
|
729 |
2256 |
if (has_postponed_breakpoint($type_sequence))
|
23565
|
12 |
717 |
$type eq ':' ? :
|
23566
|
266 |
463 |
if ($i >= $inc)
|
23578
|
130 |
3018 |
if ($token eq '?') { }
|
23580
|
0 |
118 |
if (not defined $i_colon or $i == 0 or $i == $max_index_to_go)
|
23592
|
8 |
4 |
if ($i_last_colon < 0 || $parent_seqno_to_go[$i_last_colon] != $parent_seqno_to_go[$i] and $tokens_to_go[$max_index_to_go] ne "#")
|
23615
|
26 |
2992 |
if ($rOpts_extended_line_up_parentheses and not defined $mate_index_to_go[$i])
|
23620
|
13 |
13 |
if ($lp_object)
|
23647
|
0 |
3018 |
if ($rOpts_comma_arrow_breakpoints == 3 and $type_sequence)
|
23656
|
890 |
2128 |
$is_container_label_type{$last_nonblank_type} ? :
|
23677
|
610 |
2408 |
if ($next_nonblank_type eq "b" or $next_nonblank_type eq "#")
|
23713
|
4 |
0 |
if ($block_type and $last_nonblank_token eq ")" and not defined $mate_index_to_go[$i_last_nonblank_token] and not $rOpts_opening_brace_always_on_right and $type eq "{" and $token eq "{")
|
23747
|
626 |
2229 |
if $depth < $minimum_depth
|
23758
|
4 |
0 |
if ($token eq ")" and $next_nonblank_block_type and $interrupted_list[$current_depth] and $next_nonblank_type eq "{" and not $rOpts_opening_brace_always_on_right)
|
23773
|
453 |
2402 |
if $item_count_stack[$current_depth]
|
23785
|
279 |
2576 |
if ($rOpts_line_up_parentheses and $saw_opening_structure)
|
23806
|
0 |
2855 |
if ($cab_flag == 3 and $type_sequence)
|
23808
|
0 |
0 |
if (defined $test_cab)
|
23815
|
1925 |
930 |
if ($type_sequence and not $self->[36]{$type_sequence})
|
23826
|
29 |
2200 |
if ($saw_opening_structure and not $lp_object and $levels_to_go[$i_opening] >= $high_stress_level)
|
23847
|
430 |
1656 |
if (not $is_long_term and $saw_opening_structure and $is_opening_token{$tokens_to_go[$i_opening]} and $index_before_arrow[$depth + 1] > 0 and not $opening_vertical_tightness{$tokens_to_go[$i_opening]})
|
23861
|
1949 |
906 |
if (not $is_long_term and $saw_opening_structure)
|
23872
|
25 |
92 |
if (ref $indentation and $self->[18]{$type_sequence})
|
23878
|
0 |
25 |
if ($diff > 0)
|
23884
|
25 |
0 |
if ($lp_tol_boost and $lp_object and $rOpts_extended_continuation_indentation || !$self->[36]{$type_sequence})
|
23900
|
0 |
509 |
if (not $ci_levels_to_go[$i_opening] and $self->[90]{$type_sequence})
|
23915
|
96 |
1611 |
if ($cab_flag != 0 and $cab_flag != 4 and $saw_opening_structure and $old_breakpoint_count_stack[$current_depth] == $last_old_breakpoint_count || $cab_flag == 2 and $breakpoint_undo_stack[$current_depth] < $forced_breakpoint_undo_count and not $is_long_term)
|
24047
|
0 |
2855 |
if ($saw_opening_structure and $rOpts_break_open_compact_parens)
|
24056
|
0 |
0 |
if ($flag eq '*' or $flag eq '1') { }
|
24072
|
204 |
1606 |
if ($item_count_stack[$current_depth] == 0 and $saw_opening_structure and $tokens_to_go[$i_opening] eq "(" and $is_logical_container{$container_type[$current_depth]})
|
24081
|
191 |
13 |
if (not $has_comma_breakpoints) { }
|
24096
|
4 |
2851 |
if ($is_long_term and @{$rfor_semicolon_list[$current_depth];})
|
24103
|
3 |
1 |
unless $lp_object
|
24110
|
681 |
2174 |
if (not $block_type || $is_simple_logical_expression and $has_comma_breakpoints || !$saw_opening_structure || $is_long_term && !$self->is_in_block_by_i($i_opening)) { }
|
|
10 |
2164 |
elsif ($is_simple_logical_expression and $has_old_logical_breakpoints[$current_depth]) { }
|
|
78 |
2086 |
elsif ($is_long_term) { }
|
24145
|
96 |
585 |
if ($lp_object)
|
24153
|
681 |
0 |
if ($minimum_depth <= $current_depth)
|
24155
|
485 |
196 |
if ($i_opening >= 0)
|
24156
|
445 |
0 |
unless ($do_not_break_apart or is_unbreakable_container($current_depth))
|
24165
|
0 |
0 |
if ($is_long_term and $types_to_go[$i_opening] eq "L" and $opening_vertical_tightness{'{'} and $closing_vertical_tightness{'}'})
|
24171
|
0 |
0 |
if ($seqno)
|
24179
|
107 |
574 |
if ($last_comma_index[$depth])
|
24184
|
5 |
676 |
if ($last_dot_index[$depth])
|
24192
|
427 |
254 |
if ($i_opening > 2)
|
24193
|
219 |
208 |
$types_to_go[$i_opening - 1] eq 'b' ? :
|
24200
|
11 |
416 |
if ($type_prev eq ',' and $types_to_go[$i_prev - 1] eq ')' || $types_to_go[$i_prev - 1] eq '}') { }
|
|
6 |
410 |
elsif ($type_prev =~ /^([k\:\?]|&&|\|\|)$/ and $want_break_before{$token_prev}) { }
|
24223
|
79 |
602 |
if ($types_to_go[$i + 1] eq ",")
|
24228
|
0 |
681 |
if ($is_assignment{$next_nonblank_type} and $breakpoint_stack[$current_depth] != $forced_breakpoint_count)
|
24244
|
25 |
656 |
if (defined $icomma and $i_opening - $icomma < 5)
|
24245
|
0 |
25 |
unless ($forced_breakpoint_to_go[$icomma])
|
24303
|
22 |
2242 |
if ($i_opening_minus <= 0)
|
24309
|
1188 |
1054 |
if ($type_prev_nb eq "b" and $iprev_nb > 0)
|
24314
|
182 |
2060 |
if ($type_prev_nb eq ',') { }
|
|
1700 |
360 |
elsif ($tokens_to_go[$i_opening_paren] eq '(' or $is_kwiZ{$type_prev_nb}) { }
|
24335
|
1400 |
2339 |
if ($is_key_type{$types_to_go[$j]})
|
24338
|
106 |
1294 |
if ($types_to_go[$j] eq "=")
|
24343
|
61 |
1639 |
if ($types_to_go[$i_opening_minus] eq "b")
|
24400
|
8 |
489 |
unless defined $rhash_A
|
24418
|
80 |
409 |
if ($has_broken_sublist)
|
24430
|
93 |
315 |
if ($rOpts_break_at_old_comma_breakpoints or $interrupted or $i_opening_paren < 0)
|
24449
|
0 |
0 |
if ($break_before_container_types{$opening_token} and $container_indentation_options{$opening_token} and $container_indentation_options{$opening_token} == 2)
|
24456
|
0 |
0 |
if ($tol < $rOpts_continuation_indentation)
|
24463
|
20 |
295 |
if ($rOpts_delete_trailing_commas and $rOpts_add_trailing_commas)
|
24470
|
180 |
135 |
if $excess + $tol <= 0
|
24506
|
0 |
80 |
if ($rOpts_maximum_fields_per_table and $fields > $rOpts_maximum_fields_per_table)
|
24518
|
25 |
173 |
if ($j < $item_count and $ri_term_end->[$j] == $ri_term_begin->[$j] and $ritem_lengths->[$j] <= $small_length)
|
24524
|
80 |
198 |
if $j == 0
|
24525
|
6 |
192 |
if ($is_simple_last_term and $is_simple_next_term and $skipped_count < $max_skipped_count) { }
|
24534
|
65 |
127 |
unless defined $i_tc
|
24542
|
8 |
72 |
if ($interrupted)
|
24613
|
2 |
5 |
if ($number_of_fields_best == 1 or $in_hierarchical_list or $comma_count > 1 and not $long_last_term || $long_first_term) { }
|
|
2 |
3 |
elsif ($long_last_term) { }
|
|
3 |
0 |
elsif ($long_first_term) { }
|
24634
|
1 |
1 |
unless $must_break_open
|
24702
|
18 |
117 |
if ($is_lp_formatting and not $must_break_open)
|
24714
|
10 |
125 |
unless defined $hash_B
|
24743
|
66 |
34 |
$packed_lines == 2 ? :
|
|
8 |
100 |
$packed_lines == 1 ? :
|
|
17 |
108 |
$item_count < 3 ? :
|
24750
|
107 |
18 |
if ($opening_token eq "(")
|
24756
|
0 |
107 |
if ($rOpts_break_open_compact_parens)
|
24763
|
0 |
0 |
if ($flag eq '*' or $flag eq '1') { }
|
|
0 |
0 |
elsif ($flag eq '0') { }
|
24784
|
55 |
19 |
if ($packed_lines <= 2 and $item_count < 9 and $opening_is_in_block and $two_line_word_wrap_ok)
|
24794
|
5 |
6 |
if ($is_lp_formatting and $item_count == 2 and not $must_break_open)
|
24809
|
26 |
24 |
if ($number_of_fields == 2 and $item_count == 3 or $new_identifier_count > 0 and $sparsity > "0.15")
|
24820
|
1 |
25 |
if $use_separate_first_term
|
24825
|
23 |
3 |
unless ($must_break_open)
|
24826
|
22 |
1 |
if ($break_count <= 1 or $is_lp_formatting and not $need_lp_break_open)
|
24868
|
1 |
0 |
if (not $too_long and $i_opening_paren > 0 and $opening_token eq "(")
|
24877
|
0 |
0 |
if (not $too_long and $i_opening_paren > 0 and $list_type eq "=>")
|
24879
|
0 |
0 |
if ($i_opening_minus >= 0)
|
24899
|
12 |
82 |
if ($formatted_lines < 3 and $packed_lines < $formatted_lines or $formatted_lines < 2 or $unused_columns > $max_allowed_sparsity * $formatted_columns)
|
24909
|
0 |
12 |
if ($packed_lines > 2 and $item_count > 10) { }
|
24919
|
0 |
12 |
if $use_separate_first_term
|
24921
|
0 |
12 |
unless ($must_break_open_container)
|
24922
|
0 |
0 |
if ($break_count <= 1 or $is_lp_formatting and not $need_lp_break_open)
|
24958
|
0 |
497 |
if $item_count < 1
|
24963
|
21 |
476 |
if ($i_last_comma >= $max_index_to_go)
|
24965
|
8 |
13 |
if $item_count < 1
|
24988
|
1 |
1661 |
$i == 0 || $types_to_go[$i - 1] eq 'b' ? :
|
24992
|
1575 |
87 |
$types_to_go[$i_prev_plus] eq 'b' ? :
|
25005
|
489 |
1173 |
if ($j == 0) { }
|
25010
|
562 |
611 |
if ($length > $rmax_length->[$is_odd])
|
25019
|
484 |
5 |
$types_to_go[$i_last_comma + 1] eq 'b' ? :
|
25023
|
402 |
87 |
$types_to_go[$i_closing_paren - 1] eq 'b' ? :
|
25031
|
416 |
73 |
if ($last_item_length > 0)
|
25042
|
360 |
56 |
if ($last_item_length > $rmax_length->[$i_odd])
|
25049
|
144 |
272 |
if ($types_to_go[$i_b + 1] =~ /^[iR\]]$/)
|
25055
|
50 |
439 |
if ($i_effective_last_comma >= $max_index_to_go)
|
25120
|
4 |
4 |
if ($identifier_count >= $item_count - 1 or $is_assignment{$next_nonblank_type} or $list_type and $list_type ne "=>" and not $list_type =~ /^[\:\?]$/)
|
25144
|
135 |
0 |
unless ($use_separate_first_term)
|
25145
|
4 |
131 |
if ($is_keyword_with_special_leading_term{$list_type})
|
25149
|
3 |
1 |
if ($item_count < 3) { }
|
|
1 |
0 |
elsif ($first_term_length < 20 and $i_first_comma - $i_opening_paren < 4) { }
|
25150
|
3 |
0 |
if ($i_first_comma - $i_opening_paren < 4)
|
25158
|
1 |
0 |
if ($first_term_length < $columns)
|
25169
|
4 |
131 |
if ($use_separate_first_term) { }
|
25180
|
3 |
1 |
if $item_count <= 1
|
25192
|
44 |
87 |
if ($first_term_length > $rmax_length->[0])
|
25199
|
75 |
57 |
$rmax_length->[0] > $rmax_length->[1] ? :
|
25212
|
0 |
0 |
if ($rOpts_variable_maximum_line_length and $tokens_to_go[$i_opening_paren] eq "(" and @{$ri_term_begin;})
|
25221
|
0 |
0 |
if ($type eq "w")
|
25251
|
18 |
114 |
if ($number_of_fields_best != 0 and $number_of_fields_best < $number_of_fields_max) { }
|
|
0 |
114 |
elsif ($number_of_fields_best > 1 and $number_of_fields_best > $number_of_fields_max) { }
|
25269
|
16 |
19 |
if ($is_lp_formatting and $number_of_fields == 0 || $number_of_fields == 1 && $number_of_fields != $number_of_fields_best)
|
25294
|
46 |
86 |
if ($number_of_fields <= 0)
|
25300
|
0 |
132 |
if ($rOpts_maximum_fields_per_table and $number_of_fields > $rOpts_maximum_fields_per_table)
|
25310
|
0 |
132 |
if ($columns <= 0)
|
25317
|
7 |
125 |
if ($number_of_fields <= 0)
|
25338
|
38 |
87 |
if ($formatted_lines != int $formatted_lines)
|
25350
|
61 |
64 |
if ($number_of_fields > 1) { }
|
25358
|
7 |
118 |
if ($formatted_columns < $packed_columns)
|
25407
|
9 |
7 |
if ($available_spaces > 0)
|
25411
|
5 |
4 |
if ($number_of_fields_best == 0)
|
25416
|
3 |
6 |
if ($number_of_fields_best != 1)
|
25418
|
3 |
0 |
if ($available_spaces > $spaces_wanted_2)
|
25423
|
6 |
3 |
if ($spaces_wanted > 0)
|
25429
|
5 |
1 |
if ($deleted_spaces > 0)
|
25435
|
0 |
5 |
if ($number_of_fields_best == 1 and $number_of_fields >= 1)
|
25456
|
0 |
82 |
$use_separate_first_term ? :
|
25508
|
298 |
640 |
if ($types_to_go[$ib] =~ /^[qQ]$/) { }
|
|
36 |
604 |
elsif ($types_to_go[$ib] =~ /^[w\-]$/) { }
|
25519
|
727 |
211 |
if ($ib eq $ie) { }
|
25520
|
50 |
677 |
if ($is_quote and $tokens_to_go[$ib] =~ /\s/) { }
|
25528
|
181 |
30 |
if (&first(sub {
|
25532
|
24 |
187 |
if (&first(sub {
|
25547
|
239 |
699 |
if ($weighted_length >= $definitely_complex) { }
|
|
11 |
688 |
elsif ($i == $i_max and $i_last_break == $i - 1 and $weighted_length <= $definitely_simple) { }
|
25551
|
21 |
97 |
if ($i_last_break == $i - 1 and $i > 1 and $i_last_last_break != $i - 2)
|
25583
|
49 |
80 |
if ($max_width > 12 and $complex_item_count > $item_count / 2 and $number_of_fields_best != 2)
|
25605
|
2 |
3 |
if ($item_count <= 5) { }
|
25625
|
9 |
15 |
if ($length > $max_length[$is_odd])
|
25629
|
21 |
3 |
if (defined $last_length)
|
25636
|
18 |
6 |
if (defined $ll) { }
|
25647
|
3 |
0 |
$item_count > 5 ? :
|
|
0 |
3 |
$item_count > 10 ? :
|
25648
|
0 |
3 |
if ($total_variation_2 >= $factor * $total_variation_1)
|
25675
|
7 |
130 |
if ($odd_or_even == 1 and $max_pairs * $pair_width + $max_width <= $columns)
|
25689
|
43 |
82 |
if ($number_of_fields >= $odd_or_even * 2 and $formatted_lines > 0)
|
25712
|
38 |
32 |
if ($j)
|
25726
|
121 |
1056 |
if ($old_breakpoint_to_go[$i])
|
25738
|
0 |
121 |
if ($types_to_go[$ibreak] ne "," and $controlled_comma_style)
|
25740
|
0 |
0 |
if ($index > $ibreak and $types_to_go[$index] eq ",")
|
25752
|
355 |
0 |
if ($i >= 0 and $i <= $j and $j <= $max_index_to_go) { }
|
25785
|
0 |
3939 |
if ($ibeg < 0)
|
25788
|
74 |
3865 |
if ($ibeg > $iend)
|
25802
|
603 |
1257 |
if (ref $spaces)
|
25820
|
871 |
10698 |
if (ref $excess)
|
25823
|
231 |
380 |
if ($total_weld_count and $type_sequence_to_go[$iend] and not $ignore_right_weld)
|
25828
|
12 |
219 |
if defined $wr
|
25845
|
150 |
1803 |
ref $indentation ? :
|
25854
|
38 |
0 |
ref $indentation ? :
|
25865
|
16 |
0 |
ref $item ? :
|
25904
|
6 |
554 |
if ($high_stress_level <= 1)
|
25910
|
6 |
554 |
if ($high_stress_level <= 2 and not $rOpts_add_whitespace)
|
25972
|
0 |
302 |
if (not $rOpts_line_up_parentheses && defined $max_index_to_go or $max_index_to_go < 0)
|
26007
|
2 |
300 |
if ($starting_in_quote)
|
26012
|
210 |
92 |
if ($Kpnb > 0 and $rLL->[$Kpnb][7] eq "b")
|
26015
|
272 |
30 |
if ($Kpnb >= 0 and $rLL->[$Kpnb][7] ne "b")
|
26019
|
272 |
30 |
if (defined $K_last_nonblank)
|
26036
|
1757 |
4010 |
if ($stack_changed)
|
26039
|
808 |
949 |
if ($lp_object) { }
|
26054
|
335 |
5432 |
if ($type eq "{" or $type eq "(")
|
26062
|
141 |
194 |
if ($ii_last_equals)
|
26074
|
935 |
4832 |
if ($level < $current_level or $ci_level < $current_ci_level)
|
26081
|
1485 |
4282 |
if ($level > $current_level or $ci_level > $current_ci_level)
|
26088
|
3772 |
1995 |
if ($type ne "b")
|
26093
|
227 |
3545 |
if ($type eq '=>') { }
|
|
615 |
2930 |
elsif ($type eq ',') { }
|
|
85 |
2845 |
elsif ($is_assignment{$type}) { }
|
26113
|
9 |
75 |
if ($ii > $ii_begin_line and $ii == 1 && $types_to_go[0] eq 'b' || $hash_test2{$last_nonblank_type} || $last_nonblank_type eq '{' && $type ne '}' || $last_nonblank_type eq '(' && $type ne ')' || $hash_test3{$type} || $last_nonblank_type eq '}' && $last_nonblank_token eq $last_nonblank_type || $last_nonblank_type eq 'k' && ($last_nonblank_token eq 'return' && $type ne '{') || $type eq 'k' && $is_if_unless_and_or_last_next_redo_return{$token} || $is_assignment{$last_nonblank_type} && ($hash_test1{$last_last_nonblank_type} || $lp_position_predictor > $maximum_line_length_at_level[$level] - $rOpts_maximum_line_length / 2))
|
26173
|
1057 |
0 |
if ($ii_begin_line > 0)
|
26177
|
8 |
1049 |
$last_nonblank_type eq 'k' ? :
|
26178
|
14 |
1043 |
if $wbb
|
26190
|
4414 |
1353 |
if ($ii > $ii_begin_line) { }
|
26198
|
2746 |
1668 |
if (ref $indentation)
|
26219
|
3398 |
2369 |
if ($rLP->[$max_lp_stack][2])
|
26223
|
1379 |
2019 |
if ($max_lp_stack > 0 and $ci_level and $$rLP[$max_lp_stack - 1][2]) { }
|
26237
|
229 |
73 |
unless $rOpts_extended_line_up_parentheses
|
26261
|
132 |
9 |
if ($ii_last_equals and $ii < $max_index_to_go)
|
26264
|
99 |
33 |
if $types_to_go[$inext_nb] eq "b"
|
26270
|
104 |
37 |
if ($ii_last_equals and $ii_last_equals > $ii_begin_line and not $is_empty_container)
|
26289
|
0 |
104 |
if ($want_break_before{$types_to_go[$i_test]}) { }
|
|
104 |
0 |
elsif ($types_to_go[$i_test + 1] eq 'b') { }
|
26291
|
0 |
0 |
if $types_to_go[$i_test] eq "b"
|
26312
|
2 |
102 |
if ($min_len and $min_len > $len_increase)
|
26316
|
6 |
27 |
if ($lp_position_predictor + $len_increase > $mll or $seqno and $self->[90]{$seqno} or $lp_position_predictor > $mll - $rOpts_maximum_line_length * 3 / 4 and $types_to_go[$ii_last_equals] ne "=>" and $old_breakpoint_to_go[$ii_last_equals] || $ii_last_equals > 0 && $old_breakpoint_to_go[$ii_last_equals - 1] || $ii_last_equals > 1 && $types_to_go[$ii_last_equals - 1] eq 'b' && $old_breakpoint_to_go[$ii_last_equals - 2])
|
26348
|
15 |
1 |
if (defined $Kc and $Kc <= $K_to_go[$max_index_to_go] or $rOpts_extended_line_up_parentheses)
|
26374
|
0 |
0 |
if ($ii == $max_index_to_go and not $block_type_to_go[$ii] and $types_to_go[$ii] eq "{" and $seqno and not $self->[28]{$seqno})
|
26402
|
0 |
1064 |
unless ($max_lp_stack)
|
26414
|
608 |
456 |
if ($rLP->[$max_lp_stack][2])
|
26422
|
340 |
268 |
if ($type eq "}" or $type eq ")")
|
26426
|
168 |
172 |
unless $comma_count
|
26427
|
221 |
119 |
unless $arrow_count
|
26437
|
62 |
51 |
if ($available_spaces > 0 and $K_start >= $K_to_go[0] and $comma_count <= 0 || $arrow_count > 0)
|
26448
|
0 |
62 |
if ($i < 0 or $i > $max_lp_object_list)
|
26457
|
36 |
26 |
if ($arrow_count == 0) { }
|
26481
|
498 |
566 |
if ($rLP_top->[2])
|
26489
|
935 |
129 |
if ($lev <= $level and $ci_lev <= $ci_level)
|
26528
|
1455 |
30 |
if (defined $K_last_nonblank)
|
26532
|
490 |
965 |
$last_nonblank_seqno ? :
|
26541
|
31 |
1454 |
if ($max_lp_stack == 0) { }
|
|
1189 |
265 |
elsif ($last_nonblank_block_type or not $last_nonblank_seqno or defined $last_nonblank_seqno and $self->[28]{$last_nonblank_seqno} or $last_nonblank_type ne '{' or not $in_lp_mode and $level >= $high_stress_level) { }
|
26573
|
509 |
680 |
if ($in_lp_mode)
|
26591
|
54 |
211 |
if (defined $min_len)
|
26596
|
3 |
51 |
if ($excess > 0)
|
26608
|
148 |
117 |
if ($rLP_top->[2])
|
26615
|
0 |
265 |
if (not $in_lp_mode and $available_spaces <= 0 || $next_opening_too_far) { }
|
26627
|
202 |
63 |
if ($available_spaces >= $standard_increment) { }
|
|
41 |
22 |
elsif ($available_spaces > 1) { }
|
|
22 |
0 |
elsif ($is_opening_token{$last_nonblank_token}) { }
|
26639
|
8 |
32 |
if ($type ne "b" and $excess <= 0 and $is_opening_token{$last_nonblank_token} and $ii > 0 and $types_to_go[$ii - 1] ne "b")
|
26662
|
13 |
9 |
if ($tightness{$last_nonblank_token} < 2) { }
|
26674
|
54 |
211 |
if ($available_spaces < 0)
|
26685
|
1122 |
363 |
if ($type ne "b")
|
26687
|
498 |
624 |
if ($rLP->[$max_lp_stack][2])
|
26697
|
608 |
514 |
if ($in_lp_mode)
|
26702
|
608 |
0 |
if ($level >= 0)
|
26707
|
608 |
0 |
if ($ii_begin_line >= 0 and $ii_begin_line <= $max_index_to_go)
|
26717
|
2 |
3 |
if ($type eq "#" and $max_index_to_go > 0 and $align_seqno)
|
26745
|
608 |
0 |
if ($level >= 0)
|
26749
|
259 |
349 |
if ($is_opening_token{$last_nonblank_token} and $last_nonblank_seqno)
|
26776
|
169 |
953 |
if ($available_spaces > 0 and $lp_object)
|
26780
|
31 |
138 |
if $space_count > $halfway
|
26795
|
242 |
815 |
if $max_lp_object_list < 0
|
26803
|
32 |
783 |
if ($tokens_to_go[$ii_to_go] eq "," and $ii_to_go < $max_index_to_go)
|
26807
|
32 |
0 |
if ($types_to_go[$in] eq "b" and $in < $max_index_to_go)
|
26808
|
7 |
25 |
if ($is_closing_token{$tokens_to_go[$in]})
|
26818
|
813 |
2 |
if $spaces_needed <= 0
|
26832
|
187 |
13 |
if $item->get_closed >= 0
|
26836
|
8 |
5 |
if ($available_spaces > 0)
|
26841
|
0 |
2 |
unless @candidates
|
26846
|
0 |
7 |
unless $Perl::Tidy::Formatter::b->[1] <=> $Perl::Tidy::Formatter::a->[1]
|
26851
|
2 |
0 |
$available_spaces > $spaces_needed ? :
|
26867
|
200 |
0 |
if ($old_spaces >= $deleted_spaces) { }
|
26889
|
2 |
0 |
if $spaces_needed <= 0
|
26910
|
146 |
83 |
if $max_lp_object_list < 0
|
26917
|
508 |
19 |
if $item->get_closed >= 0
|
26922
|
9 |
10 |
if ($available_spaces > 0)
|
26963
|
0 |
109 |
if $i_begin_line < 0 or $i_begin_line > $max_index_to_go
|
26968
|
18 |
91 |
if ($i_begin_line == $i_opening)
|
26978
|
18 |
0 |
unless $self->[71]{$K_to_go[$i_opening]}
|
26979
|
0 |
0 |
unless $types_to_go[$max_index_to_go] eq "q"
|
26986
|
1 |
90 |
if $test2 != $test1
|
26990
|
44 |
46 |
if ($ibr > 0 and $types_to_go[$ibr] eq "b")
|
26995
|
44 |
46 |
if ($ibr >= 0)
|
27001
|
33 |
11 |
if (defined $i_nonblank)
|
27021
|
5 |
1 |
if ($available_spaces > 0 and $spaces_wanted <= $available_spaces || !$item->get_have_child)
|
27047
|
0 |
0 |
unless (defined $ri_first and defined $ri_last)
|
27055
|
0 |
0 |
if ($nmax < 0 or $nmax_check < 0 or $nmax != $nmax_check)
|
27067
|
0 |
0 |
if ($ibeg < 0 or $iend < $ibeg or $iend > $max_index_to_go)
|
27073
|
0 |
0 |
if $n == 0
|
27074
|
0 |
0 |
if ($ibeg <= $iend_m)
|
27123
|
632 |
3923 |
if (not $max_index_to_go and $type_beg_next eq "#")
|
27127
|
61 |
4494 |
if ($rOpts_closing_side_comments)
|
27132
|
828 |
3727 |
if ($n_last_line > 0 or $rOpts_extended_continuation_indentation)
|
27138
|
753 |
3802 |
if ($n_last_line > 0)
|
27143
|
21 |
279 |
if $type_beg_next eq "k" and $is_if_unless{$token_beg_next}
|
27145
|
749 |
4 |
if $rOpts_logical_padding
|
27148
|
33 |
720 |
if $rOpts_extended_line_up_parentheses
|
27159
|
1286 |
3269 |
if (not $max_index_to_go) { }
|
27213
|
752 |
6624 |
$batch_CODE_type && $batch_CODE_type ne 'VER' ? :
|
27218
|
2821 |
4555 |
if ($n < $n_last_line) { }
|
|
3380 |
1175 |
elsif (not $is_block_comment and $Kend < $Klimit) { }
|
27238
|
2855 |
525 |
if ($Kbeg_next < $Klimit and $rLL->[$Kbeg_next][7] eq "b")
|
27307
|
884 |
24 |
if ($type_beg eq "Q" and $rOpts_outdent_long_quotes or $type_beg eq "#" and $rOpts_outdent_long_comments and not $is_static_block_comment)
|
27325
|
14 |
870 |
if (ref $indentation)
|
27336
|
26 |
7350 |
if ($is_outdented_line) { }
|
|
50 |
7300 |
elsif ($do_not_pad) { }
|
|
136 |
7164 |
elsif ($type_beg eq 'k' and $token_beg eq 'if') { }
|
27351
|
105 |
31 |
if ($Kbeg > 0)
|
27354
|
93 |
12 |
if ($type_m eq "b" and $Km > 0)
|
27358
|
23 |
82 |
if ($type_m eq "#" and $Km > 0)
|
27361
|
9 |
14 |
if ($type_m eq "b" and $Km > 0)
|
27368
|
44 |
61 |
if ($seqno_m)
|
27374
|
35 |
0 |
if ($type_m eq ";" or $type_m eq "}" and $block_type_m and $block_type_m ne "if" and $block_type_m ne "unless" and $block_type_m ne "elsif" and $block_type_m ne "else")
|
27397
|
1308 |
5436 |
unless $is_block_comment or $self->[97]
|
27421
|
97 |
7279 |
if ($type_beg eq ":" or $n > 0 and $type_end_last eq ":")
|
27424
|
93 |
4 |
$n > 0 ? :
|
27426
|
61 |
6 |
if ($terminal_type ne ";" and $n_last_line > $n and $level_end == $lev)
|
27434
|
16 |
27 |
if ($last_leading_type eq ":" and $terminal_type eq ';' && $level_end <= $lev || $terminal_type ne ':' && $level_end < $lev)
|
27452
|
0 |
6 |
if ($type_KP eq "?" or $type_KP eq ":")
|
27465
|
9 |
0 |
if ($closing_side_comment and $n == $n_last_line and @{$rfields;})
|
27483
|
6744 |
632 |
unless ($is_block_comment)
|
27499
|
1235 |
6141 |
if ($is_closing_type{$types_to_go[$ibeg]})
|
27500
|
1016 |
6360 |
if ($is_closing_type{$types_to_go[$iend]})
|
27509
|
0 |
850 |
if ($rOpts_line_up_parentheses and $type_beg eq "q" and $ibeg == $iend)
|
27517
|
0 |
0 |
if (defined $Km and $rLL->[$Km][7] eq "q" or defined $Kp and $rLL->[$Kp][7] eq "q")
|
27532
|
59 |
7317 |
if ($block_type_to_go[$i_terminal] and $nesting_depth_end > $nesting_depth_beg)
|
27592
|
840 |
3715 |
if $this_batch->[11] or $types_to_go[$max_index_to_go] eq "q"
|
27598
|
0 |
4555 |
if ($cscw_block_comment)
|
27609
|
0 |
0 |
unless defined $msg
|
27627
|
0 |
0 |
if (defined $KK and not $rOpts_indent_only)
|
27630
|
0 |
0 |
if ($len_by_sum != $len_tok_i or defined $len_tok_K and $len_by_sum != $len_tok_K)
|
27633
|
0 |
0 |
defined $KK ? :
|
27634
|
0 |
0 |
unless defined $KK
|
27714
|
0 |
3266 |
if ($max_i < $max_index_to_go)
|
27721
|
87 |
3179 |
if ($max_i <= 0 or not $rOpts_add_whitespace)
|
27729
|
343 |
2836 |
if ($types_to_go[$max_i] eq "#")
|
27733
|
343 |
0 |
if ($i_terminal > 0 and $types_to_go[$i_terminal] eq "b")
|
27763
|
8 |
335 |
if (not $do_not_align || $rOpts_valign_side_comments and $rOpts_valign_code)
|
27770
|
8 |
0 |
if ($types_to_go[$ipad] eq "b")
|
27778
|
325 |
18 |
unless ($do_not_align)
|
27788
|
17 |
3162 |
unless ($rOpts_valign_code)
|
27801
|
411 |
5392 |
if $iend <= $ibeg
|
27804
|
326 |
5066 |
if ($iend > $i_terminal)
|
27849
|
1650 |
3742 |
if ($type_beg eq "k")
|
27855
|
1515 |
135 |
if ($types_to_go[$i_good_paren] eq "b")
|
27863
|
23 |
0 |
if ($token_beg eq "elsif" and $i_good_paren < $iend and $tokens_to_go[$i_good_paren] eq "(")
|
27869
|
0 |
23 |
unless (defined $i_elsif_close)
|
27878
|
15714 |
27564 |
if $types_to_go[$i] eq "b"
|
27910
|
976 |
26588 |
if ($token eq ")" and @imatch_list)
|
27917
|
0 |
976 |
unless (defined $imate)
|
27918
|
54 |
143 |
if ($imatch_list[-1] eq $imate and $ibeg > 1 || @imatch_list > 1 and $imate > $i_good_paren)
|
27922
|
54 |
0 |
if ($ralignment_type_to_go->[$imate])
|
27933
|
157 |
27407 |
if ($levels_to_go[$i] < $level_beg)
|
27946
|
1980 |
25427 |
if ($i < $ibeg + 2) { }
|
|
9793 |
15634 |
elsif ($types_to_go[$i - 1] ne 'b') { }
|
|
3173 |
12461 |
elsif ($last_vertical_alignment_BEFORE_index == $i - 2) { }
|
|
627 |
11834 |
elsif ($type eq 'k') { }
|
|
68 |
11766 |
elsif ($type eq 'q') { }
|
|
4016 |
7750 |
elsif ($is_vertical_alignment_type{$type} and not $is_not_vertical_alignment_token{$token}) { }
|
27960
|
135 |
492 |
if ($is_vertical_alignment_keyword{$token})
|
27966
|
2 |
133 |
if ($token eq "unless" and $rOpts_valign_if_unless)
|
27974
|
34 |
34 |
if ($types_to_go[0] eq "k" and $tokens_to_go[0] eq "use")
|
27993
|
594 |
3422 |
if ($i == $iend)
|
27995
|
578 |
16 |
unless $is_terminal_alignment_type{$type}
|
28015
|
36 |
54 |
if ($type_beg_special_char and $i == $ibeg + 2 and $types_to_go[$i - 1] eq "b")
|
28024
|
124 |
3892 |
if ($is_low_level_alignment_token{$token} and $levels_to_go[$i] != $level_beg)
|
28030
|
573 |
3443 |
if ($token eq "(")
|
28037
|
171 |
402 |
if ($vert_last_nonblank_type eq "k" and not $is_if_unless_elsif{$vert_last_nonblank_token})
|
28045
|
7 |
566 |
unless ($rOpts_function_paren_vertical_alignment)
|
28048
|
7 |
0 |
if $self->[16]{$seqno}
|
28052
|
15 |
1 |
if ($tokens_to_go[0] eq "use" and $types_to_go[0] eq "k" and defined $mate_index_to_go[$i] and $mate_index_to_go[$i] == $i + 1)
|
28079
|
3301 |
24106 |
if ($alignment_type) { }
|
28091
|
1802 |
272 |
if ($vert_last_nonblank_type eq ',' || $vert_last_nonblank_type eq ';' and $types_to_go[$i - 1] eq "b" and not $is_closing_token{$type})
|
28116
|
5103 |
22304 |
if ($alignment_type)
|
28119
|
63 |
5040 |
if ($token eq '{' and $block_type_to_go[$i] and $matches_ASUB{$block_type_to_go[$i]}) { }
|
|
17 |
5023 |
elsif ($i > $i_elsif_open and $i < $i_elsif_close) { }
|
|
5 |
5018 |
elsif (substr($alignment_type, 0, 1) eq ' ') { }
|
28159
|
0 |
3269 |
if ($max_index_to_go == 0)
|
28160
|
0 |
0 |
if (@{$ri_first;} == 1 and $ri_last->[0] == 0) { }
|
28194
|
3266 |
3 |
if ($rOpts_valign_code or $types_to_go[$max_index_to_go] eq "#")
|
28234
|
18 |
0 |
if ($rLL->[$KK][7] eq "q")
|
28237
|
2 |
16 |
if ($ii > 0) { }
|
28238
|
2 |
0 |
if $token =~ /^qw\s*[\(\{\[]/
|
28241
|
6 |
10 |
unless ($ending_in_quote)
|
28242
|
3 |
3 |
if $token =~ /[\)\}\]]$/
|
28274
|
40 |
788 |
if ($rix_seqno_controlling_ci and @{$rix_seqno_controlling_ci;})
|
28292
|
71 |
757 |
if ($rOpts_line_up_parentheses and $rOpts_extended_continuation_indentation)
|
28299
|
19 |
66 |
if (ref $leading_spaces_to_go[$ibeg])
|
28334
|
2805 |
844 |
if ($line > 0 and not $skip_SECTION_1)
|
28337
|
11 |
2794 |
if ($line_1) { }
|
28340
|
8 |
3 |
if ($lev == $lev_last) { }
|
|
3 |
0 |
elsif ($lev < $lev_last) { }
|
28341
|
6 |
2 |
if ($types_to_go[$ibeg] eq 'k' and $is_sort_map_grep{$tokens_to_go[$ibeg]}) { }
|
28360
|
0 |
6 |
if $is_semicolon_terminated
|
28381
|
3 |
8 |
if (defined $line_2 and defined $line_1)
|
28383
|
3 |
0 |
if $continuation_line_count >= 0
|
28398
|
686 |
2108 |
if ($lev > $lev_last)
|
28399
|
10 |
676 |
if ($types_to_go[$ibeg] eq "k" and $is_sort_map_grep{$tokens_to_go[$ibeg]})
|
28416
|
450 |
3199 |
if ($types_to_go[$ibeg] eq "}" and $nesting_depth_to_go[$iend] + 1 == $nesting_depth_to_go[$ibeg])
|
28423
|
6 |
444 |
if ($terminal_type eq "#" and $iend > $ibeg)
|
28425
|
0 |
6 |
if ($terminal_type eq "#" and $iend - 1 > $ibeg)
|
28436
|
13 |
437 |
if ($terminal_type eq "{" and not $is_cuddled_closing_brace)
|
28447
|
1318 |
2331 |
if ($ci_levels_to_go[$ibeg])
|
28450
|
50 |
33 |
if ($seqno and $undo_extended_ci{$seqno})
|
28453
|
36 |
14 |
unless (ref $reduced_spaces_to_go[$ibeg])
|
28465
|
27 |
3622 |
if (not $ci_levels_to_go[$ibeg] and defined $i_controlling_ci[$line])
|
28539
|
632 |
117 |
if ($K_to_go[0] > 0)
|
28541
|
589 |
43 |
if ($Kp > 0 and $rLL->[$Kp][7] eq "b")
|
28544
|
194 |
438 |
if ($Kp > 0 and $rLL->[$Kp][7] eq "#")
|
28546
|
25 |
169 |
if ($Kp > 0 and $rLL->[$Kp][7] eq "b")
|
28551
|
124 |
508 |
if ($seqno)
|
28553
|
93 |
31 |
if ($block_type)
|
28572
|
649 |
2160 |
$tok_next =~ /^\w/ ? :
|
28574
|
2487 |
322 |
unless $has_leading_op_next
|
28578
|
35 |
287 |
if $nesting_depth_to_go[$ibeg] > $nesting_depth_to_go[$ibeg_next]
|
28585
|
265 |
22 |
if ($nesting_depth_to_go[$ibeg] == $nesting_depth_to_go[$ibeg_next])
|
28590
|
237 |
28 |
if ($line > 0) { }
|
28593
|
159 |
78 |
if $has_leading_op
|
28623
|
0 |
78 |
if $levels_to_go[$ibeg] ne $levels_to_go[$ibeg_next]
|
28632
|
0 |
3 |
if ($types_to_go[$iendm] eq "," and $line == 1 and $max_line > 2)
|
28649
|
22 |
56 |
unless $ok_pad
|
28660
|
0 |
28 |
if $starting_in_quote
|
28664
|
0 |
28 |
if ($types_to_go[$ibeg] eq '}') { }
|
|
2 |
26 |
elsif ($is_short_block) { }
|
28677
|
0 |
26 |
if $nesting_depth_to_go[$ibeg] != $nesting_depth_to_go[$ibeg_next]
|
28697
|
16 |
10 |
if $max_line <= 1
|
28707
|
3 |
7 |
if $leading_token eq "."
|
28711
|
0 |
11 |
if $line + $l > $max_line
|
28715
|
7 |
4 |
if $tokens_to_go[$ibeg_next_next] eq $leading_token
|
28720
|
4 |
3 |
if $tokens_differ
|
28721
|
0 |
3 |
if $count < 3 and $leading_token ne ":"
|
28728
|
22 |
61 |
unless (defined $ipad)
|
28734
|
39 |
22 |
if not $type_sequence_to_go[$i] && defined $mate_index_to_go[$i] or $mate_index_to_go[$i] <= $iend
|
28740
|
22 |
0 |
if $ipad
|
28742
|
0 |
22 |
if not $ipad or $ipad > $iend
|
28764
|
0 |
83 |
if $ipad == 0 and $peak_batch_size <= 1
|
28769
|
6 |
77 |
if $nesting_depth_to_go[$iend_next + 1] > $nesting_depth_to_go[$ipad]
|
28778
|
71 |
6 |
if ($line + 2 <= $max_line)
|
28781
|
42 |
29 |
if ($tokens_to_go[$ibeg_next_next] eq $leading_token and $nesting_depth_to_go[$ibeg_next] eq $nesting_depth_to_go[$ibeg_next_next])
|
28794
|
4 |
73 |
if (not $types_match and $type eq "!")
|
28798
|
19 |
21 |
if ($logical_continuation_lines > 1 and $ipad > 0 || $is_short_block or $types_match and not $type eq 'k' && $tokens_to_go[$ipad] ne $tokens_to_go[$inext_next])
|
28862
|
19 |
152 |
if $nesting_depth_to_go[$ibeg_t + 1] < $depth or $nesting_depth_to_go[$ibeg_t] < $depth
|
28867
|
2 |
150 |
if ($levels_to_go[$ibeg_t] + $ci_levels_to_go[$ibeg_t] < $lsp)
|
28876
|
41 |
15 |
if ($l == $max_line)
|
28878
|
1 |
40 |
if ($types_to_go[$i2] eq "#")
|
28880
|
0 |
1 |
if terminal_type_i($i1, $i2) eq ","
|
28901
|
0 |
56 |
if ($types_to_go[$ibeg_next] eq "m")
|
28902
|
0 |
0 |
if $types_to_go[$ibeg] eq "Q"
|
28905
|
2 |
54 |
unless $ok_to_pad
|
28928
|
4 |
50 |
if ($matches_without_bang)
|
28932
|
0 |
54 |
if (ref $indentation_1 and $indentation_1->get_recoverable_spaces == 0)
|
28936
|
0 |
0 |
if (ref $indentation_2 and $indentation_2->get_recoverable_spaces != 0)
|
28945
|
5 |
49 |
if ($pad_spaces < 0)
|
28951
|
3 |
2 |
if ($pad_spaces == -1)
|
28952
|
2 |
1 |
if ($ipad > $ibeg and $types_to_go[$ipad - 1] eq "b" and not %keyword_paren_inner_tightness)
|
28963
|
47 |
7 |
if ($ipad >= 0 and $pad_spaces)
|
28966
|
47 |
0 |
if ($pad_spaces + $length_t <= $maximum_line_length_at_level[$levels_to_go[$ibeg]])
|
28992
|
55 |
2 |
if ($pad_spaces > 0) { }
|
|
0 |
2 |
elsif ($pad_spaces == 0) { }
|
|
2 |
0 |
elsif ($pad_spaces == -1 and $tokens_to_go[$ipad] eq ' ') { }
|
29046
|
0 |
33 |
if @{$ri_first;} <= 1
|
29051
|
5 |
28 |
unless ref $lp_object
|
29055
|
25 |
3 |
unless $K_extra_space
|
29061
|
0 |
3 |
if $ii <= $ibeg_0 or $ii > $iend_0
|
29065
|
1 |
2 |
if substr($tok, 0, 1) eq " "
|
29070
|
0 |
2 |
if $types_to_go[$ibeg_0] eq "k" and $is_if_unless_elsif{$tokens_to_go[$ibeg_0]}
|
29074
|
2 |
0 |
if ($spaces > 0)
|
29228
|
3081 |
3009 |
unless ($alignment_count)
|
29235
|
596 |
2485 |
if ($ibeg == $iend) { }
|
29267
|
1567 |
1442 |
if ($ibeg == 0 and $iend == $max_index_to_go)
|
29269
|
289 |
1278 |
if ($types_to_go[$iterm] eq "#")
|
29278
|
846 |
333 |
if ($iterm > $ibeg and $term_type_ok and not $is_my_local_our{$tokens_to_go[$ibeg]} and $levels_to_go[$ibeg] eq $levels_to_go[$iterm])
|
29304
|
5300 |
31667 |
if ($type_sequence_to_go[$i])
|
29306
|
2715 |
2585 |
if ($is_opening_token{$token}) { }
|
|
2317 |
268 |
elsif ($is_closing_token{$token}) { }
|
29310
|
302 |
2413 |
unless (defined $i_mate)
|
29311
|
2192 |
523 |
if ($i_mate > $i and $i_mate <= $iend)
|
29333
|
961 |
1231 |
$token eq '(' ? :
|
29337
|
1 |
2191 |
if ($name eq ".")
|
29368
|
1662 |
530 |
unless ($ralignment_type_to_go->[$i])
|
29378
|
36 |
1626 |
if ($saw_exclamation_mark)
|
29383
|
728 |
934 |
if ($i_start == $ibeg)
|
29389
|
0 |
1662 |
if ($len < 0)
|
29401
|
2192 |
125 |
if $depth > 0
|
29412
|
5289 |
28669 |
if ($i > $i_start and $ralignment_type_to_go->[$i])
|
29418
|
13 |
5276 |
if $tok_map
|
29422
|
4964 |
325 |
if ($raw_tok ne "#")
|
29428
|
2739 |
2550 |
if ($raw_tok eq "," or $raw_tok eq "=>")
|
29432
|
61 |
2678 |
$i == $i_depth_prev ? :
|
29433
|
61 |
2678 |
$depth_last < $depth ? :
|
29435
|
1404 |
1335 |
if ($container_name{$depth_p})
|
29451
|
209 |
5080 |
if ($raw_tok eq "(")
|
29452
|
1 |
208 |
if ($ci_levels_to_go[$ibeg] and $container_name{$depth} =~ /^\+(if|unless)/)
|
29463
|
238 |
27 |
if ($raw_tok eq "{" and $block_type_to_go[$i])
|
29469
|
55 |
183 |
if defined $block_type_map{$block_type}
|
29473
|
45 |
193 |
if ($block_type =~ /$SUB_PATTERN/)
|
29476
|
12 |
226 |
if ($block_type =~ /^[A-Z]+$/)
|
29482
|
24 |
214 |
if ($ci_levels_to_go[$ibeg])
|
29495
|
2011 |
3278 |
if ($raw_tok eq "=" or $raw_tok eq "=>")
|
29497
|
193 |
1818 |
if ($token_count{$tok} > 1)
|
29525
|
1837 |
35130 |
if ($type eq 'k') { }
|
|
13166 |
21964 |
elsif ($type eq 'b') { }
|
|
2625 |
19339 |
elsif ($is_w_n_C{$type}) { }
|
|
43 |
19296 |
elsif ($type eq '!') { }
|
29532
|
123 |
1714 |
if defined $keyword_map{$tok_fix}
|
29548
|
2334 |
291 |
if ($i < $iend - 1)
|
29550
|
1360 |
974 |
$next_type eq 'b' ? :
|
29553
|
789 |
1545 |
if ($types_to_go[$i_next_nonblank] eq "=>")
|
29561
|
212 |
577 |
if ($patterns[$j] eq "m")
|
29572
|
68 |
798 |
if ($type eq "w" and $i > $ibeg and $i < $iend and $types_to_go[$i - 1] eq "L" and $types_to_go[$i + 1] eq "R")
|
29582
|
1399 |
1226 |
if ($type eq "n")
|
29597
|
613 |
18683 |
if ($depth == 0 and $type eq "=>")
|
29628
|
383 |
1290 |
if ($type eq "b")
|
29637
|
7 |
341 |
if ($token eq "(" or $is_binary_type{$type} or $type eq "k" and $is_binary_keyword{$token})
|
29646
|
612 |
486 |
unless $is_kwU{$type}
|
29649
|
380 |
106 |
if ($count == 0) { }
|
|
42 |
64 |
elsif (defined $count_max and $count >= $count_max) { }
|
29650
|
65 |
315 |
if ($type eq 'k' and $is_use_like{$tokens_to_go[$_]}) { }
|
29666
|
0 |
444 |
if (defined $name_map{$token})
|
29676
|
206 |
2 |
if ($name and defined $ilast_blank and $ilast_blank > $iname_end)
|
29696
|
19 |
942 |
if $im < 0
|
29697
|
498 |
444 |
if ($types_to_go[$im] eq "b")
|
29698
|
0 |
942 |
if $im < 0
|
29703
|
5 |
937 |
if ($name eq "->")
|
29705
|
5 |
0 |
if ($im >= 0 and $types_to_go[$im] ne "b")
|
29711
|
0 |
942 |
if (substr($name, 0, 2) eq "->")
|
29776
|
364 |
7012 |
if ($terminal_type eq "#" and $i_terminal > $ibeg)
|
29779
|
350 |
14 |
if ($terminal_type eq "b" and $i_terminal > $ibeg)
|
29797
|
204 |
7172 |
if ($type_beg eq "q" and $ibeg == 0)
|
29859
|
1977 |
5399 |
if ($seqno_beg or $seqno_qw_closing) { }
|
|
0 |
5399 |
elsif (substr($rpatterns->[0], 0, 2) eq 'qb' and substr($rfields->[0], -1, 1) eq ';' and $rfields->[0] =~ /^([\)\}\]\>]);$/) { }
|
29896
|
0 |
0 |
if ($closing_token_indentation{$1} == 0) { }
|
29924
|
6409 |
967 |
if ($adjust_indentation == 0) { }
|
|
861 |
106 |
elsif ($adjust_indentation == 1) { }
|
|
88 |
18 |
elsif ($adjust_indentation == 2) { }
|
29954
|
2 |
1192 |
if ($levels_to_go[$i_ind] < $lev)
|
29990
|
38 |
50 |
if (ref $last_indentation_written and not $is_closing_token{$last_leading_token})
|
30002
|
49 |
39 |
if ($diff > 0) { }
|
30017
|
0 |
39 |
if ($rOpts_extended_line_up_parentheses and $diff >= -$rOpts_indent_columns and $space_count > $leading_spaces_beg) { }
|
|
37 |
2 |
elsif ($default_adjust_indentation == 0) { }
|
|
2 |
0 |
elsif ($default_adjust_indentation == 1) { }
|
30065
|
6 |
12 |
if ($block_type_beg and $ci_levels_to_go[$i_terminal] == 0) { }
|
30089
|
1 |
11 |
if (get_spaces($last_indentation_written) < get_spaces($indentation))
|
30105
|
7357 |
19 |
unless ($ibeg == 0 and $starting_in_quote)
|
30133
|
4 |
28 |
if ($seqno_qw_closing and length $token_beg > 1 || $token_beg eq '>')
|
30157
|
822 |
509 |
if (defined $opening_indentation and not $leading_paren_arrow and not $is_isolated_block_brace and not $is_unaligned_colon)
|
30164
|
48 |
774 |
if (get_spaces($opening_indentation) > get_spaces($indentation))
|
30177
|
30 |
4523 |
if ($ibeg == 0 and $rOpts_outdent_keywords && $type_beg eq 'k' && $outdent_keyword{$token_beg} || $rOpts_outdent_labels && $type_beg eq 'J' || $is_static_block_comment && $rOpts_outdent_static_block_comments)
|
30200
|
26 |
6 |
if ($space_count > 0)
|
30203
|
0 |
26 |
if ($space_count < 0)
|
30208
|
0 |
26 |
if ($type_beg eq "#" and $space_count == 0)
|
30265
|
4 |
1941 |
if ($seqno_beg and $self->[30]{$seqno_beg})
|
30268
|
4 |
0 |
if ($is_closing_type{$type_beg} or $ibeg == $i_terminal) { }
|
|
0 |
0 |
elsif ($total_weld_count) { }
|
30277
|
0 |
0 |
if (defined $Kterm_test and $Kterm_test >= $K_beg)
|
30280
|
0 |
0 |
if ($Kterm == $K_beg)
|
30288
|
1945 |
32 |
$seqno_beg ? :
|
30296
|
21 |
1956 |
if ($is_bli_beg and $is_bli_beg == 1)
|
30300
|
21 |
0 |
if ($K_beg eq $K_opening) { }
|
30311
|
8 |
1969 |
if ($seqno_qw_closing and $total_weld_count)
|
30313
|
8 |
0 |
if ($i_plus <= $max_index_to_go)
|
30315
|
6 |
2 |
if (defined $self->[70]{$K_plus})
|
30322
|
1267 |
710 |
if ($is_closing_type_beg or $seqno_qw_closing) { }
|
|
93 |
617 |
elsif ($type_beg eq ':') { }
|
30343
|
362 |
406 |
if ($is_semicolon_terminated or $terminal_type eq "{" and $type_beg eq "}" and $nesting_depth_to_go[$iend] + 1 == $nesting_depth_to_go[$ibeg] and not $is_cuddled_closing_brace or $type_beg eq "}" and $types_to_go[$iend] eq '{' || $levels_to_go[$iend] < $level_beg and not $is_cuddled_closing_brace or $level_jump < 0 and not $some_closing_token_indentation and not $self->[74]{$K_beg} or $i_terminal > $ibeg and $is_closing_type{$types_to_go[$iend]})
|
30401
|
87 |
1180 |
if ($terminal_type eq "," and $self->is_in_list_by_i($i_terminal))
|
30422
|
526 |
95 |
if ($i_terminal == $ibeg and $is_closing_type_beg and defined $K_beg and $K_beg < $Klimit)
|
30430
|
473 |
53 |
if ($type_plus eq "b" and $K_plus < $Klimit)
|
30434
|
49 |
477 |
if ($type_plus eq "#" and $K_plus < $Klimit)
|
30436
|
42 |
7 |
if ($type_plus eq "b" and $K_plus < $Klimit)
|
30452
|
512 |
14 |
if (not $is_bli_beg and defined $K_plus)
|
30459
|
296 |
216 |
if $level_next < $lev and not $self->[74]{$K_beg}
|
30468
|
18 |
322 |
if (not $rOpts_indent_closing_brace and $block_type_beg and $self->[8]{$seqno_beg} and $self->is_in_list_by_i($i_terminal))
|
30480
|
14 |
4 |
if (defined $opening_indentation and get_spaces($indentation) > get_spaces($opening_indentation))
|
30493
|
30 |
1 |
if ($block_type_beg and $block_type_beg eq "eval" and not ref $leading_spaces_beg and not $rOpts_indent_closing_brace)
|
30505
|
24 |
6 |
if (defined $opening_indentation and get_spaces($indentation) > get_spaces($opening_indentation))
|
30514
|
21 |
1246 |
if $is_bli_beg
|
30521
|
671 |
596 |
if (not $block_type_beg) { }
|
30530
|
26 |
645 |
if ($seqno_qw_closing and $ibeg_weld_fix == $ibeg)
|
30542
|
3 |
23 |
if (not defined $cti and length $tok == 1)
|
30550
|
3 |
0 |
if ($tok ne ">")
|
30557
|
0 |
26 |
if (defined $cti and $cti == 1)
|
30560
|
3 |
668 |
if (not defined $cti) { }
|
|
43 |
625 |
elsif ($cti == 1) { }
|
|
3 |
622 |
elsif ($cti == 2) { }
|
|
3 |
619 |
elsif ($cti == 3) { }
|
30575
|
42 |
1 |
if ($i_terminal <= $ibeg + 1 or $is_semicolon_terminated) { }
|
30585
|
3 |
0 |
if ($is_semicolon_terminated) { }
|
30602
|
12 |
0 |
if ($rOpts_indent_closing_brace and $i_terminal == $ibeg || $is_semicolon_terminated)
|
30624
|
46 |
47 |
if ($is_leading)
|
30672
|
550 |
858 |
if (defined $i_opening and $i_opening >= 0) { }
|
30683
|
26 |
832 |
unless $seqno
|
30699
|
3 |
557 |
if ($rOpts_freeze_whitespace)
|
30709
|
31 |
526 |
if $rOpts_line_up_parentheses
|
30712
|
12 |
3084 |
if $opening_vertical_tightness{$key}
|
30717
|
9 |
3030 |
if $closing_vertical_tightness{$key}
|
30722
|
2 |
1509 |
if $opening_token_right{$key}
|
30727
|
1 |
1506 |
if $stack_opening_token{$key}
|
30730
|
0 |
1506 |
if $stack_closing_token{$key}
|
30734
|
2 |
500 |
if $rOpts_block_brace_vertical_tightness
|
30737
|
2 |
498 |
if $rOpts_stack_closing_block_brace
|
30811
|
801 |
507 |
if ($n < $n_last_line) { }
|
|
11 |
496 |
elsif ($rOpts_block_brace_vertical_tightness and $ibeg eq $iend and $types_to_go[$iend] eq '{' and $block_type_to_go[$iend] and $block_type_to_go[$iend] =~ /$block_brace_vertical_tightness_pattern/) { }
|
|
5 |
491 |
elsif ($rOpts_stack_closing_block_brace and $ibeg eq $iend and $block_type_to_go[$iend] and $types_to_go[$iend] eq '}' and !$closing_side_comment || $n < $n_last_line) { }
|
30821
|
74 |
35 |
if ($type_sequence_to_go[$iend] and not $block_type_to_go[$iend] and $is_opening_token{$token_end} and $opening_vertical_tightness{$token_end} > 0 || $rOpts_line_up_parentheses && $token_end eq '(' && $self->[29]{$type_sequence_to_go[$iend]} && $iend > $ibeg && $types_to_go[$iend - 1] ne 'b')
|
30847
|
0 |
0 |
if $self->[70]{$K_to_go[$iend_next]} and $is_closing_type{$type_end_next}
|
30852
|
0 |
16 |
if ($ovt and $seqno and $self->[38]{$seqno})
|
30860
|
0 |
74 |
if (defined $self->[96]{$seqno})
|
30865
|
60 |
14 |
if ($ovt >= 2 or $nesting_depth_to_go[$iend_next + 1] == $nesting_depth_to_go[$ibeg_next])
|
30890
|
197 |
83 |
if ($type_sequence_to_go[$ibeg_next] and not $block_type_to_go[$ibeg_next] and $is_closing_token{$token_next} and $types_to_go[$iend] ne "#")
|
30900
|
0 |
34 |
if ($cvt and $self->[38]{$seqno})
|
30906
|
2 |
195 |
if ($cvt == 3)
|
30907
|
1 |
1 |
$self->[92]{$seqno} ? :
|
30912
|
0 |
29 |
if ($cvt == 2 and $rOpts_delete_old_whitespace and not $rOpts_add_whitespace)
|
30924
|
10 |
23 |
if ($cvt and $self->[94]{$seqno})
|
30930
|
76 |
18 |
if ($nesting_depth_to_go[$ibeg_next] >= $nesting_depth_to_go[$iend_next + 1] + 1 and $cvt == 2 || !$self->is_in_list_by_i($ibeg_next) && ($cvt == 1 || $rOpts_line_up_parentheses && $token_next eq ')' && $type_sequence_to_go[$ibeg_next] && $self->[29]{$type_sequence_to_go[$ibeg_next]}))
|
30960
|
25 |
51 |
if ($cvt == 2 or $iend_next == $ibeg_next) { }
|
30967
|
50 |
1 |
if ($str =~ /^b?[\)\]\}R#;]/)
|
30970
|
75 |
1 |
if ($ok)
|
30984
|
0 |
1 |
if ($rOpts_line_up_parentheses and $total_weld_count and $seqno_ibeg_next and $self->[29]{$seqno_ibeg_next} and $self->is_welded_at_seqno($seqno_ibeg_next))
|
30991
|
0 |
0 |
$cvt ? :
|
30996
|
17 |
58 |
$tightness{$token_next} == 2 ? :
|
31023
|
2 |
0 |
if ($opening_token_right{$tokens_to_go[$ibeg_next]} and not $is_opening_token{$token_end} and not $block_type_to_go[$ibeg_next] and $iend_next == $ibeg_next || $iend_next == $ibeg_next + 2 && $types_to_go[$iend_next] eq '#' and $token_end ne "||" and $token_end ne "&&" and not $is_assignment{$types_to_go[$iend]} && $rOpts_line_up_parentheses && $type_sequence_to_go[$ibeg_next] && $self->[29]{$type_sequence_to_go[$ibeg_next]} and $tokens_to_go[$ibeg] ne $tokens_to_go[$ibeg_next] and not $self->[83]{$K_to_go[$iend]})
|
31060
|
2 |
0 |
$types_to_go[$ibeg_next - 1] eq 'b' ? :
|
31077
|
1 |
800 |
if ($types_to_go[$ibeg_next] eq "q")
|
31078
|
1 |
0 |
if ($token_beg_next =~ /^qw\s*([\[\(\{])$/)
|
31083
|
70 |
731 |
if ($is_closing_token{$token_end} and $is_closing_token{$token_beg_next}) { }
|
|
41 |
690 |
elsif ($is_opening_token{$token_end} and $is_opening_token{$token_beg_next}) { }
|
31091
|
70 |
0 |
unless $block_type_to_go[$ibeg_next] or $seq_next and $self->[38]{$seq_next}
|
31096
|
41 |
0 |
unless $block_type_to_go[$ibeg_next]
|
31104
|
6 |
795 |
if ($stackable)
|
31107
|
5 |
1 |
if ($n + 1 == $n_last_line)
|
31117
|
6 |
0 |
if ($is_semicolon_terminated or ($iend_next == $ibeg_next or $iend_next == $ibeg_next + 2 and $types_to_go[$iend_next] eq "#"))
|
31124
|
5 |
1 |
$types_to_go[$ibeg_next - 1] eq 'b' ? :
|
31168
|
0 |
5 |
$rOpts_block_brace_tightness == 2 ? :
|
31182
|
886 |
422 |
unless ($vt_seqno_beg)
|
31183
|
11 |
875 |
if ($types_to_go[$ibeg] eq 'q') { }
|
31190
|
853 |
455 |
unless ($vt_seqno_end)
|
31191
|
7 |
846 |
if ($types_to_go[$iend] eq 'q') { }
|
31197
|
1 |
1307 |
unless (defined $vt_seqno)
|
31251
|
9 |
560 |
if ($accumulating_text_for_block)
|
31254
|
5 |
4 |
if ($is_if_elsif{$accumulating_text_for_block})
|
31270
|
7 |
2 |
unless ($accumulating_text_for_block =~ /^els/)
|
31292
|
92 |
0 |
if ($accumulating_text_for_block and not $leading_block_text_length_exceeded and $types_to_go[$i] ne "#")
|
31298
|
0 |
92 |
if $i == 0
|
31303
|
89 |
3 |
if (length $leading_block_text < $rOpts_closing_side_comment_maximum_text and $new_line_length < $maximum_line_length_at_level[$leading_block_text_level] || length($leading_block_text) + $added_length < $rOpts_closing_side_comment_maximum_text or $tokens_to_go[$i] eq ')' and $i + 1 <= $max_index_to_go && $block_type_to_go[$i + 1] && $block_type_to_go[$i + 1] eq $accumulating_text_for_block || $i + 2 <= $max_index_to_go && $block_type_to_go[$i + 2] && $block_type_to_go[$i + 2] eq $accumulating_text_for_block) { }
|
|
0 |
3 |
elsif ($types_to_go[$i] ne 'b') { }
|
31348
|
0 |
89 |
if ($i == 0 and $types_to_go[$i] ne "b")
|
31388
|
61 |
0 |
unless $csc_last_label
|
31389
|
0 |
61 |
if ($types_to_go[0] eq "J")
|
31397
|
683 |
34 |
unless $block_type
|
31400
|
463 |
254 |
if ($type ne "#" and $type ne "b")
|
31407
|
34 |
683 |
if ($block_type and $type_sequence)
|
31409
|
17 |
17 |
if ($token eq '}') { }
|
|
17 |
0 |
elsif ($token eq '{') { }
|
31412
|
9 |
8 |
if (defined $block_leading_text{$type_sequence})
|
31421
|
17 |
0 |
if (defined $csc_block_label{$type_sequence})
|
31428
|
0 |
17 |
if ($accumulating_text_for_block and $levels_to_go[$i] <= $leading_block_text_level)
|
31435
|
17 |
0 |
if (defined $block_opening_line_number{$type_sequence}) { }
|
31460
|
0 |
17 |
if ($block_type =~ /:$/)
|
31466
|
9 |
8 |
if ($accumulating_text_for_block and $levels_to_go[$i] == $leading_block_text_level)
|
31470
|
9 |
0 |
if ($accumulating_text_for_block eq $block_type) { }
|
31497
|
9 |
708 |
if ($type eq 'k' and $csc_new_statement_ok and $is_if_elsif_else_unless_while_until_for_foreach{$token} and $token =~ /$closing_side_comment_list_pattern/) { }
|
31508
|
454 |
1 |
if ($type ne "b" and $type ne "#" and $type ne "q")
|
31512
|
0 |
708 |
if ($type eq ';' and $accumulating_text_for_block and $levels_to_go[$i] == $leading_block_text_level) { }
|
31527
|
2 |
59 |
if ($terminal_block_type =~ /^els/ and $rblock_leading_if_elsif_text)
|
31535
|
0 |
61 |
if ($terminal_type eq "J")
|
31562
|
0 |
2 |
if ($block_type eq "elsif" and $rOpts_closing_side_comment_else_flag == 0)
|
31569
|
0 |
2 |
unless $count
|
31574
|
2 |
0 |
if ($block_type eq "else")
|
31579
|
2 |
0 |
if ($rOpts_closing_side_comment_else_flag == 0)
|
31584
|
0 |
0 |
if ($count > 1)
|
31586
|
0 |
0 |
if ($count > 2)
|
31591
|
0 |
0 |
if ($block_type eq 'else') { }
|
31599
|
0 |
0 |
if ($rOpts_closing_side_comment_else_flag == 2)
|
31609
|
0 |
0 |
if ($length > $maximum_line_length_at_level[$leading_block_text_level])
|
31663
|
164 |
7 |
unless $matching_char{$char}
|
31670
|
4 |
3 |
unless $top eq $char
|
31702
|
9 |
0 |
if ($terminal_type eq "}" and $block_type_to_go[$i_terminal] and $block_line_count >= $rOpts->{'closing-side-comment-interval'} || $have_side_comment && $rOpts->{'closing-side-comment-warnings'} and $block_type_to_go[$i_terminal] =~ /$closing_side_comment_list_pattern/ and $block_type_to_go[$i_terminal] ne "sub" and not defined $mate_index_to_go[$i_terminal] and !$have_side_comment || $tokens_to_go[$max_index_to_go] =~ /$closing_side_comment_prefix_pattern/)
|
31749
|
0 |
9 |
if ($block_label)
|
31754
|
5 |
4 |
if ($i_block_leading_text == $i_terminal)
|
31759
|
6 |
3 |
if $rOpts->{'closing-side-comments-balanced'}
|
31764
|
0 |
9 |
if ($have_side_comment) { }
|
31767
|
0 |
0 |
if ($rOpts->{'closing-side-comment-warnings'})
|
31784
|
0 |
0 |
if ($block_type_to_go[$i_terminal] eq 'else') { }
|
|
0 |
0 |
elsif ($block_type_to_go[$i_terminal] eq 'elsif') { }
|
31785
|
0 |
0 |
if ($old_csc =~ /\[\s*elsif/)
|
31788
|
0 |
0 |
if ($old_csc =~ /\[\s*if/)
|
31796
|
0 |
0 |
if (length $new_csc > length $old_csc)
|
31802
|
0 |
0 |
if (length $new_csc < length $old_csc and $new_trailing_dots)
|
31809
|
0 |
0 |
if ($new_csc ne $old_csc) { }
|
|
0 |
0 |
elsif ($block_line_count < $rOpts->{'closing-side-comment-interval'}) { }
|
31813
|
0 |
0 |
if ($block_line_count < $rOpts->{'closing-side-comment-interval'}) { }
|
31824
|
0 |
0 |
if (defined $K)
|
31835
|
0 |
0 |
if ($rOpts->{'timestamp'})
|
31859
|
0 |
0 |
if ($iend > $ibeg and $iend == $max_index_to_go and $types_to_go[$max_index_to_go] eq "#")
|
31865
|
0 |
0 |
if ($iend > $ibeg and $types_to_go[$max_index_to_go] eq "b")
|
31880
|
0 |
0 |
if ($token)
|
31934
|
16 |
544 |
if ($added_semicolon_count > 0)
|
31935
|
3 |
13 |
$added_semicolon_count > 1 ? :
|
31936
|
3 |
13 |
$added_semicolon_count > 1 ? :
|
31942
|
3 |
13 |
if ($added_semicolon_count > 1)
|
31953
|
2 |
558 |
if ($deleted_semicolon_count > 0)
|
31954
|
2 |
0 |
$deleted_semicolon_count > 1 ? :
|
31955
|
2 |
0 |
$deleted_semicolon_count > 1 ? :
|
31964
|
2 |
0 |
if ($deleted_semicolon_count > 1)
|
31975
|
0 |
560 |
if ($embedded_tab_count > 0)
|
31976
|
0 |
0 |
$embedded_tab_count > 1 ? :
|
31977
|
0 |
0 |
$embedded_tab_count > 1 ? :
|
31987
|
0 |
0 |
if ($embedded_tab_count > 1)
|
31999
|
0 |
560 |
if ($first_tabbing_disagreement)
|
32006
|
0 |
560 |
if ($first_btd)
|
32012
|
0 |
0 |
if (get_saw_brace_error())
|
32016
|
0 |
560 |
if ($in_btd)
|
32022
|
0 |
0 |
if (get_saw_brace_error())
|
32025
|
0 |
560 |
if ($in_tabbing_disagreement) { }
|
32032
|
0 |
560 |
if ($last_tabbing_disagreement) { }
|
32043
|
0 |
560 |
if ($first_tabbing_disagreement)
|