line |
true |
false |
branch |
67
|
0 |
0 |
if $AUTOLOAD =~ /\bDESTROY$/
|
896
|
2 |
553 |
if ($rOpts->{'entab-leading-whitespace'}) { }
|
|
0 |
553 |
elsif ($rOpts->{'tabs'}) { }
|
1072
|
0 |
555 |
if (_increment_count() > 1)
|
1090
|
0 |
0 |
if (defined $Klimit and $Klimit != $num - 1 or not defined $Klimit and $num > 0)
|
1100
|
0 |
0 |
unless defined $Klimit
|
1101
|
0 |
0 |
unless $msg
|
1123
|
0 |
0 |
if ($exact_match)
|
1124
|
0 |
0 |
if ($error)
|
1150
|
0 |
0 |
if ($nvars != 9)
|
1153
|
0 |
0 |
unless defined $type
|
1165
|
0 |
0 |
unless (defined $rLL->[$KK][$var])
|
1241
|
0 |
0 |
if ($logger_object)
|
1250
|
0 |
0 |
if ($logger_object)
|
1258
|
0 |
0 |
if ($logger_object)
|
1266
|
2984 |
10 |
if ($logger_object)
|
1273
|
553 |
2 |
if ($logger_object)
|
1280
|
553 |
2 |
if ($logger_object)
|
1300
|
0 |
0 |
if ($diagnostics_object)
|
1347
|
4948 |
2265 |
unless $str
|
1393
|
4 |
550 |
if ($rOpts->{'closing-side-comments'}) { }
|
|
0 |
550 |
elsif ($rOpts->{'closing-side-comment-warnings'}) { }
|
1394
|
4 |
0 |
unless ($rOpts->{'closing-side-comment-warnings'} or $rOpts->{'indent-only'})
|
1406
|
0 |
0 |
if ($rOpts->{'delete-closing-side-comments'})
|
1425
|
0 |
554 |
if ($rOpts->{'dump-cuddled-block-list'})
|
1431
|
3 |
551 |
if ($rOpts->{'extended-line-up-parentheses'})
|
1435
|
30 |
524 |
if ($rOpts->{'line-up-parentheses'})
|
1437
|
0 |
30 |
if ($rOpts->{'indent-only'} or not $rOpts->{'add-newlines'} or not $rOpts->{'delete-old-newlines'})
|
1454
|
0 |
30 |
if ($rOpts->{'whitespace-cycle'})
|
1465
|
0 |
30 |
if ($rOpts->{'line-up-parentheses'} and $rOpts->{'tabs'})
|
1473
|
0 |
2 |
if ($rOpts->{'outdent-keywords'} and $rOpts->{'tabs'})
|
1480
|
0 |
551 |
if ($rOpts->{'outdent-labels'} and $rOpts->{'tabs'})
|
1487
|
13 |
541 |
unless ($rOpts->{'space-for-semicolon'})
|
1491
|
2 |
552 |
if ($rOpts->{'space-terminal-semicolon'})
|
1498
|
0 |
554 |
if ($_ and $_ > 100)
|
1508
|
0 |
554 |
if (not $_ or $_ <= 0)
|
1514
|
553 |
1 |
unless (@okw)
|
1520
|
2766 |
0 |
if (Perl::Tidy::Tokenizer::is_keyword($_)) { }
|
1531
|
2 |
552 |
if (defined $kpit_value and $kpit_value != 1)
|
1534
|
1 |
1 |
unless (@kpit)
|
1545
|
5 |
549 |
if (my(@q) = split_words($rOpts->{'want-left-space'}))
|
1549
|
5 |
549 |
if (my(@q) = split_words($rOpts->{'want-right-space'}))
|
1553
|
6 |
548 |
if (my(@q) = split_words($rOpts->{'nowant-left-space'}))
|
1557
|
7 |
547 |
if (my(@q) = split_words($rOpts->{'nowant-right-space'}))
|
1560
|
0 |
554 |
if ($rOpts->{'dump-want-left-space'})
|
1565
|
0 |
554 |
if ($rOpts->{'dump-want-right-space'})
|
1583
|
0 |
0 |
if ($rOpts->{'variable-maximum-line-length'} and $rOpts->{'ignore-old-breakpoints'} and $rOpts->{'line-up-parentheses'})
|
1589
|
0 |
0 |
if ($break_before_container_types{$key} == 2)
|
1594
|
0 |
0 |
if (@changed)
|
1605
|
0 |
1 |
if ($rOpts->{'variable-maximum-line-length'} and $rOpts->{'line-up-parentheses'} and $rOpts->{'continuation-indentation'} < 2)
|
1618
|
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'})
|
1641
|
5 |
0 |
if (defined $opt and $opt > 0 and $break_before_container_types{$tok})
|
1647
|
3 |
2 |
if ($opt == 2)
|
1648
|
1 |
2 |
if ($rOpts->{'line-up-parentheses'} or $rOpts->{'indent-columns'} <= $rOpts->{'continuation-indentation'})
|
1665
|
4 |
550 |
unless ($rOpts->{'maximum-line-length'})
|
1670
|
0 |
554 |
unless ($rOpts->{'long-block-line-count'})
|
1684
|
2 |
552 |
if ($rOpts->{'ignore-old-breakpoints'})
|
1687
|
0 |
2 |
if ($rOpts->{'break-at-old-method-breakpoints'})
|
1691
|
0 |
2 |
if ($rOpts->{'break-at-old-comma-breakpoints'})
|
1695
|
0 |
2 |
if ($rOpts->{'break-at-old-semicolon-breakpoints'})
|
1699
|
0 |
2 |
if ($rOpts->{'keep-old-breakpoints-before'})
|
1703
|
0 |
2 |
if ($rOpts->{'keep-old-breakpoints-after'})
|
1708
|
0 |
2 |
if (@conflicts)
|
1740
|
0 |
1 |
if (defined $want_break_before{$key} and not $want_break_before{$key} and $is_soft_keep_break_type{$key})
|
1749
|
0 |
0 |
if (defined $want_break_before{$key} and $want_break_before{$key} and $is_soft_keep_break_type{$key})
|
1775
|
0 |
554 |
if ($lpxl and $lpil)
|
1780
|
3 |
551 |
if ($lpxl) { }
|
|
1 |
550 |
elsif ($lpil) { }
|
1810
|
2 |
552 |
if (defined $olbxl)
|
1812
|
2 |
0 |
if (@list)
|
1822
|
553 |
1 |
unless ($is_olb_exclusion_word{'*'})
|
1824
|
2211 |
1 |
unless ($is_olb_exclusion_word{$_})
|
1833
|
554 |
0 |
if (@grep_aliases)
|
1837
|
553 |
1 |
if ($want_one_line_block{'grep'})
|
1897
|
550 |
4 |
unless $str
|
1900
|
0 |
4 |
unless $str
|
1951
|
0 |
9 |
unless (defined $key)
|
1955
|
8 |
1 |
unless (defined $weld_nested_exclusion_rules{$key})
|
1961
|
1 |
8 |
if ($tok eq "q")
|
1969
|
5 |
3 |
if ($item)
|
1970
|
5 |
0 |
if ($item =~ /^([\^\.])?([kKfFwW])?$/) { }
|
1971
|
5 |
0 |
if $1
|
1972
|
3 |
2 |
if $2
|
1981
|
6 |
2 |
if ($pos eq "^" or $pos eq "*")
|
1982
|
0 |
6 |
if (defined $rflags->[0] and $rflags->[0] ne $select)
|
1987
|
5 |
3 |
if ($pos eq "." or $pos eq "*")
|
1988
|
0 |
5 |
if (defined $rflags->[1] and $rflags->[1] ne $select)
|
1993
|
0 |
8 |
if ($err)
|
1995
|
0 |
4 |
if ($msg1)
|
2001
|
0 |
4 |
if ($msg2)
|
2018
|
1 |
553 |
if ($rOpts->{'weld-fat-comma'})
|
2034
|
0 |
4 |
unless $str
|
2037
|
0 |
4 |
unless $str
|
2055
|
10 |
0 |
if ($item =~ /^([^\(\]\{]*)?([\(\{\[])(\d)?$/) { }
|
2056
|
3 |
7 |
if $1
|
2057
|
10 |
0 |
if $2
|
2058
|
3 |
7 |
if $3
|
2065
|
0 |
10 |
unless (defined $key)
|
2071
|
7 |
3 |
if (not defined $flag1) { }
|
|
0 |
3 |
elsif (not $flag1 =~ /^[kKfFwW\*]$/) { }
|
2082
|
7 |
3 |
if (not defined $flag2) { }
|
|
0 |
3 |
elsif (not $flag2 =~ /^[012]$/) { }
|
2088
|
10 |
0 |
unless (defined $line_up_parentheses_control_hash{$key})
|
2096
|
0 |
0 |
if (defined $rflags->[0] and $rflags->[0] ne $flag1)
|
2100
|
0 |
0 |
if (defined $rflags->[1] and $rflags->[1] ne $flag2)
|
2104
|
0 |
0 |
if $err
|
2107
|
0 |
4 |
if ($msg1)
|
2113
|
0 |
4 |
if ($msg2)
|
2122
|
3 |
1 |
if ($line_up_parentheses_control_is_lxpl)
|
2126
|
5 |
0 |
if (defined $rflags)
|
2128
|
2 |
3 |
if ($flag1 and $flag1 ne "*")
|
2129
|
0 |
3 |
if ($flag2)
|
2132
|
1 |
2 |
if ($all_off)
|
2149
|
1 |
553 |
if (my(@q) = split_words($rOpts->{'nospace-after-keyword'}))
|
2152
|
0 |
1 |
if (@q == 1 and $q[0] eq "*")
|
2157
|
1 |
553 |
if (my(@q) = split_words($rOpts->{'space-after-keyword'}))
|
2185
|
2 |
552 |
if ($rOpts->{$long_name})
|
2196
|
2 |
2 |
if (defined $hash{$word}) { }
|
|
0 |
2 |
elsif ($word eq 'k') { }
|
|
1 |
1 |
elsif ($word eq 't') { }
|
|
1 |
0 |
elsif ($word eq 'kt') { }
|
2216
|
0 |
2 |
if (@unknown)
|
2238
|
2 |
122 |
if ($tok eq "?")
|
2239
|
0 |
124 |
if ($tok eq ",")
|
2242
|
22 |
102 |
if (defined $lbs and defined $rbs and $lbs < $rbs)
|
2253
|
0 |
370 |
if ($tok eq ",")
|
2256
|
361 |
9 |
if (defined $lbs and defined $rbs and $rbs < $lbs)
|
2264
|
2 |
552 |
if $rOpts->{'break-after-all-operators'}
|
2266
|
1 |
553 |
if $rOpts->{'break-before-all-operators'}
|
2281
|
2 |
552 |
unless ($want_break_before{':'})
|
2291
|
5 |
549 |
if $_ and $_ > 0
|
2294
|
0 |
554 |
if $_ and $_ > 0
|
2297
|
5 |
549 |
if $_ and $_ > 0
|
2306
|
1106 |
2 |
unless $str
|
2321
|
1 |
1 |
if ($short_name eq 'kbb') { }
|
|
1 |
0 |
elsif ($short_name eq 'kba') { }
|
2331
|
0 |
3 |
if ($item =~ /^( [ \w\* ] )( [ \{\(\[\}\)\] ] )$/x)
|
2339
|
0 |
3 |
unless (Perl::Tidy::Tokenizer::is_valid_token_type($type))
|
2344
|
0 |
2 |
if (@unknown_types)
|
2358
|
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\*]$/) { }
|
2568
|
2 |
552 |
if ($rOpts_whitespace_cycle)
|
2569
|
2 |
0 |
if ($rOpts_whitespace_cycle > 0) { }
|
2584
|
1 |
553 |
if ($rOpts_variable_maximum_line_length)
|
2608
|
541 |
9965 |
if ($excess_inside_space <= 0)
|
2631
|
541 |
8354 |
if $remaining_cycles <= 3
|
2675
|
6 |
548 |
if ($option)
|
2681
|
7 |
547 |
if (defined $option and length $option)
|
2689
|
7 |
0 |
if (length $option == 1) { }
|
2699
|
0 |
0 |
if (length $part >= 2 and length $part <= 3) { }
|
2702
|
0 |
0 |
if ($is_opening_token{$key_o}) { }
|
2704
|
0 |
0 |
if (length $part == 3)
|
2721
|
7 |
0 |
unless ($error_message)
|
2725
|
0 |
21 |
if ($val and not $is_valid_flag{$val})
|
2731
|
0 |
21 |
if ($paren_flag)
|
2732
|
0 |
0 |
unless ($paren_flag =~ /^[kKfFwW]$/)
|
2737
|
0 |
0 |
if ($key ne ")")
|
2746
|
0 |
7 |
if ($error_message) { }
|
2760
|
4 |
550 |
if ($rOpts_add_trailing_commas and $rOpts_delete_trailing_commas)
|
2770
|
0 |
4 |
if ($rOpts_whitespace_cycle and $rOpts_whitespace_cycle <= 4)
|
2964
|
3 |
549 |
if $jmax < 0
|
2996
|
15270 |
35919 |
if ($type eq "b")
|
3011
|
4368 |
31551 |
if ($last_type_is_opening)
|
3025
|
223 |
4145 |
if ($token eq $matching_token{$last_token}) { }
|
3026
|
49 |
174 |
if ($block_type) { }
|
3041
|
948 |
3197 |
if ($last_block_type and $last_token eq '{') { }
|
3059
|
5 |
4140 |
if ($type eq "w" and $token =~ /^\^/)
|
3063
|
908 |
3237 |
if ($tightness <= 0) { }
|
|
198 |
3039 |
elsif ($tightness > 1) { }
|
3077
|
1187 |
1852 |
if (defined $j_closing and $j_closing - $j < 5 and $rLL->[$j_closing][8] eq $last_seqno) { }
|
3085
|
995 |
192 |
if ($ws == -1)
|
3096
|
23 |
4345 |
if (%opening_container_inside_ws and $last_seqno)
|
3098
|
6 |
17 |
if ($ws_override)
|
3113
|
8336 |
27583 |
if ($is_special_ws_type{$type}) { }
|
|
4368 |
23215 |
elsif ($is_closing_type{$type}) { }
|
|
4368 |
18847 |
elsif ($is_opening_type{$type}) { }
|
3115
|
2798 |
5538 |
if ($type eq 'k') { }
|
|
1091 |
4447 |
elsif ($type eq '#') { }
|
|
1574 |
2873 |
elsif ($type eq 'w' or $type eq 'C') { }
|
|
389 |
2484 |
elsif ($type eq 'm' or $type eq '-') { }
|
|
11 |
2473 |
elsif ($last_type eq '\\' and $type eq 'Q' and $token =~ /^[\"\']/) { }
|
3124
|
1 |
0 |
if ($is_for_foreach{$token} and %keyword_paren_inner_tightness and defined $keyword_paren_inner_tightness{$token} and $j < $jmax)
|
3135
|
0 |
3 |
if $jp > $jmax
|
3136
|
0 |
3 |
if $rLL->[$jp][4] != $level
|
3137
|
2 |
1 |
unless $rLL->[$jp][5] eq "("
|
3161
|
6 |
1568 |
if $last_type eq "-"
|
3168
|
4 |
385 |
if $last_type eq "w"
|
3176
|
9 |
2 |
if ($rOpts_space_backslash_quote) { }
|
3177
|
7 |
2 |
if ($rOpts_space_backslash_quote == 1) { }
|
|
2 |
0 |
elsif ($rOpts_space_backslash_quote == 2) { }
|
3198
|
995 |
3373 |
if ($j == $j_tight_closing_paren) { }
|
3205
|
3150 |
223 |
unless (defined $ws)
|
3211
|
946 |
2204 |
if ($block_type and $token eq '}') { }
|
3216
|
198 |
2952 |
$tightness > 1 ? :
|
3221
|
23 |
4345 |
if (%closing_container_inside_ws and $seqno)
|
3223
|
6 |
17 |
if ($ws_override)
|
3238
|
2117 |
2251 |
if ($token eq '(') { }
|
|
2 |
2612 |
elsif ($token eq '{' and $type ne 'L' and $last_token eq ']') { }
|
3251
|
8 |
2109 |
if ($last_type eq '}' and $last_token ne ')') { }
|
|
630 |
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 |
1188 |
elsif ($last_type eq 'C' and $$rLL[$j + 1][5] eq ')') { }
|
3262
|
295 |
328 |
unless $rOpts_space_keyword_paren or $space_after_keyword{$last_token}
|
3310
|
32 |
816 |
$rOpts_space_function_paren ? :
|
3341
|
3698 |
670 |
if ($type eq "{")
|
3342
|
161 |
3537 |
if ($last_token eq "sub" and $last_type eq "k")
|
3347
|
257 |
3441 |
if ($last_token eq ")" and $token eq "{")
|
3351
|
0 |
3698 |
if ($last_type eq "i" and $last_token =~ /^\@/)
|
3358
|
60 |
4308 |
if ($rOpts_extended_block_tightness and $token eq "{")
|
3360
|
32 |
22 |
if (not $rblock_type_of_seqno->{$seqno} and $extended_block_tightness_list{$last_token})
|
3372
|
103 |
34725 |
if ($last_type eq 'Z' && $last_token ne '_' || $last_type eq 'h' and $type ne "#")
|
3381
|
0 |
103 |
if ($last_type eq 'Z' and $last_token eq '$' and $token eq '{') { }
|
3392
|
24694 |
10134 |
unless (defined $ws)
|
3398
|
1210 |
23484 |
if (defined $binary_ws_rules{$last_type}{$type}) { }
|
3429
|
6365 |
17119 |
if (not defined $wl) { }
|
|
5643 |
11476 |
elsif (not defined $wr) { }
|
3430
|
5996 |
369 |
defined $wr ? :
|
3436
|
10926 |
550 |
$wl == $wr || $wl == -1 || !$wr ? :
|
3448
|
280 |
34548 |
if (not $ws and $rtokh->[2] != $rtokh_last->[2])
|
3470
|
0 |
0 |
unless (defined $ws_1)
|
3471
|
0 |
0 |
unless (defined $ws_2)
|
3472
|
0 |
0 |
unless (defined $ws_3)
|
3473
|
0 |
0 |
unless (defined $ws_4)
|
3485
|
1 |
548 |
if ($rOpts->{'tight-secret-operators'})
|
3496
|
1467 |
12 |
unless %keyword_paren_inner_tightness
|
3502
|
12 |
0 |
if ($word and $sequence_number)
|
3504
|
6 |
6 |
if (defined $tightness and $tightness != 1)
|
3505
|
6 |
0 |
$tightness == 0 ? :
|
3529
|
0 |
1187 |
if ($j + 1 > $j_closing)
|
3535
|
5 |
0 |
if $token eq "-" and $last_token eq "{" and $$rLL[$j + 1][7] eq "w"
|
3543
|
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/)
|
3554
|
0 |
1187 |
if ($j_here + 1 > $j_closing)
|
3555
|
92 |
1095 |
$$rLL[$j_here + 1][7] eq 'b' ? :
|
3563
|
995 |
192 |
if ($j_next == $j_closing and $token ne "<<>>")
|
3614
|
0 |
6 |
if ($type_ll eq "k" and $is_indirect_object_taker{$tok_ll})
|
3760
|
4949 |
1303 |
if $essential_whitespace_filter_l1{$typel} and not $essential_whitespace_filter_r1{$typer}
|
3765
|
295 |
1008 |
if $essential_whitespace_filter_r2{$typer} and not $essential_whitespace_filter_l2{$typel}
|
3780
|
6 |
1002 |
if ($typer eq "#")
|
3782
|
2 |
4 |
if $tokenl and $typel eq '?' || substr($tokenl, -1) eq '$'
|
4011
|
3 |
6 |
if $type eq "b"
|
4012
|
4 |
2 |
unless $is_leading_secret_token{$token}
|
4019
|
1 |
3 |
if $jend <= $jmax and $rlong_array->[$jend][7] eq "b"
|
4023
|
1 |
3 |
if ($jend > $jmax or $tok ne $rlong_array->[$jend][5])
|
4031
|
1 |
1 |
if ($jend)
|
4565
|
18537 |
12691 |
if ($type ne "b")
|
4572
|
11581 |
19647 |
if ($type eq "b" and $last_type ne "b")
|
4585
|
12691 |
6956 |
$next_type eq 'b' ? :
|
4605
|
76 |
19571 |
if ($type eq 'k' and defined $right_bond_strength{$token}) { }
|
|
81 |
19490 |
elsif ($token eq 'ne' or $token eq 'eq') { }
|
4614
|
1110 |
18537 |
if ($i_next_nonblank > $max_index_to_go)
|
4621
|
555 |
555 |
if (not defined $bsr or $bsr > "0.55")
|
4623
|
72 |
483 |
if ($ris_list_by_seqno->{$seqno_px})
|
4627
|
17 |
55 |
if ($seqno_n and $seqno_n eq $seqno_px)
|
4635
|
76 |
19571 |
if ($next_nonblank_type eq 'k' and defined $left_bond_strength{$next_nonblank_token}) { }
|
|
81 |
19490 |
elsif ($next_nonblank_token eq 'ne' or $next_nonblank_token eq 'eq') { }
|
|
0 |
19490 |
elsif ($is_lt_gt_le_ge{$next_nonblank_token}) { }
|
4656
|
5679 |
13968 |
unless (defined $bsr)
|
4657
|
4290 |
15357 |
unless (defined $bsl)
|
4658
|
12329 |
7318 |
$bsr < $bsl ? :
|
4682
|
89 |
19558 |
if ($type eq "||" or $type eq "k" and $token eq "or")
|
4685
|
4 |
85 |
if ($is_die_confess_croak_warn{$next_nonblank_token})
|
4686
|
4 |
0 |
if ($want_break_before{$token} and $i > 0) { }
|
4691
|
1 |
3 |
if ($types_to_go[$i - 1] eq "b" and $i > 2)
|
4702
|
194 |
1789 |
if ($type eq "}" and $block_type and $next_nonblank_type ne ";")
|
4708
|
1226 |
18421 |
if ($type eq "k")
|
4711
|
5 |
41 |
if ($next_nonblank_type eq "k" and $is_last_next_redo_return{$token})
|
4724
|
233 |
993 |
if ($token eq "my")
|
4730
|
728 |
18919 |
if ($next_nonblank_type eq 'k' and $type ne 'CORE::') { }
|
|
890 |
18029 |
elsif ($next_nonblank_type eq '=>') { }
|
4732
|
65 |
663 |
if ($is_keyword_returning_list{$next_nonblank_token})
|
4733
|
0 |
65 |
if $bond_str > $list_str
|
4738
|
19 |
709 |
if ($is_good_keyword_breakpoint{$next_nonblank_token})
|
4745
|
185 |
705 |
if ($bond_str < "2.1")
|
4753
|
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})
|
4765
|
2 |
19645 |
if ($last_nonblank_type eq "F" and $next_nonblank_token eq "(")
|
4782
|
2364 |
17283 |
if ($type eq '{') { }
|
|
3 |
17280 |
elsif ($type eq 'Z') { }
|
4784
|
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])
|
4800
|
2 |
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 "/")
|
4827
|
125 |
19522 |
if ($next_nonblank_type eq '?') { }
|
|
116 |
19406 |
elsif ($next_nonblank_type eq '.') { }
|
|
995 |
18411 |
elsif ($type eq 'w') { }
|
4828
|
1 |
124 |
if $types_to_go[$i_next_nonblank + 1] eq "Q"
|
4838
|
0 |
116 |
if $types_to_go[$i_next_nonblank + 1] eq "n"
|
4844
|
0 |
983 |
if not $old_breakpoint_to_go[$i] and substr($next_nonblank_token, 0, 1) eq "/" and $next_nonblank_type ne "//"
|
4865
|
4947 |
250 |
if ($seqno and $is_container_token{$token})
|
4869
|
4830 |
258 |
if ($next_nonblank_seqno and $is_container_token{$next_nonblank_token})
|
4890
|
1654 |
17993 |
if ($binary_bond_strength{$ltype}{$rtype})
|
4896
|
255 |
19392 |
if ($binary_bond_strength_nospace{$ltype}{$next_type})
|
4901
|
49 |
19598 |
if ($nobreak_rhs{$ltype} or $nobreak_lhs{$rtype})
|
4935
|
0 |
1226 |
$token eq 'err' ? :
|
|
1226 |
18421 |
$type eq 'k' ? :
|
4937
|
0 |
729 |
$next_nonblank_token eq 'err' ? :
|
|
729 |
18918 |
$next_nonblank_type eq 'k' ? :
|
4945
|
452 |
19195 |
if (defined $bias{$left_key})
|
4946
|
30 |
422 |
unless ($want_break_before{$left_key})
|
4953
|
451 |
19196 |
if (defined $bias{$right_key})
|
4954
|
421 |
30 |
if ($want_break_before{$right_key})
|
4958
|
115 |
306 |
if ($right_key eq '.') { }
|
4959
|
13 |
40 |
unless ($last_nonblank_type eq "." and $token_length <= $rOpts_short_concatenation_item_length and not $is_closing_token{$token})
|
4986
|
18241 |
1406 |
if (defined $bond_str and not $nobreak_to_go[$i]) { }
|
4987
|
14640 |
3601 |
if ($total_nesting_depth > 0) { }
|
5001
|
92 |
1314 |
if $nobreak_to_go[$i] and $nobreak_to_go[$i] > 1
|
5011
|
383 |
19264 |
if ($total_weld_count and $seqno)
|
5013
|
68 |
315 |
if ($rK_weld_right->{$KK}) { }
|
|
27 |
288 |
elsif ($rK_weld_left->{$KK} and $is_opening_token{$token}) { }
|
5026
|
50 |
19597 |
if ($type eq "#")
|
5033
|
2745 |
16902 |
if ($strength >= 10000 and $next_nonblank_type ne "?")
|
5080
|
12 |
542 |
if ($rOpts->{'cuddled-else'})
|
5084
|
12 |
0 |
unless $rOpts->{'cuddled-block-list-exclusive'}
|
5091
|
2 |
10 |
if ($cuddled_block_list)
|
5133
|
0 |
66 |
unless $string
|
5137
|
0 |
66 |
unless @words > 0
|
5143
|
0 |
66 |
if (@words > 1)
|
5149
|
12 |
54 |
unless (defined $rcuddled_block_types->{$start})
|
5157
|
0 |
66 |
unless $word
|
5158
|
0 |
66 |
if ($no_cuddle{$word})
|
5208
|
0 |
0 |
unless $cuddled_string
|
5211
|
0 |
0 |
if $rOpts->{'cuddled-else'}
|
5214
|
0 |
0 |
unless ($rOpts->{'cuddled-else'})
|
5240
|
1 |
553 |
if ($rOpts->{'static-block-comment-prefix'})
|
5246
|
1 |
0 |
unless ($prefix =~ /^\^#/)
|
5247
|
0 |
1 |
unless ($prefix =~ /^#/)
|
5254
|
0 |
1 |
if (bad_pattern($pattern))
|
5267
|
1106 |
2 |
unless ($param)
|
5269
|
0 |
1108 |
unless ($param =~ /^#/)
|
5273
|
0 |
1108 |
if (bad_pattern($pattern))
|
5290
|
1 |
553 |
if ($rOpts->{'non-indenting-brace-prefix'})
|
5293
|
0 |
1 |
unless ($prefix =~ /^#/)
|
5297
|
0 |
1 |
if (bad_pattern($pattern))
|
5311
|
1 |
0 |
if (defined $rOpts->{'closing-side-comment-list'} and $rOpts->{'closing-side-comment-list'})
|
5339
|
554 |
0 |
if ($rOpts->{'sub-alias-list'})
|
5358
|
1 |
0 |
if (defined $rOpts->{'brace-left-list'} and $rOpts->{'brace-left-list'})
|
5363
|
1 |
553 |
if ($bl_list_string =~ /\bsub\b/)
|
5367
|
1 |
553 |
if ($bl_list_string =~ /\basub\b/)
|
5375
|
553 |
1 |
if ($bl_pattern =~ /\.\*/)
|
5382
|
1 |
0 |
if (defined $rOpts->{'brace-left-exclusion-list'} and $rOpts->{'brace-left-exclusion-list'})
|
5386
|
0 |
1 |
if ($bl_exclusion_list_string =~ /\bsub\b/)
|
5389
|
0 |
1 |
if ($bl_exclusion_list_string =~ /\basub\b/)
|
5405
|
3 |
0 |
if (defined $rOpts->{'brace-left-and-indent-list'} and $rOpts->{'brace-left-and-indent-list'})
|
5413
|
1 |
0 |
if (defined $rOpts->{'brace-left-and-indent-exclusion-list'} and $rOpts->{'brace-left-and-indent-exclusion-list'})
|
5430
|
0 |
0 |
if (defined $rOpts->{'keyword-group-blanks-list'} and $rOpts->{'keyword-group-blanks-list'})
|
5437
|
0 |
0 |
if ($word eq 'BC' or $word eq 'SBC') { }
|
5439
|
0 |
0 |
if ($word eq "SBC")
|
5458
|
0 |
0 |
if (defined $rOpts->{'block-brace-vertical-tightness-list'} and $rOpts->{'block-brace-vertical-tightness-list'})
|
5472
|
1 |
0 |
if (defined $rOpts->{$key} and $rOpts->{$key})
|
5479
|
1 |
0 |
if (defined $rOpts->{$key} and $rOpts->{$key})
|
5508
|
557 |
8281 |
if ($i eq "*")
|
5509
|
0 |
8281 |
if $seen{$i}
|
5511
|
553 |
7728 |
if ($i eq 'sub') { }
|
|
554 |
7174 |
elsif ($i eq 'asub') { }
|
|
0 |
7174 |
elsif ($i eq ';') { }
|
|
0 |
7174 |
elsif ($i eq '{') { }
|
|
551 |
6623 |
elsif ($i eq ':') { }
|
|
6623 |
0 |
elsif ($i =~ /^\w/) { }
|
5534
|
555 |
1107 |
unless (@words)
|
5538
|
553 |
1109 |
if ($seen{'sub'})
|
5541
|
554 |
1108 |
if ($seen{'asub'})
|
5544
|
1106 |
556 |
if ($sub_patterns)
|
5557
|
0 |
554 |
if ($rOpts->{'static-side-comment-prefix'})
|
5561
|
0 |
0 |
if (bad_pattern($pattern))
|
5576
|
552 |
2 |
if (not defined $csc_prefix) { }
|
5582
|
0 |
2 |
unless ($test_csc_prefix =~ /^#/)
|
5601
|
0 |
2 |
if (bad_pattern($test_csc_prefix_pattern)) { }
|
5659
|
0 |
0 |
unless $jmax >= 0
|
5664
|
0 |
0 |
unless defined $seqno
|
5668
|
0 |
0 |
if (not $seqno) { }
|
5673
|
0 |
0 |
if ($is_opening_sequence_token{$token} and $type ne "q" and $type ne "Q")
|
5689
|
0 |
0 |
unless (defined $initial_seqno)
|
5691
|
0 |
0 |
if ($is_opening_sequence_token{$token}) { }
|
|
0 |
0 |
elsif ($is_closing_sequence_token{$token}) { }
|
5694
|
0 |
0 |
if ($initial_seqno == 2 and $seqno != $last_seqno + 1)
|
5704
|
0 |
0 |
if ($saw_opening_seqno{$seqno})
|
5717
|
0 |
0 |
if ($saw_closing_seqno{$seqno})
|
5728
|
0 |
0 |
unless ($saw_opening_seqno{$seqno})
|
5753
|
0 |
965 |
unless $block_type
|
5760
|
173 |
792 |
if ($block_type =~ /$ASUB_PATTERN/) { }
|
|
116 |
676 |
elsif ($block_type =~ /$SUB_PATTERN/) { }
|
5805
|
169 |
7478 |
if ($line_type ne 'CODE') { }
|
5823
|
6672 |
806 |
if ($jmax >= 0) { }
|
5825
|
6120 |
552 |
defined $Klimit ? :
|
5867
|
5 |
7642 |
if ($tee_output)
|
5870
|
5 |
0 |
if $fh_tee
|
5890
|
0 |
6672 |
if ($jmax < 0)
|
5918
|
552 |
6120 |
unless (defined $nesting_depth)
|
5920
|
0 |
552 |
if $nesting_depth < 0
|
5941
|
9116 |
42195 |
if ($$rtype_sequence[++$j])
|
5944
|
4371 |
4745 |
if ($is_opening_token{$token}) { }
|
|
4371 |
374 |
elsif ($is_closing_token{$token}) { }
|
|
187 |
187 |
elsif ($token eq '?') { }
|
|
187 |
0 |
elsif ($token eq ':') { }
|
5952
|
965 |
3406 |
if $rblock_type->[$j]
|
5963
|
0 |
4371 |
unless (defined $opening_depth)
|
5965
|
0 |
0 |
if $opening_depth < 0
|
6002
|
4558 |
4558 |
if ($sign > 0) { }
|
6011
|
836 |
3722 |
if ($level > $self->[77])
|
6087
|
0 |
555 |
if (not $severe_error and $maximum_level >= $maximum_table_index)
|
6096
|
0 |
555 |
if ($rOpts->{'dump-block-summary'})
|
6097
|
0 |
0 |
if ($severe_error)
|
6103
|
0 |
555 |
if ($severe_error or $rOpts->{'notidy'})
|
6112
|
553 |
2 |
if ($logger_object)
|
6129
|
10 |
545 |
if $rOpts_delete_side_comments or $rOpts_delete_closing_side_comments
|
6143
|
0 |
555 |
if ($error)
|
6165
|
4 |
551 |
if $rOpts_line_up_parentheses and $rOpts_extended_line_up_parentheses
|
6217
|
0 |
0 |
$sseq > 0 ? :
|
6219
|
0 |
0 |
unless $rblock_type_of_seqno->{$seq_next}
|
6220
|
0 |
0 |
if ($sseq > 0) { }
|
6226
|
0 |
0 |
if ($item->{'maximum_depth'} < $stack_depth)
|
6239
|
0 |
0 |
if ($is_loop_type{$block_type} and defined $item)
|
6255
|
0 |
0 |
if ($seq_test != $seq_next)
|
6287
|
0 |
0 |
unless defined $Kp
|
6288
|
0 |
0 |
if ($rLL->[$Kp][5] eq ")")
|
6293
|
0 |
0 |
unless defined $K_opening
|
6298
|
0 |
0 |
if $lx < 0
|
6303
|
0 |
0 |
if $line_type ne "CODE"
|
6309
|
0 |
0 |
unless defined $Kfirst
|
6312
|
0 |
0 |
if ($rLL->[$Kfirst][7] eq "J")
|
6318
|
0 |
0 |
if $lx < $lx_open
|
6352
|
0 |
0 |
if ($type eq 'k') { }
|
|
0 |
0 |
elsif ($is_mccabe_logic_operator{$type}) { }
|
6354
|
0 |
0 |
if ($is_mccabe_logic_keyword{$token})
|
6387
|
0 |
0 |
if ($line_type eq 'CODE') { }
|
|
0 |
0 |
elsif (not $line_type =~ /^POD/) { }
|
6391
|
0 |
0 |
if (defined $Kfirst)
|
6394
|
0 |
0 |
defined $Kfirst ? :
|
6395
|
0 |
0 |
if ($jmax > 0 or $rLL->[$Klast][7] ne "#")
|
6420
|
0 |
0 |
unless ($rdump_block_types->{'*'} or $rdump_block_types->{'package'} or $rdump_block_types->{'class'})
|
6436
|
0 |
0 |
if ($type ne "i")
|
6440
|
0 |
0 |
if (substr($token, 0, 7) eq "package" and $token =~ /^package\s/ or substr($token, 0, 5) eq "class" and $token =~ /^class\s/)
|
6452
|
0 |
0 |
if ($keyword eq "class")
|
6456
|
0 |
0 |
if ($rLL->[$K_last][7] eq "#")
|
6459
|
0 |
0 |
if (defined $K_last)
|
6466
|
0 |
0 |
if (defined $block_type_next and $block_type_next =~ /^(class|package)\b/)
|
6475
|
0 |
0 |
if ($parent_seqno != 1)
|
6477
|
0 |
0 |
if (defined $Kc)
|
6483
|
0 |
0 |
if (defined(my $ix = $package_sweep[$level]))
|
6486
|
0 |
0 |
if ($Kc > $KK)
|
6549
|
0 |
0 |
if (not defined $Kfirst && defined $Klast or $Kfirst > $K_opening)
|
6563
|
0 |
0 |
if (defined $item)
|
6570
|
0 |
0 |
$item->{'is_inner_loop'} ? :
|
6574
|
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}) { }
|
6599
|
0 |
0 |
if ($token_type eq "b")
|
6600
|
0 |
0 |
if ($token_type eq "=>")
|
6601
|
0 |
0 |
if ($token_type eq "=")
|
6602
|
0 |
0 |
if ($token_type eq "i" and $saw_equals or $token_type eq 'w' || $token_type eq 'Q' and $saw_fat_comma)
|
6647
|
0 |
0 |
if ($is_loop_type{$block_type})
|
6685
|
0 |
0 |
unless (defined $rOpts_dump_block_types)
|
6698
|
0 |
0 |
unless @{$rselected_blocks;} or @{$rpackage_list;}
|
6709
|
0 |
0 |
unless (defined $rOpts_dump_block_minimum_lines)
|
6731
|
0 |
0 |
if (defined $code_lines_open and defined $code_lines_close)
|
6736
|
0 |
0 |
if ($code_lines < $rOpts_dump_block_minimum_lines)
|
6744
|
0 |
0 |
if (defined $mccabe_opening and defined $mccabe_closing)
|
6765
|
0 |
0 |
unless @{$routput_lines;}
|
6796
|
0 |
1110 |
if (do {
|
6797
|
0 |
555 |
if $rOpts->{'experimental'}
|
6802
|
0 |
555 |
unless $calculate_ci
|
6840
|
3 |
552 |
unless defined $Klimit
|
6887
|
0 |
104 |
unless defined $Kc
|
6889
|
0 |
104 |
unless defined $Kcn
|
6893
|
70 |
34 |
if $seqno_n
|
6895
|
0 |
34 |
unless defined $Knn
|
6897
|
9 |
25 |
unless $seqno_nn
|
6899
|
12 |
13 |
unless $K_nno and $K_nno == $Knn
|
6902
|
6 |
7 |
if ($block_type)
|
6913
|
0 |
187 |
unless defined $Km
|
6915
|
0 |
180 |
if ($rLL->[$Kt][7] eq "#")
|
6940
|
22224 |
36157 |
if ($type eq "b")
|
6951
|
1092 |
35065 |
if ($type eq "#")
|
6962
|
4 |
1088 |
if ($parent_container_type eq "Ternary")
|
6964
|
4 |
0 |
if ($Kn)
|
6966
|
4 |
0 |
if ($is_ternary{$type_kn})
|
6972
|
4 |
0 |
if ($Kn == $rparent->{'_Kc'})
|
6984
|
18 |
0 |
if ($ci_this and !$rparent->{'_ci_close'} || !$rparent->{'_ci_open_next'} && ($rparent->{'_comma_count'} || $last_type eq ',' || $is_closing_type{$last_type}))
|
7000
|
37 |
0 |
if ($rK_range)
|
7001
|
11 |
26 |
if (defined $Kfirst and $Kfirst == $KK)
|
7005
|
11 |
0 |
unless $Kn
|
7007
|
0 |
0 |
if ($Kn and $Kc and $Kn == $Kc || $rLL->[$Kn][7] eq ',' && $want_break_before_comma && $parent_container_type eq 'List')
|
7030
|
0 |
0 |
if ($level_Kc < $level_KK)
|
7059
|
9116 |
25949 |
if ($rtoken_K->[8]) { }
|
|
2674 |
23275 |
elsif ($type eq ';' or $type eq 'J' or $type eq 'f') { }
|
|
2804 |
20471 |
elsif ($type eq 'k') { }
|
|
3034 |
17437 |
elsif ($type eq ',') { }
|
|
54 |
34492 |
elsif ($type eq 'q' and $token eq '') { }
|
7066
|
4558 |
4558 |
if ($is_opening_sequence_token{$token}) { }
|
7078
|
187 |
4371 |
$type eq '?' ? :
|
7082
|
4558 |
0 |
if ($KK < $Klimit)
|
7084
|
3119 |
1439 |
if ($rLL->[$Kn][7] eq "b" and $Kn < $Klimit)
|
7091
|
4439 |
119 |
if ($Kc and $Kc < $Klimit)
|
7093
|
2327 |
2112 |
if ($rLL->[$Kcn][7] eq "b" and $Kcn < $Klimit)
|
7096
|
90 |
4349 |
if ($rLL->[$Kcn][7] eq "#")
|
7101
|
4558 |
0 |
$Kn ? :
|
7109
|
3841 |
717 |
if ($opening_level_jump > 0)
|
7115
|
1885 |
2673 |
if ($rtype_count)
|
7123
|
393 |
1492 |
if ($semicolon_count and $semicolon_count == 1)
|
7125
|
373 |
20 |
if ($rLL->[$Kcm][7] eq ";")
|
7137
|
964 |
3594 |
if ($block_type) { }
|
|
187 |
3407 |
elsif ($type eq '?') { }
|
7148
|
538 |
426 |
unless ($no_semicolon)
|
7155
|
347 |
191 |
if ($is_block_with_ci{$block_type})
|
7159
|
6 |
341 |
if ($parent_seqno != 1 and not $rparent->{'_comma_count'} and not $rparent->{'_semicolon_count'} and &$map_block_follows($seqno)) { }
|
7171
|
0 |
6 |
if ($ci_last)
|
7181
|
174 |
364 |
if (not $ci_close and $Kcn)
|
7184
|
1 |
33 |
if ($type_kcn =~ /^(\.|\&\&|\|\|)$/ or $type_kcn eq "k" and $is_and_or{$token_kcn})
|
7192
|
958 |
6 |
if ($rparent->{'_container_type'} ne "Ternary")
|
7204
|
52 |
135 |
if ($rparent->{'_container_type'} eq "List" and not $rparent->{'_ci_open_next'})
|
7213
|
187 |
0 |
unless ($opening_level_jump)
|
7230
|
1894 |
1513 |
if (not $is_logical and $token eq "(")
|
7234
|
433 |
1461 |
if ($last_type eq 'k') { }
|
|
590 |
871 |
elsif ($last_type eq 'i' and defined $Kcn) { }
|
|
61 |
810 |
elsif ($last_token eq '(') { }
|
7238
|
28 |
405 |
if ($last_token eq "for")
|
7248
|
47 |
543 |
if ($seqno_kcn and $type_kcn eq "{")
|
7263
|
2 |
600 |
unless defined $Km
|
7264
|
551 |
49 |
unless $rLL->[$Km][7] eq "k"
|
7266
|
12 |
37 |
if $tok eq "my"
|
7281
|
598 |
2809 |
if ($is_logical) { }
|
7285
|
6 |
592 |
if ($last_type eq "!")
|
7292
|
307 |
291 |
if ($type eq "[" and 1)
|
7297
|
7 |
300 |
if ($last_type eq "}")
|
7302
|
291 |
307 |
if ($opening_level_jump)
|
7316
|
1652 |
1157 |
if ($rparent->{'_container_type'} eq 'Block') { }
|
7319
|
1651 |
1 |
if (defined $Kcn)
|
7322
|
58 |
1593 |
if ($closing_level_jump < 0)
|
7331
|
566 |
591 |
unless ($rparent->{'_comma_count'})
|
7337
|
20 |
76 |
if ($ci_close_next != $ci_close and defined $Kcn and $bin_op_type{$rLL->[$Kcn][7]})
|
7345
|
55 |
1102 |
if ($rparent->{'_container_type'} eq "Ternary")
|
7351
|
0 |
2809 |
if ($token ne "(" and $last_type eq "}")
|
7362
|
724 |
857 |
if ($type eq "{" and $token ne "(" and $is_list_end_type{$last_type} and not $ris_asub_block->{$seqno})
|
7375
|
0 |
4558 |
if ($ci_close < $ci_this)
|
7398
|
0 |
4558 |
if ($seqno_test ne $seqno)
|
7412
|
4558 |
0 |
if (@{$rstack;}) { }
|
7425
|
205 |
3147 |
if ($ci_this > 0 and not $ci_open_old and not $rparent->{'_ci_close'})
|
7428
|
5 |
27 |
if ($Kc and $Kn and $Kc == $Kn)
|
7444
|
1248 |
1426 |
if ($is_closing_type{$last_type})
|
7452
|
1 |
2803 |
if (substr($token, 0, 6) eq "format")
|
7464
|
2815 |
219 |
if ($rparent->{'_container_type'} eq "List")
|
7518
|
35011 |
0 |
unless $ci_comments_only
|
7536
|
2 |
550 |
if ($self->[76])
|
7539
|
3 |
7 |
if $line_type ne "CODE"
|
7541
|
1 |
6 |
unless defined $Kfirst
|
7623
|
169 |
7478 |
if ($line_type ne "CODE")
|
7631
|
6672 |
806 |
defined $Kfirst ? :
|
7634
|
1114 |
6364 |
if ($jmax >= 0 and $rLL->[$Klast][7] eq "#")
|
7635
|
786 |
328 |
if ($jmax == 0) { }
|
7640
|
57 |
7421 |
if ($In_format_skipping_section)
|
7643
|
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/) { }
|
7683
|
47 |
7374 |
if ($line_of_tokens->{'_starting_in_quote'})
|
7687
|
28 |
19 |
if ($jmax <= 0)
|
7688
|
0 |
28 |
if ($self->[76] and $input_line =~ /\t/)
|
7698
|
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/)
|
7719
|
145 |
7235 |
if ($jmax > 0 and $rLL->[$Klast][7] eq "b")
|
7724
|
801 |
6579 |
if ($jmax < 0)
|
7730
|
760 |
5819 |
if ($is_block_comment)
|
7735
|
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/)
|
7754
|
2 |
758 |
if ($no_leading_space and $input_line =~ /^\# \s*
|
7766
|
61 |
8 |
if ($last_line_had_side_comment and not $no_leading_space and not $is_static_block_comment)
|
7774
|
26 |
35 |
if ($last_CODE_type eq 'HSC') { }
|
|
33 |
2 |
elsif ($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/) { }
|
7801
|
31 |
2 |
if $rLL->[$K_penult][7] eq "b"
|
7808
|
33 |
0 |
unless ($follows_csc)
|
7816
|
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) { }
|
7817
|
13 |
10 |
$no_leading_space ? :
|
7839
|
12 |
5807 |
if ($rOpts_indent_only)
|
7844
|
64 |
5743 |
unless ($rOpts_add_newlines)
|
7870
|
4 |
5739 |
if (not $Saw_VERSION_in_this_file and $jmax < 80 and $input_line =~ /^[^;]*;?[^;]*([\$*])(([\w\:\']*)\bVERSION)\b.*\=/)
|
7887
|
387 |
7260 |
if ($has_side_comment)
|
7912
|
1 |
554 |
unless $rOpts->{'non-indenting-braces'}
|
7914
|
3 |
551 |
unless defined $rLL and @{$rLL;}
|
7923
|
0 |
381 |
if ($line_type ne "CODE")
|
7931
|
0 |
381 |
unless (defined $Kfirst and $rLL->[$Klast][7] eq "#")
|
7937
|
59 |
322 |
unless $Klast > $Kfirst
|
7941
|
316 |
6 |
if ($type_m eq "b" and $K_m > $Kfirst)
|
7946
|
111 |
211 |
if ($seqno_m)
|
7953
|
6 |
86 |
if ($block_type_m and $is_opening_type{$type_m} and $token_sc =~ /$non_indenting_brace_pattern/)
|
7982
|
0 |
23 |
if ($line_type ne "CODE")
|
7996
|
0 |
23 |
unless (defined $Kfirst and $rLL->[$Klast][7] eq "#")
|
8015
|
0 |
23 |
if ($rseqno_non_indenting_brace_by_ix->{$ix})
|
8019
|
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')
|
8032
|
3 |
0 |
if ($type_m eq "b" and $K_m > $Kfirst)
|
8034
|
2 |
1 |
if ($seqno_m)
|
8036
|
2 |
0 |
if ($block_type_m and $token =~ /$closing_side_comment_prefix_pattern/ and $block_type_m =~ /$closing_side_comment_list_pattern/)
|
8045
|
22 |
1 |
if ($delete_side_comment)
|
8055
|
2 |
20 |
if ($CODE_type eq "IO")
|
8065
|
5 |
17 |
if ($CODE_type eq "HSC")
|
8264
|
3 |
552 |
if ($rOpts->{'indent-only'})
|
8316
|
169 |
7459 |
unless $line_type eq "CODE"
|
8319
|
803 |
6656 |
if ($CODE_type eq "BL")
|
8321
|
79 |
724 |
if (defined $seqno)
|
8324
|
48 |
31 |
if not $ris_permanently_broken->{$seqno} and $rOpts_maximum_consecutive_blank_lines
|
8331
|
803 |
6656 |
unless defined $Kfirst
|
8345
|
6107 |
549 |
if (defined $last_K_out) { }
|
8346
|
0 |
6107 |
if ($Kfirst != $last_K_out + 1)
|
8358
|
0 |
549 |
if ($Kfirst != 0)
|
8365
|
849 |
68 |
if ($CODE_type and $CODE_type ne "NIN" and $CODE_type ne "VER")
|
8384
|
54 |
795 |
if ($CODE_type eq "HSC")
|
8388
|
54 |
0 |
if ($Kfirst == $Klast and $rvars_Kfirst->[7] eq '#') { }
|
8431
|
470 |
5337 |
if ($type_end eq '#' || $type_end eq 'b' and $Klast_old_code > $Kfirst_old)
|
8435
|
319 |
151 |
if ($rLL->[$Klast_old_code][7] eq "b" and $Klast_old_code > $Kfirst_old)
|
8447
|
5500 |
307 |
if ($last_line_type eq "CODE")
|
8450
|
127 |
5373 |
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))
|
8480
|
549 |
3 |
if (@{$rLL_new;})
|
8510
|
15110 |
34776 |
if ($type eq "b")
|
8516
|
160 |
14950 |
if $KK >= $Klast
|
8519
|
0 |
14950 |
if ($rOpts_freeze_whitespace)
|
8525
|
752 |
14198 |
if ($ws == -1 or $rOpts_delete_old_whitespace)
|
8542
|
639 |
113 |
unless $do_not_delete
|
8554
|
9062 |
25714 |
if ($rtoken_vars->[8]) { }
|
|
7042 |
18672 |
elsif ($is_wit{$type}) { }
|
|
2388 |
16284 |
elsif ($type eq ';') { }
|
|
1856 |
14428 |
elsif ($type eq 'n') { }
|
|
274 |
14154 |
elsif ($type eq 'q') { }
|
|
2957 |
11197 |
elsif ($type eq ',') { }
|
|
79 |
11118 |
elsif ($type eq 'J') { }
|
|
2458 |
8660 |
elsif ($type eq 'Q') { }
|
8557
|
4345 |
4717 |
if ($is_closing_token{$token})
|
8565
|
965 |
3380 |
if ($block_type) { }
|
8568
|
537 |
428 |
if ($last_nonblank_code_type ne ";")
|
8572
|
530 |
7 |
if $rOpts->{'add-semicolons'}
|
8583
|
1020 |
6 |
if ($rtype_count and $rtype_count->{','} and not $rtype_count->{';'} and not $rtype_count->{'f'})
|
8590
|
735 |
285 |
if ($last_nonblank_code_type ne ',') { }
|
8593
|
24 |
711 |
if ($rOpts_add_trailing_commas and %trailing_comma_rules)
|
8606
|
60 |
225 |
if ($rOpts_delete_trailing_commas and %trailing_comma_rules)
|
8615
|
1 |
0 |
if (not $deleted and $rOpts_delete_weld_interfering_commas and $is_closing_type{$last_last_nonblank_code_type})
|
8636
|
159 |
6883 |
if (index($token, " ") > 0 or index($token, "\t") > 0)
|
8642
|
6 |
153 |
if ($ord > 0 and $ord < 33 || $ord > 126)
|
8652
|
5 |
1 |
if ($is_sigil{$sigil})
|
8654
|
5 |
0 |
if defined $word
|
8660
|
159 |
0 |
if ($type eq "i")
|
8662
|
128 |
31 |
if ($token =~ /$SUB_PATTERN/) { }
|
|
25 |
6 |
elsif ($token =~ /^(package|class)\s/) { }
|
8667
|
118 |
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) { }
|
8707
|
0 |
159 |
if ($ord_ch > 0 and $ord_ch < 33 || $ord_ch > 126)
|
8727
|
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 ';')
|
8759
|
15 |
1 |
if ($KK < $Klast) { }
|
8761
|
14 |
1 |
if (defined $Kn and $Kn <= $Klast)
|
8775
|
13 |
3 |
if ($ok_to_delete) { }
|
8789
|
0 |
1856 |
if (substr($token, 0, 1) eq "x" and $token =~ /^x\d+/)
|
8808
|
0 |
274 |
if ($self->[76] and $token =~ /\t/)
|
8811
|
66 |
191 |
if ($rwhitespace_flags->[$KK] == 1 and @{$rLL_new;} and $rLL_new->[-1][7] ne "b" and $rOpts_add_whitespace)
|
8824
|
3 |
7 |
if ($last_nonblank_code_type eq "," and $rOpts->{'delete-repeated-commas'})
|
8833
|
259 |
2695 |
if (%trailing_comma_rules)
|
8835
|
112 |
147 |
if (defined $seqno and not defined $self->[24]{$seqno})
|
8853
|
1 |
2457 |
if $self->[76]
|
8858
|
7465 |
14511 |
if ($rwhitespace_flags->[$KK] == 1 and @{$rLL_new;} and $rLL_new->[-1][7] ne "b" and $rOpts_add_whitespace)
|
8877
|
549 |
3 |
if (@{$rLL_new;})
|
8881
|
9110 |
49149 |
if ($rLL_new->[$KK][8])
|
8890
|
0 |
4368 |
unless defined $K_opening
|
8894
|
0 |
4368 |
unless defined $K_closing
|
8904
|
1885 |
2483 |
if ($rtype_count)
|
8908
|
17 |
1868 |
if ($rtype_count->{'f'})
|
8917
|
1218 |
667 |
if ($comma_count || $fat_comma_count and not $semicolon_count)
|
8923
|
731 |
487 |
if ($rLL_new->[$K_opening][5] eq "(")
|
8925
|
730 |
1 |
if (defined $Kp)
|
8931
|
125 |
605 |
$type_p eq 'k' ? :
|
8944
|
18 |
4350 |
if ($block_type and substr($block_type, -1, 1) eq " ")
|
8952
|
18 |
0 |
if (defined $Knn1)
|
8955
|
18 |
0 |
defined $Knn1 ? :
|
8956
|
18 |
0 |
defined $Knn2 ? :
|
8959
|
6 |
3 |
if ($wU{$type_nn1} and $wiq{$type_nn2})
|
8964
|
1 |
17 |
if ($is_list)
|
8976
|
1202 |
3166 |
if ($is_list and not $block_type) { }
|
|
43 |
5325 |
elsif ($block_type and $rOpts_line_up_parentheses) { }
|
8984
|
619 |
590 |
if (not $rhas_list->{$seqno_parent} or $rhas_list->{$seqno_parent} > $depth)
|
8990
|
391 |
818 |
if ($line_diff)
|
9001
|
177 |
163 |
if ($rlec_count_by_seqno->{$seqno} and $rlec_count_by_seqno->{$seqno} > 1 || $rtype_count_by_seqno->{$seqno}{'=>'})
|
9037
|
31 |
521 |
if ($rOpts_line_up_parentheses)
|
9043
|
1 |
0 |
if $line_Kh == $line_Kc
|
9051
|
0 |
552 |
if ($rOpts_comma_arrow_breakpoints == 3)
|
9055
|
0 |
0 |
unless $rtype_count and $rtype_count->{'=>'}
|
9058
|
0 |
0 |
unless (defined $roverride_cab3->{$seqno})
|
9059
|
0 |
0 |
if ($rhas_list->{$seqno}) { }
|
9066
|
0 |
0 |
if (defined $seqno_parent and $ris_list_by_seqno->{$seqno_parent})
|
9083
|
97 |
470 |
$type_last eq 'f' ? :
|
9085
|
310 |
257 |
if ($type ne "b" and $type ne "#")
|
9120
|
7658 |
50655 |
unless ($item)
|
9124
|
7658 |
0 |
if (@{$rLL_new;} and $rLL_new->[-1][7] ne 'b') { }
|
9159
|
502 |
57811 |
$is_encoded_data ? :
|
9163
|
22308 |
36005 |
if ($type eq 'b') { }
|
|
1091 |
34914 |
elsif ($type eq '#') { }
|
9168
|
5 |
22303 |
if (@{$rLL_new;} and $rLL_new->[-1][7] eq "b")
|
9178
|
20 |
1071 |
if ($ord > 0 and $ord < 33 || $ord > 126 and $token =~ s/\s+$//)
|
9192
|
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/)
|
9200
|
3 |
4 |
if ($Ktoken_vars > $Kfirst_old) { }
|
9223
|
17 |
28 |
if ($ignore_sc_length and !$CODE_type || $CODE_type eq 'HSC')
|
9228
|
296 |
795 |
if (defined $seqno)
|
9229
|
75 |
221 |
if $CODE_type eq "BC"
|
9232
|
116 |
180 |
unless $ris_permanently_broken->{$seqno}
|
9242
|
9110 |
25804 |
if ($type_sequence)
|
9247
|
4368 |
4742 |
if ($is_opening_token{$token}) { }
|
|
4368 |
374 |
elsif ($is_closing_token{$token}) { }
|
9255
|
5 |
167 |
if ($last_nonblank_code_type eq "," and $Ktoken_vars == $Klast_old_code and $Ktoken_vars > $Kfirst_old)
|
9262
|
394 |
3974 |
if ($last_nonblank_code_type eq "=" or $last_nonblank_code_type eq "=>")
|
9270
|
1855 |
2513 |
unless defined $seqno_parent
|
9277
|
1231 |
3137 |
if ($depth_next > $depth_next_max)
|
9287
|
300 |
4068 |
if ($last_nonblank_code_type eq "," or $last_nonblank_code_type eq "=>")
|
9293
|
165 |
0 |
if ($Ktoken_vars == $Kfirst_old and $last_nonblank_code_type eq "," and $rlec_count_by_seqno->{$type_sequence})
|
9308
|
220 |
154 |
unless defined $seqno_parent
|
9312
|
187 |
187 |
if ($token eq '?') { }
|
|
187 |
0 |
elsif ($token eq ':') { }
|
9348
|
6564 |
28350 |
if ($is_counted_type{$type})
|
9350
|
4868 |
1696 |
if (defined $seqno)
|
9354
|
978 |
3890 |
if ($type eq "," and $Ktoken_vars == $Klast_old_code)
|
9359
|
6 |
4862 |
if ($type eq "h" and not $K_first_here_doc_by_seqno{$seqno})
|
9400
|
0 |
530 |
unless $type_sequence
|
9402
|
0 |
530 |
unless $block_type
|
9404
|
226 |
166 |
unless $ok_to_add_semicolon_for_block_type{$block_type} or $block_type =~ /^(sub|package)/ or $block_type =~ /^\w+\:$/
|
9410
|
0 |
304 |
unless defined $Kp
|
9425
|
0 |
170 |
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/
|
9446
|
34 |
5 |
if ($seqno_inner and $is_closing_token{$token_p} and defined $rchildren_of_seqno->{$type_sequence} and @{$rchildren_of_seqno->{$type_sequence};} == 1)
|
9459
|
34 |
0 |
if (defined $K_outer_opening)
|
9461
|
34 |
0 |
if (defined $K_nxt)
|
9467
|
8 |
26 |
if $seqno_nxt and $seqno_nxt == $seqno_inner
|
9478
|
123 |
39 |
if ($rLL_new->[$Ktop][7] eq 'b' and $want_left_space{';'} == -1) { }
|
9492
|
3 |
120 |
if ($rOpts_one_line_block_semicolons == 2)
|
9523
|
1 |
38 |
if ($rLL_new->[$Ktop][7] eq "b")
|
9526
|
0 |
1 |
if ($new_top_ix < $old_top_ix)
|
9560
|
0 |
24 |
unless defined $Kp
|
9562
|
0 |
24 |
if $type_p eq "#"
|
9570
|
11 |
13 |
if ($match)
|
9601
|
0 |
60 |
unless defined $Kp
|
9602
|
0 |
60 |
if ($rLL_new->[$Kp][7] ne ",")
|
9611
|
0 |
60 |
if ($rLL_new->[$Kp][4] >= $high_stress_level)
|
9622
|
0 |
48 |
unless ($match or $rOpts_add_whitespace)
|
9624
|
0 |
0 |
if (defined $Kn)
|
9626
|
0 |
0 |
if ($type_n ne ";" and $type_n ne "#")
|
9631
|
48 |
12 |
unless ($match)
|
9664
|
0 |
1 |
unless $type_sequence
|
9668
|
0 |
1 |
unless defined $Kp
|
9669
|
0 |
1 |
if ($rLL_new->[$Kp][7] ne ",")
|
9680
|
0 |
1 |
unless defined $rtype_count and $rtype_count->{','} and $rtype_count->{','} == 1
|
9684
|
0 |
1 |
unless defined $Kpp
|
9689
|
1 |
0 |
if ($seqno_pp and $is_closing_type{$type_pp})
|
9690
|
1 |
0 |
if ($seqno_pp == $type_sequence + 1)
|
9717
|
0 |
49 |
if (@{$rLL_new;} < 3)
|
9725
|
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) { }
|
9754
|
49 |
0 |
if ($rLL_new->[-1][7] ne "b")
|
9755
|
43 |
6 |
if (defined $rblank)
|
9790
|
0 |
84 |
unless $trailing_comma_rule
|
9812
|
0 |
84 |
unless (defined $trailing_comma_style)
|
9818
|
0 |
84 |
unless $type_sequence
|
9821
|
0 |
84 |
unless defined $rtype_count and $rtype_count->{','}
|
9828
|
0 |
84 |
unless defined $K_opening
|
9841
|
0 |
84 |
if (not defined $iline_first) { }
|
9857
|
24 |
60 |
$if_add ? :
|
9867
|
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') { }
|
9902
|
22 |
10 |
unless $is_bare_multiline_comma
|
9907
|
4 |
6 |
if $if_add
|
9909
|
2 |
8 |
if ($excess_commas > 0)
|
9915
|
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) { }
|
9950
|
4 |
4 |
if (not $match and $fat_comma_count and $fat_comma_count >= 2)
|
9959
|
2 |
6 |
if (not $match and $trailing_comma_style eq "i")
|
9980
|
0 |
0 |
if ($match and $paren_flag and $paren_flag ne 1 and $paren_flag ne "*" and $closing_token eq ")")
|
9994
|
23 |
37 |
if ($match)
|
9995
|
17 |
6 |
if ($if_add and $rOpts_delete_trailing_commas or not $if_add and $rOpts_add_trailing_commas)
|
10003
|
0 |
17 |
if ($rOpts_comma_arrow_breakpoints == 3)
|
10031
|
2 |
9 |
if ($top_is_space and $want_left_space{$type} == -1) { }
|
10052
|
2 |
0 |
if ($is_counted_type{$type})
|
10054
|
2 |
0 |
if ($seqno)
|
10078
|
0 |
9 |
if ($top_is_space)
|
10081
|
0 |
0 |
if ($new_top_ix < $old_top_ix)
|
10100
|
0 |
1 |
if ($token =~ /\t/)
|
10110
|
1 |
0 |
unless $is_s_y_m_slash{substr $token, 0, 1} or substr($token, 0, 2) eq "tr"
|
10115
|
0 |
0 |
unless defined $Kp
|
10117
|
0 |
0 |
unless $is_unexpected_equals{$previous_nonblank_type}
|
10123
|
0 |
0 |
if (defined $Kpp)
|
10131
|
0 |
0 |
if ($Kn <= $Kmax and $rLL->[$Kn][7] eq "b")
|
10132
|
0 |
0 |
if ($Kn <= $Kmax)
|
10139
|
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})
|
10170
|
0 |
293 |
unless (defined $token)
|
10171
|
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 ',') { }
|
10213
|
0 |
513 |
unless defined $KK and $KK >= 0
|
10216
|
513 |
0 |
unless defined $rLL
|
10220
|
0 |
878 |
unless (defined $rLL->[$Knnb])
|
10228
|
502 |
376 |
if ($rLL->[$Knnb][7] ne "b" and $rLL->[$Knnb][7] ne "#")
|
10243
|
0 |
541 |
unless defined $KK and $KK >= 0
|
10249
|
505 |
36 |
unless defined $rLL
|
10252
|
1 |
540 |
unless $Knnb < $Num
|
10253
|
86 |
454 |
if $rLL->[$Knnb][7] ne "b"
|
10254
|
0 |
454 |
unless ++$Knnb < $Num
|
10255
|
454 |
0 |
if $rLL->[$Knnb][7] ne "b"
|
10267
|
0 |
0 |
unless (defined $rLL->[$Knnb])
|
10271
|
0 |
0 |
if ($rLL->[$Knnb][7] ne "b")
|
10284
|
1772 |
732 |
unless defined $rLL
|
10286
|
1 |
2503 |
if (not defined $KK) { }
|
|
0 |
2503 |
elsif ($KK > $Num) { }
|
10299
|
2501 |
1062 |
if ($rLL->[$Kpnb][7] ne "b" and $rLL->[$Kpnb][7] ne "#")
|
10316
|
379 |
396 |
unless defined $rLL
|
10318
|
389 |
386 |
if (not defined $KK) { }
|
|
0 |
386 |
elsif ($KK > $Num) { }
|
10330
|
9 |
766 |
unless $Kpnb >= 0
|
10331
|
232 |
534 |
if $rLL->[$Kpnb][7] ne "b"
|
10332
|
0 |
534 |
unless --$Kpnb >= 0
|
10333
|
534 |
0 |
if $rLL->[$Kpnb][7] ne "b"
|
10337
|
0 |
0 |
unless --$Kpnb >= 0
|
10339
|
0 |
0 |
if ($rLL->[$Kpnb][7] ne "b")
|
10372
|
63 |
145 |
if ($type_sequence) { }
|
10377
|
122 |
23 |
if (defined $Kt)
|
10382
|
19 |
103 |
if ($is_closing_type{$type}) { }
|
10392
|
0 |
208 |
unless defined $parent_seqno
|
10405
|
0 |
316 |
if ($i < 0)
|
10411
|
175 |
141 |
if not $seqno or $seqno eq 1
|
10412
|
34 |
107 |
if $self->[7]{$seqno}
|
10422
|
1178 |
588 |
unless $seqno and $seqno ne 1
|
10423
|
157 |
431 |
if ($self->[36]{$seqno})
|
10435
|
0 |
165 |
unless defined $parent_seqno
|
10444
|
0 |
46 |
unless defined $seqno
|
10469
|
549 |
3 |
defined $Klimit ? :
|
10498
|
7459 |
169 |
if ($line_type eq "CODE")
|
10504
|
6656 |
803 |
if (defined $Kfirst_old)
|
10521
|
4539 |
513 |
if ($Knext_guess > $Knext and $Knext_guess < $Kmax and $rLL->[$Knext_guess][2] <= $iline)
|
10536
|
6650 |
809 |
if ($Knext > $Knext_beg)
|
10541
|
5216 |
1434 |
if ($rLL->[$Klast][7] eq "b")
|
10543
|
0 |
6650 |
if ($Klast < $Knext_beg) { }
|
10552
|
5924 |
726 |
if ($rLL->[$Kfirst][7] ne "#")
|
10560
|
5742 |
908 |
if (not $CODE_type or $CODE_type eq "VER")
|
10571
|
145 |
7314 |
if ($line_of_tokens->{'_ended_in_blank_token'})
|
10578
|
809 |
6650 |
if (not defined $Kfirst) { }
|
10580
|
1 |
808 |
unless ($CODE_type)
|
10590
|
227 |
6423 |
if ($rLL->[$Kfirst][7] eq "q" or $rLL->[$Klast][7] eq "q")
|
10603
|
0 |
552 |
if ($Knext <= $Kmax)
|
10639
|
25 |
7 |
if (not $seqno) { }
|
10641
|
7 |
18 |
if ($rkeep_break_hash->{$type})
|
10642
|
0 |
7 |
$is_soft_keep_break_type{$type} ? :
|
10650
|
0 |
7 |
if ($flag)
|
10655
|
0 |
0 |
unless ($match)
|
10656
|
0 |
0 |
if ($token eq '(' or $token eq ')') { }
|
|
0 |
0 |
elsif ($token eq '{' or $token eq '}') { }
|
10665
|
0 |
0 |
if ($flag eq 'b') { }
|
|
0 |
0 |
elsif ($flag eq 'B') { }
|
10672
|
0 |
0 |
if ($match)
|
10674
|
0 |
0 |
$is_soft_keep_break_type{$type} ? :
|
10707
|
2 |
553 |
if ($rOpts->{'break-at-old-method-breakpoints'})
|
10715
|
4 |
12 |
if ($type eq '->') { }
|
|
2 |
10 |
elsif ($token eq ')') { }
|
10725
|
0 |
2 |
unless defined $Kn and $Kn <= $Klast and $rLL->[$Kn][7] eq "->"
|
10729
|
0 |
2 |
unless $seqno
|
10751
|
554 |
1 |
unless %keep_break_before_type or %keep_break_after_type
|
10772
|
3 |
552 |
if $rOpts->{'indent-only'}
|
10773
|
6 |
546 |
unless $rOpts_add_newlines
|
10793
|
12 |
534 |
if %{$rcuddled_block_types;}
|
10795
|
23 |
523 |
if ($rOpts->{'weld-nested-containers'})
|
10822
|
0 |
110 |
if ($Kend <= $Kstart)
|
10840
|
17 |
93 |
if (defined $rK_weld_right->{$Kend} and not defined $rK_weld_left->{$Kstart})
|
10849
|
9 |
537 |
if (@K_multi_weld)
|
10854
|
0 |
17 |
if $Kstart <= $Kend
|
10886
|
0 |
59 |
$KK <= 0 ? :
|
10900
|
0 |
12 |
unless %{$rcuddled_block_types;}
|
10903
|
0 |
12 |
unless defined $rLL and @{$rLL;}
|
10925
|
0 |
394 |
unless ($type_sequence)
|
10926
|
0 |
0 |
if $KK == 0
|
10943
|
72 |
322 |
if ($level < $last_level) { }
|
|
72 |
250 |
elsif ($level > $last_level) { }
|
10949
|
176 |
218 |
unless $type eq $token
|
10951
|
65 |
153 |
if ($token eq '{') { }
|
|
65 |
88 |
elsif ($token eq '}') { }
|
10954
|
0 |
65 |
unless ($block_type)
|
10961
|
0 |
0 |
unless $Kp
|
10964
|
18 |
47 |
if ($in_chain{$level}) { }
|
10974
|
0 |
0 |
unless ($ris_broken_container->{$closing_seqno} or $rbreak_container->{$closing_seqno})
|
10977
|
0 |
0 |
unless $CBO == 2
|
10984
|
18 |
0 |
if (defined $Ko)
|
10989
|
18 |
0 |
if (defined $Kon and $rLL->[$Kon][7] ne "#")
|
10997
|
18 |
0 |
if $CBO
|
11013
|
0 |
47 |
if ($rcuddled_block_types->{$block_type}) { }
|
11023
|
65 |
0 |
if ($in_chain{$level})
|
11028
|
8 |
57 |
unless $Knn
|
11032
|
18 |
39 |
if ($rcuddled_block_types->{$chain_type}{$next_nonblank_token}) { }
|
11056
|
0 |
23 |
unless defined $rLL and @{$rLL;}
|
11084
|
132 |
116 |
if $K_outer_closing < $Num and $rLL->[$K_outer_closing][7] eq "b"
|
11088
|
4 |
244 |
unless $K_outer_closing < $Num
|
11090
|
145 |
99 |
unless $outer_seqno
|
11092
|
22 |
77 |
unless $is_closing_token{$token_outer_closing}
|
11096
|
11 |
66 |
if ($rtype_count)
|
11097
|
8 |
3 |
if $rtype_count->{','} or $rtype_count->{';'}
|
11103
|
0 |
69 |
unless defined $K_outer_opening and defined $K_inner_opening
|
11111
|
0 |
69 |
unless defined $K_io_check
|
11112
|
8 |
61 |
if ($K_io_check != $K_inner_opening)
|
11130
|
6 |
2 |
if not $inner_blocktype or $inner_blocktype ne "sub"
|
11131
|
0 |
2 |
if $rLL->[$K_io_check][5] ne "("
|
11133
|
0 |
2 |
unless defined $seqno_signature
|
11135
|
0 |
2 |
unless defined $K_signature_closing
|
11138
|
0 |
2 |
unless defined $K_test and $K_test == $K_inner_opening
|
11154
|
0 |
2 |
if $Kdiff > 4
|
11158
|
0 |
0 |
if $rtc and $rtc->{','}
|
11168
|
0 |
63 |
if ($K_diff < 0)
|
11183
|
81 |
117 |
if $rLL->[$Kn][7] eq "b"
|
11184
|
64 |
53 |
unless ($nonblank_count)
|
11185
|
60 |
57 |
if ($Kn eq $K_inner_opening)
|
11192
|
0 |
57 |
if ($type eq "#")
|
11194
|
9 |
48 |
if $is_name and $last_is_name
|
11197
|
1 |
47 |
if $type eq "m" and not $last_type
|
11200
|
3 |
44 |
if $nonblank_count > 2
|
11204
|
0 |
63 |
if $saw_comment
|
11208
|
2 |
37 |
if (defined $Kn_last_nonblank and $rLL->[$K_inner_opening][5] eq "(" and $rLL->[$Kn_last_nonblank][7] eq "k")
|
11215
|
0 |
2 |
if ($is_sort_map_grep{$token})
|
11220
|
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})
|
11288
|
6 |
0 |
unless defined $rLL
|
11290
|
0 |
6 |
unless defined $flag
|
11291
|
0 |
6 |
if $flag eq 0
|
11292
|
0 |
6 |
if $flag eq 1
|
11293
|
0 |
6 |
if $flag eq "*"
|
11294
|
0 |
6 |
unless $seqno
|
11296
|
0 |
6 |
unless defined $K_opening
|
11300
|
6 |
0 |
if (defined $Kp)
|
11313
|
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') { }
|
11330
|
21 |
14 |
unless defined $rflags
|
11331
|
7 |
7 |
$is_leading ? :
|
11332
|
4 |
10 |
unless defined $flag
|
11333
|
4 |
6 |
if $flag eq "*"
|
11396
|
46 |
9 |
if (defined $Kprev)
|
11402
|
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}) { }
|
11423
|
0 |
0 |
if ($no_previous_seq_item and substr($type_prev, 0, 1) eq "=")
|
11430
|
0 |
0 |
if ($type_prev eq "=>")
|
11435
|
0 |
0 |
if $rLL->[$KK][7] eq "b"
|
11448
|
49 |
6 |
if ($Kref < $Kouter_opening)
|
11452
|
8 |
6 |
if ($rLL->[$Knext][4] == $level_oo)
|
11453
|
4 |
4 |
if ($is_ternary{$rLL->[$Knext][7]} or $rLL->[$Knext][5] eq ")")
|
11466
|
7 |
48 |
$Kref <= 0 ? :
|
11477
|
49 |
6 |
if ($Kref < $Kouter_opening)
|
11489
|
1 |
48 |
if ($lentot_oo + $maximum_text_length_oo < $starting_lentot + $maximum_text_length)
|
11513
|
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)
|
11525
|
0 |
0 |
if ($Kprev >= 0)
|
11526
|
0 |
0 |
unless ($type_prev =~ /^[\,\.\;]/ or $type_prev =~ /^[=\{\[\(]/ and $type_pp eq 'b' || $type_pp eq '}' || $type_first eq 'k' or $type_first =~ /^[=\,\.\;\{\[\(]/ or $type_first eq "||" or $type_first eq "k" and $token_first eq 'if' || $token_first eq 'or')
|
11555
|
0 |
10 |
$Kfirst <= 0 ? :
|
11562
|
0 |
10 |
if ($rOpts_ignore_side_comment_lengths and $rLL->[$Klast][7] eq "#")
|
11566
|
0 |
0 |
if (defined $Kprev and $Kprev >= $Kfirst)
|
11614
|
1 |
22 |
unless defined $rnested_pairs and @{$rnested_pairs;}
|
11642
|
0 |
22 |
$rOpts_variable_maximum_line_length && $rOpts_line_up_parentheses ? :
|
11665
|
0 |
22 |
$opening_vertical_tightness{'('} ? :
|
11688
|
4 |
53 |
if ($Kinner_closing - $Kinner_opening <= 4)
|
11690
|
0 |
4 |
unless defined $Knext_nonblank
|
11692
|
4 |
0 |
unless $type eq "h"
|
11704
|
1 |
52 |
if ($inner_opening->[7] eq "L")
|
11709
|
0 |
52 |
if ($inner_opening->[7] eq "[")
|
11711
|
0 |
0 |
unless $rtype_count and $rtype_count->{','}
|
11718
|
0 |
0 |
if $Kdiff > 2
|
11720
|
0 |
0 |
if $Kdiff == 2 and $$rLL[$Kouter_opening + 1][7] ne "b"
|
11731
|
0 |
52 |
if ($inner_level >= $high_stress_level)
|
11755
|
0 |
52 |
if (not $do_not_weld_rule and $rOpts_break_at_old_method_breakpoints and $iline_io > $iline_oo)
|
11762
|
0 |
0 |
unless defined $rK_range
|
11764
|
0 |
0 |
unless defined $Kfirst
|
11765
|
0 |
0 |
if ($rLL->[$Kfirst][7] eq "->")
|
11771
|
0 |
52 |
if $do_not_weld_rule
|
11778
|
0 |
8 |
if (%opening_vertical_tightness and $iline_ic == $iline_io and $opening_vertical_tightness{$token_oo})
|
11804
|
0 |
0 |
if (not $is_multiline_weld and $iline_ic == $iline_io + 1 and $token_oo eq "(" and $token_io eq "(")
|
11818
|
48 |
4 |
if (not $touch_previous_pair or not $weld_count_this_start and $iline_oo > $iline_outer_opening) { }
|
11835
|
0 |
0 |
if (not $new_weld_ok and $iline_oo != $iline_io || $iline_ic != $iline_oc)
|
11851
|
4 |
44 |
if ($iline_oo == $iline_oc)
|
11895
|
1 |
3 |
if ($level_oc > $level_last)
|
11900
|
1 |
3 |
if ($Kouter_opening > $Kfirst and $level_oo > $level_first)
|
11906
|
0 |
1 |
if $rLL->[$KK][7] eq "b"
|
11907
|
1 |
0 |
if $rLL->[$KK][4] < $level_oo
|
11942
|
1 |
2 |
if ($iline_oc == $iline_oo + 1 and $iline_io == $iline_ic and $token_oo eq "(")
|
11949
|
1 |
0 |
defined $Knext_nonblank ? :
|
11953
|
1 |
0 |
if ($next_nonblank_type eq ";")
|
11958
|
0 |
1 |
if ($Knext_seq_item == $Kinner_closing)
|
12010
|
6 |
46 |
if (not $do_not_weld_rule || $is_one_line_weld and $iline_ic == $iline_io)
|
12014
|
6 |
0 |
if $token_oo eq "(" or $iline_oo != $iline_io
|
12025
|
0 |
0 |
if (not $do_not_weld_rule and $rOpts_line_up_parentheses and $rOpts_asbl and $ris_asub_block->{$outer_seqno})
|
12037
|
46 |
6 |
unless ($do_not_weld_rule)
|
12050
|
0 |
46 |
unless defined $Knext_io
|
12055
|
7 |
39 |
if ($type_io_next eq "w")
|
12057
|
0 |
7 |
unless defined $Knext_io2
|
12059
|
0 |
7 |
unless ($type_ok_after_bareword{$type_io_next2})
|
12067
|
27 |
19 |
$is_one_line_weld || $is_multiline_weld ? :
|
12082
|
0 |
46 |
if ($excess > 0)
|
12109
|
2 |
44 |
if (not $do_not_weld_rule and $rOpts->{'cuddled-else'})
|
12111
|
1 |
1 |
if ($block_type and $rcuddled_block_types->{'*'}{$block_type})
|
12115
|
0 |
1 |
if ($oo_line < $io_line and $ic_line == $io_line)
|
12122
|
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))
|
12134
|
12 |
40 |
if ($do_not_weld_rule) { }
|
|
36 |
4 |
elsif ($starting_new_weld) { }
|
12140
|
12 |
0 |
defined $Kprev ? :
|
12141
|
11 |
1 |
unless ($has_tight_paren{$type_prev})
|
12166
|
12 |
0 |
if (not @welds or @{$welds[-1];} < 4)
|
12209
|
3 |
1 |
if ($iline_ic - $iline_io > 1)
|
12215
|
2 |
1 |
if ($is_chain_end)
|
12223
|
40 |
0 |
if ($dlevel != 0)
|
12236
|
39 |
1 |
if ($weld_starts_in_block)
|
12255
|
1 |
22 |
if defined $rflags and defined $rflags->[1]
|
12261
|
0 |
22 |
unless defined $rLL and @{$rLL;}
|
12275
|
39 |
32 |
if $test_type eq "b"
|
12276
|
0 |
32 |
if $test_type ne $quote_type
|
12292
|
0 |
468 |
unless ($outer_seqno)
|
12293
|
0 |
0 |
if $KK == 0
|
12305
|
230 |
238 |
if ($is_opening_token{$token})
|
12309
|
132 |
98 |
if $Kn < $Num and $rLL->[$Kn][7] eq "b"
|
12311
|
0 |
230 |
unless $Kn < $Num
|
12316
|
223 |
7 |
unless $next_type eq 'q' || $next_type eq 'Q' and substr($next_token, 0, 1) eq "q"
|
12322
|
0 |
7 |
unless $rLL->[$Kinner_closing][7] eq $next_type
|
12329
|
0 |
7 |
if $Kinner_closing == $Kinner_opening
|
12337
|
0 |
7 |
unless $is_closing_token{$closing_delimiter} or $closing_delimiter eq ">"
|
12343
|
0 |
7 |
unless &$is_single_quote($Kinner_opening + 1, $Kinner_closing - 1, $next_type)
|
12371
|
0 |
2 |
if not $is_old_weld and $next_type eq "Q" and $iline_ic != $iline_oc
|
12379
|
0 |
7 |
unless ($ok_to_weld)
|
12388
|
5 |
2 |
$is_old_weld ? :
|
12389
|
0 |
7 |
if ($excess >= $excess_max)
|
12400
|
7 |
0 |
unless ($do_not_weld)
|
12402
|
1 |
6 |
if ($self->is_excluded_weld($KK, $is_leading))
|
12412
|
6 |
1 |
unless ($do_not_weld)
|
12425
|
5 |
1 |
defined $rK_weld_right->{$Kouter_closing} ? :
|
12426
|
0 |
6 |
if ($excess_ic + $weld_len + 2 > 0)
|
12435
|
1 |
6 |
if ($do_not_weld)
|
12459
|
0 |
6 |
if ($qw_seqno and $self->[88]{$qw_seqno}) { }
|
12481
|
6 |
0 |
if (length $rLL->[$Kinner_closing][5] == 1)
|
12497
|
0 |
83 |
unless $total_weld_count and defined $seqno
|
12499
|
0 |
83 |
unless defined $KK_o
|
12527
|
3 |
552 |
if $rOpts->{'indent-only'}
|
12530
|
3 |
549 |
unless defined $rLL and @{$rLL;}
|
12532
|
548 |
1 |
unless $rOpts->{'one-line-block-nesting'}
|
12564
|
0 |
4 |
unless ($type_sequence)
|
12565
|
0 |
0 |
if $KK == 0
|
12578
|
0 |
4 |
if ($total_weld_count and $self->is_welded_at_seqno($type_sequence))
|
12585
|
0 |
4 |
unless $type eq $token
|
12586
|
0 |
4 |
unless $rblock_type_of_seqno->{$type_sequence}
|
12593
|
1 |
3 |
if ($iline != $iline_last)
|
12595
|
2 |
2 |
if ($token eq "}")
|
12596
|
2 |
0 |
if (@open_block_stack)
|
12598
|
2 |
2 |
unless $token eq "{"
|
12603
|
0 |
2 |
unless defined $K_opening and defined $K_closing
|
12608
|
0 |
2 |
if $ris_broken_container->{$type_sequence} or $rbreak_container->{$type_sequence}
|
12612
|
0 |
2 |
$KK <= 0 ? :
|
12621
|
0 |
2 |
if (&$excess_length_to_K($K_closing) > 0)
|
12631
|
1 |
1 |
unless @open_block_stack > 1
|
12659
|
3 |
552 |
unless defined $Klimit
|
12680
|
6 |
546 |
if $rOpts_extended_continuation_indentation
|
12695
|
0 |
552 |
unless defined $radjusted_levels and @{$radjusted_levels;}
|
12697
|
0 |
552 |
if ($min < 0)
|
12700
|
0 |
0 |
if $_ < 0
|
12715
|
550 |
2 |
unless %{$rseqno_non_indenting_brace_by_ix;}
|
12734
|
6 |
0 |
if defined $Kc
|
12736
|
0 |
2 |
unless @K_stack
|
12744
|
8 |
4 |
if ($ndeep > 0)
|
12752
|
6 |
2 |
if ($inc < 0)
|
12767
|
0 |
552 |
unless defined $rLL and @{$rLL;}
|
12771
|
2 |
0 |
if ($rOpts_whitespace_cycle and $rOpts_whitespace_cycle > 0 and $rOpts_whitespace_cycle < $maximum_level)
|
12785
|
26 |
208 |
if ($level_abs < $whitespace_last_level)
|
12788
|
2 |
232 |
if (not @whitespace_level_stack) { }
|
|
26 |
206 |
elsif ($level_abs > $whitespace_last_level) { }
|
12795
|
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)
|
12821
|
150 |
84 |
if ($type ne "b")
|
12842
|
545 |
7 |
unless %break_before_container_types
|
12845
|
0 |
7 |
unless defined $rLL and @{$rLL;}
|
12865
|
0 |
7 |
if ($rOpts_ignore_old_breakpoints)
|
12880
|
2 |
45 |
if $rblock_type_of_seqno->{$seqno}
|
12893
|
0 |
45 |
if ($total_weld_count)
|
12895
|
0 |
0 |
if (defined $KK_test)
|
12902
|
4 |
7 |
unless $is_list or $has_list and $has_list == 1
|
12909
|
25 |
16 |
unless $break_option
|
12914
|
0 |
16 |
if ($level >= $stress_level_beta)
|
12923
|
0 |
16 |
if $Kprev < 0
|
12925
|
16 |
0 |
if ($prev_type eq "b")
|
12927
|
0 |
16 |
if $Kprev < 0
|
12930
|
2 |
14 |
unless $is_equal_or_fat_comma{$prev_type}
|
12941
|
2 |
12 |
if ($break_option == 2)
|
12943
|
0 |
2 |
if ($rOpts_line_up_parentheses or $rOpts_variable_maximum_line_length)
|
12951
|
0 |
0 |
unless ($is_complex)
|
12953
|
0 |
0 |
if ($self->is_list_by_seqno($parent))
|
12961
|
0 |
0 |
unless ($is_complex)
|
12963
|
0 |
0 |
defined $Kp ? :
|
12964
|
0 |
0 |
if ($is_opening_token{$token_p} and $token_p ne "(")
|
12968
|
0 |
0 |
defined $Km ? :
|
12972
|
0 |
0 |
if ($token_m eq ",")
|
12974
|
0 |
0 |
defined $Km ? :
|
12984
|
0 |
0 |
unless $is_complex
|
13002
|
0 |
14 |
if ($break_option == 1) { }
|
|
2 |
12 |
elsif ($break_option == 2) { }
|
|
12 |
0 |
elsif ($break_option == 3) { }
|
13007
|
0 |
0 |
unless $KK == $Kfirst
|
13016
|
1 |
1 |
if ($has_list_with_lec)
|
13021
|
1 |
1 |
unless ($ok_to_break)
|
13029
|
0 |
1 |
if ($has_list)
|
13032
|
1 |
0 |
if ($self->is_list_by_seqno($parent))
|
13038
|
0 |
2 |
unless ($ok_to_break)
|
13049
|
0 |
2 |
if $rOpts_line_up_parentheses
|
13071
|
10 |
4 |
unless $ci_flag
|
13075
|
2 |
2 |
if ($ci_flag == 1)
|
13084
|
0 |
2 |
if ($rOpts_variable_maximum_line_length)
|
13103
|
0 |
2 |
unless $ris_broken_container->{$seqno}
|
13108
|
0 |
2 |
if not $rOpts_add_whitespace and $rOpts_continuation_indentation > $rOpts_indent_columns
|
13112
|
0 |
2 |
if ($ris_permanently_broken->{$seqno}) { }
|
|
1 |
1 |
elsif ($has_list_with_lec) { }
|
13122
|
0 |
1 |
unless $rlec_count_by_seqno->{$seqno}
|
13128
|
0 |
1 |
if ($rOpts_break_at_old_comma_breakpoints)
|
13132
|
1 |
0 |
unless ($OK or $rOpts_ignore_old_breakpoints)
|
13134
|
0 |
1 |
unless $rtype_count
|
13138
|
1 |
0 |
if ($fat_comma_count and $fat_comma_count >= 2)
|
13146
|
0 |
1 |
unless ($OK)
|
13157
|
0 |
0 |
if ($excess_length > $length_tol) { }
|
13188
|
0 |
2 |
unless $ci
|
13191
|
0 |
2 |
if ($ci_flag == 1) { }
|
|
2 |
0 |
elsif ($ci_flag == 2) { }
|
13206
|
2 |
0 |
if $ci >= 0
|
13242
|
0 |
6 |
unless defined $rLL and @{$rLL;}
|
13273
|
150 |
54 |
if ($seqno_top)
|
13280
|
322 |
304 |
if $rLL->[$Kt][0]
|
13285
|
196 |
0 |
if ($is_list or $rLL->[$Kt][6] < $space or $rLL->[$Kt][7] eq "#")
|
13304
|
62 |
142 |
if ($seqno_top and $seqno == $seqno_top)
|
13313
|
24 |
180 |
if ($block_type and $is_block_with_ci{$block_type}) { }
|
|
66 |
114 |
elsif (not $rLL->[$KK][0]) { }
|
13315
|
16 |
8 |
if ($seqno_top)
|
13323
|
50 |
16 |
if ($seqno_top)
|
13333
|
76 |
62 |
unless defined $K_opening and $KK == $K_opening
|
13338
|
0 |
62 |
unless defined $K_closing
|
13341
|
0 |
62 |
if $rno_xci_by_seqno->{$seqno}
|
13347
|
0 |
62 |
if $ris_bli_container->{$seqno}
|
13352
|
0 |
62 |
if ($rLL->[$K_opening][2] == $rLL->[$K_closing][2] and $rLL->[$K_closing][1] - $rLL->[$K_opening][1] > $rOpts_maximum_line_length)
|
13376
|
0 |
62 |
if ($level >= $stress_level_beta)
|
13387
|
0 |
62 |
if ($space < 0)
|
13396
|
34 |
28 |
if $seqno_top
|
13410
|
529 |
2 |
unless $rOpts_bl or $rOpts_sbl or $rOpts_asbl
|
13413
|
0 |
23 |
unless defined $rLL and @{$rLL;}
|
13426
|
14 |
48 |
if ($ris_asub_block->{$seqno}) { }
|
|
4 |
44 |
elsif ($ris_sub_block->{$seqno}) { }
|
13427
|
10 |
4 |
if ($rOpts_asbl)
|
13434
|
4 |
0 |
if ($rOpts_sbl)
|
13441
|
21 |
13 |
if ($rOpts_bl and $block_type =~ /$bl_pattern/ and not $block_type =~ /$bl_exclusion_pattern/)
|
13457
|
546 |
6 |
unless $rOpts->{'brace-left-and-indent'}
|
13459
|
0 |
6 |
unless defined $rLL and @{$rLL;}
|
13469
|
25 |
24 |
if ($block_type and $block_type =~ /$bli_pattern/ and not $block_type =~ /$bli_exclusion_pattern/)
|
13477
|
25 |
0 |
if (defined $Ko and defined $Kc)
|
13508
|
3 |
552 |
if (not defined $rqw_lines) { }
|
13515
|
503 |
49 |
unless (@{$rqw_lines;})
|
13538
|
0 |
246 |
unless $line_type eq "CODE"
|
13541
|
3 |
243 |
unless defined $Kfirst and defined $Klast
|
13544
|
137 |
106 |
if (defined $K_start_multiline_qw)
|
13548
|
0 |
137 |
if ($type ne "q")
|
13557
|
137 |
0 |
defined $Kprev ? :
|
13558
|
137 |
0 |
defined $Knext ? :
|
13559
|
32 |
105 |
if ($type_m eq "q" and $type_p ne "q")
|
13569
|
41 |
202 |
if (not defined $K_start_multiline_qw and $rLL->[$Klast][7] eq "q")
|
13574
|
41 |
0 |
defined $Kprev ? :
|
13575
|
41 |
0 |
defined $Knext ? :
|
13576
|
32 |
9 |
if ($type_m ne "q" and $type_p eq "q")
|
13588
|
1 |
51 |
if ($rOpts_extended_continuation_indentation)
|
13598
|
0 |
1 |
unless length $token_end == 1 and $is_closing_token{$token_end} || $token_end eq '>'
|
13604
|
0 |
1 |
if (length $token_beg > 3 and substr($token_beg, 2, 1) =~ /\s/)
|
13609
|
0 |
1 |
unless length $token_beg == 3
|
13623
|
1 |
51 |
if ($rOpts_line_up_parentheses and not $rOpts_extended_line_up_parentheses)
|
13630
|
0 |
0 |
unless $parent_seqno
|
13636
|
0 |
0 |
defined $Kn ? :
|
13637
|
0 |
0 |
if (defined $seqno_n and $seqno_n eq $parent_seqno)
|
13640
|
0 |
0 |
defined $Kp ? :
|
13642
|
0 |
0 |
if (defined $seqno_p and $seqno_p eq $parent_seqno)
|
13647
|
0 |
0 |
unless $is_tightly_contained
|
13654
|
0 |
0 |
unless defined $parent_seqno and $parent_seqno ne 1
|
13714
|
0 |
0 |
if ($is_sort_map_grep_eval{$block_type} or $block_type eq "t" or $self->[39]{$seqno})
|
13764
|
0 |
24 |
if ($rLL->[$KK][7] eq "b")
|
13766
|
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])
|
13799
|
0 |
18 |
if (defined $K_prev and $K_prev >= $KK and $rLL->[$K_prev][8])
|
13805
|
0 |
0 |
if ($closing_vertical_tightness{$token} and $type ne "R")
|
13811
|
18 |
0 |
$KK >= 0 ? :
|
13868
|
0 |
172 |
if ($skip_next_line)
|
13873
|
2 |
170 |
if $line_type ne "CODE"
|
13877
|
37 |
133 |
if $CODE_type eq "BL"
|
13892
|
0 |
133 |
unless defined $K_first and defined $K_last
|
13897
|
7 |
126 |
if $has_comment and $K_first == $K_last
|
13904
|
0 |
126 |
if ($rLL->[$K_first][7] eq "q")
|
13911
|
0 |
0 |
unless (defined $K_start_multiline_qw)
|
13917
|
0 |
0 |
unless ($seqno_qw)
|
13919
|
0 |
0 |
if (defined $Kp and $rLL->[$Kp][7] eq 'q') { }
|
13933
|
0 |
0 |
if (defined $K_start_multiline_qw)
|
13943
|
0 |
0 |
if ($ci_level) { }
|
|
0 |
0 |
elsif ($level > $level_start_multiline_qw) { }
|
13954
|
0 |
0 |
if ($len > $max_prong_len)
|
13961
|
0 |
0 |
if $K_begin_loop > $K_last
|
13969
|
5 |
121 |
if ($has_comment)
|
13971
|
5 |
0 |
if $rLL->[$K_terminal][7] eq "b" and $K_terminal > $K_first
|
13977
|
50 |
76 |
if (@stack and $stack[-1][6])
|
13979
|
50 |
0 |
if (defined $K_c)
|
13989
|
2 |
48 |
if ($is_opening_type{$rLL->[$K_terminal][7]} and not $has_comment)
|
14008
|
0 |
2 |
if (defined $Kc_test and $seqno_end == $rLL->[$Kc_test][8] and $rLL->[$Kc_test][2] == $iline + 1)
|
14019
|
0 |
0 |
if (defined $K_terminal_next and $rLL->[$K_terminal_next][7] eq "#")
|
14024
|
0 |
0 |
if (defined $Kprev and $Kprev >= $K_first_next)
|
14031
|
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)
|
14069
|
24 |
26 |
if ($rLL->[$K_terminal][7] eq ",")
|
14078
|
0 |
24 |
if ($last_nonblank_type eq "=>")
|
14081
|
17 |
7 |
if ($length > $max_prong_len)
|
14095
|
5 |
121 |
if ($has_comment)
|
14096
|
0 |
5 |
if ($rOpts_ignore_side_comment_lengths) { }
|
14103
|
5 |
0 |
$K_terminal > 0 ? :
|
14108
|
2 |
3 |
if ($len > $max_prong_len)
|
14147
|
194 |
471 |
if $type eq "b"
|
14153
|
120 |
351 |
if ($seqno)
|
14160
|
60 |
60 |
if ($is_opening_token{$token} and defined $K_closing_container->{$seqno}) { }
|
|
60 |
0 |
elsif ($is_closing_token{$token} and @stack) { }
|
14170
|
10 |
50 |
if ($rblock_type_of_seqno->{$seqno}) { }
|
|
40 |
10 |
elsif ($is_handle_type{$last_nonblank_type}) { }
|
14179
|
23 |
17 |
if $KK > 0 and $$rLL[$KK - 1][7] eq "b"
|
14212
|
0 |
60 |
if ($interrupted_list_rule and $rOpts_variable_maximum_line_length)
|
14216
|
0 |
0 |
if ($rtype_count and $rtype_count->{'=>'})
|
14227
|
0 |
16 |
if ($interrupted_list_rule and $KK < $K_terminal and $rLL->[$K_terminal][7] eq ",")
|
14271
|
0 |
60 |
if ($seqno_o ne $seqno)
|
14289
|
10 |
50 |
if ($block_type)
|
14295
|
10 |
0 |
if (defined $K_o and defined $K_c)
|
14306
|
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) { }
|
14346
|
60 |
0 |
if (@stack)
|
14349
|
33 |
27 |
if ($collapsed_len > $max_prong_len)
|
14371
|
11 |
340 |
if ($type eq '=>') { }
|
|
9 |
331 |
elsif ($last_nonblank_type eq '=>') { }
|
|
1 |
330 |
elsif ($type eq 'h') { }
|
14373
|
3 |
8 |
if ($len > $max_prong_len)
|
14377
|
1 |
8 |
if ($len > $max_prong_len)
|
14387
|
1 |
0 |
if ($len > $max_prong_len)
|
14393
|
58 |
272 |
if ($len > $max_prong_len)
|
14427
|
241 |
79 |
unless (defined $rflags)
|
14439
|
39 |
40 |
unless ($match_flag1)
|
14444
|
39 |
0 |
if (defined $Kp)
|
14459
|
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') { }
|
14469
|
66 |
13 |
if ($line_up_parentheses_control_is_lxpl) { }
|
14470
|
45 |
21 |
if $match_flag1
|
14473
|
4 |
9 |
unless $match_flag1
|
14487
|
30 |
0 |
if ($flag2)
|
14496
|
7 |
8 |
if (not $is_list or $has_list or $flag2 eq 2 and $has_code_block || $has_ternary)
|
14509
|
524 |
31 |
unless $rOpts_line_up_parentheses
|
14511
|
0 |
31 |
unless defined $rLL and @{$rLL;}
|
14520
|
43 |
320 |
if $rblock_type_of_seqno->{$seqno}
|
14523
|
0 |
320 |
unless defined $KK
|
14526
|
71 |
249 |
if ($self->is_excluded_lp($KK))
|
14563
|
12 |
7635 |
if (defined $rwant_blank_line_after->{$i} and $rwant_blank_line_after->{$i} == 1)
|
14595
|
13 |
7634 |
if ($last_line_type eq "POD_END" and not $self->[69])
|
14598
|
0 |
11 |
unless ($in_format_skipping_section or $input_line =~ /^\s*$/)
|
14604
|
7478 |
169 |
if ($line_type eq 'CODE') { }
|
14610
|
807 |
6671 |
if ($CODE_type eq 'BL') { }
|
14622
|
3 |
755 |
if ($kgb_keep == 1 and defined $rwant_blank_line_after->{$i} and $rwant_blank_line_after->{$i} == 2)
|
14630
|
0 |
807 |
if ($i - $i_last_POD_END < 3 and not $kgb_keep)
|
14634
|
779 |
28 |
if ($kgb_keep)
|
14646
|
6 |
6665 |
if ($save_logfile and $logger_object)
|
14653
|
98 |
6573 |
if ($CODE_type eq "VB" or $CODE_type eq "FS")
|
14668
|
63 |
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') { }
|
14673
|
12 |
51 |
if ($rOpts->{'delete-pod'})
|
14674
|
6 |
57 |
if ($rOpts->{'trim-pod'})
|
14675
|
8 |
37 |
if (not $skip_line || $in_format_skipping_section and $line_type eq "POD_START" and not $self->[69])
|
14698
|
157 |
12 |
unless ($skip_line)
|
14762
|
0 |
543 |
if ($rOpts_kgb_size_min and not $rOpts_kgb_size_min =~ /^\d+$/ or $rOpts_kgb_size_max and not $rOpts_kgb_size_max =~ /^\d+$/)
|
14775
|
0 |
543 |
unless $rOpts_kgb_size_min
|
14777
|
0 |
543 |
if ($rOpts_kgb_size_max and $rOpts_kgb_size_max < $rOpts_kgb_size_min)
|
14787
|
537 |
0 |
unless $rOpts_kgb_size_min > 0 and $rOpts_kgb_before != 1 || $rOpts_kgb_after != 1 || $rOpts_kgb_inside || $rOpts_kgb_delete
|
14842
|
537 |
6 |
if ($quit)
|
14860
|
0 |
12 |
if (defined $rhash_of_desires->{$ip} and $rhash_of_desires->{$ip} == 2)
|
14872
|
0 |
9 |
unless $rOpts_kgb_inside
|
14891
|
5 |
18 |
if ($num >= $rOpts_kgb_size_min)
|
14896
|
0 |
5 |
if (@iblanks and not $rOpts_kgb_delete)
|
14905
|
3 |
2 |
if ($nog_b and $k > $kbeg)
|
14908
|
2 |
3 |
if ($nog_e and $k < $kend)
|
14923
|
0 |
0 |
unless $i >= 0 and $i < @{$rlines;}
|
14924
|
0 |
0 |
if $rlines->[$i]{'_line_type'} ne "CODE"
|
14926
|
0 |
0 |
if ($code_type eq "BL")
|
14933
|
5 |
1 |
unless @iblanks
|
14935
|
1 |
0 |
if ($ibl < $iend)
|
14940
|
0 |
1 |
unless $rOpts_kgb_delete
|
14951
|
9 |
16 |
if (defined $ibeg and $ibeg >= 0)
|
14954
|
6 |
3 |
if ($count >= $rOpts_kgb_size_min)
|
14962
|
6 |
0 |
if ($ibeg > 0)
|
14967
|
2 |
4 |
if ($ibeg == 1 and not $code_type)
|
14969
|
1 |
1 |
if $line_text and $line_text =~ /^#/
|
14975
|
4 |
2 |
unless ($code_type =~ /(BC|SBC|SBCX)/)
|
14976
|
4 |
0 |
if ($rOpts_kgb_before == 2) { }
|
|
0 |
0 |
elsif ($rOpts_kgb_before == 0) { }
|
14991
|
5 |
1 |
if ($line_type eq "CODE" and defined $K_first)
|
15001
|
3 |
0 |
if ($level == $level_beg and $ci_level == 0 and not $bad_ending and $iend < @{$rlines;} and $CODE_type ne "HSC")
|
15007
|
3 |
0 |
if ($rOpts_kgb_after == 2) { }
|
|
0 |
0 |
elsif ($rOpts_kgb_after == 0) { }
|
15039
|
0 |
75 |
unless defined $Knext_nonblank
|
15042
|
68 |
7 |
if $level_next != $level_beg + 1
|
15046
|
0 |
7 |
unless defined $parent_seqno
|
15050
|
0 |
7 |
if $total_weld_count and $self->is_welded_at_seqno($parent_seqno)
|
15055
|
0 |
7 |
unless defined $Ko and $Ko > $K_first and $Ko <= $K_last
|
15059
|
0 |
7 |
unless defined $Kc and $Kc > $K_last
|
15072
|
0 |
75 |
if ($rOpts_kgb_size_max and @group >= $rOpts_kgb_size_max)
|
15076
|
9 |
66 |
if (@group == 0)
|
15086
|
23 |
52 |
if (not @group or $token ne $group[-1][1])
|
15123
|
12 |
543 |
unless ($rOpts_maximum_consecutive_blank_lines)
|
15131
|
537 |
6 |
if ($quit)
|
15148
|
0 |
181 |
if $Opt_repeat_count > 0 and $number_of_groups_seen >= $Opt_repeat_count
|
15156
|
5 |
176 |
if ($line_type ne "CODE")
|
15161
|
0 |
176 |
if ($CODE_type and $CODE_type eq "FS")
|
15167
|
6 |
170 |
if ($CODE_type eq "VB")
|
15168
|
6 |
0 |
if ($ibeg >= 0)
|
15173
|
5 |
165 |
if ($CODE_type eq "BL")
|
15174
|
3 |
2 |
if ($ibeg >= 0)
|
15188
|
0 |
165 |
unless (defined $K_first)
|
15211
|
118 |
47 |
if ($ibeg >= 0)
|
15214
|
19 |
99 |
if (defined $K_closing and $K_first < $K_closing) { }
|
|
1 |
98 |
elsif ($level != $level_beg) { }
|
15215
|
1 |
18 |
if $level != $level_beg + 1
|
15224
|
27 |
138 |
if ($self->is_list_by_K($K_first))
|
15225
|
15 |
12 |
if ($ibeg >= 0)
|
15230
|
0 |
5 |
if ($CODE_type and $keyword_group_list_comment_pattern and $CODE_type =~ /$keyword_group_list_comment_pattern/)
|
15238
|
0 |
0 |
if ($ibeg >= 0 and $level == $level_beg) { }
|
15247
|
0 |
0 |
if ($ibeg >= 0)
|
15255
|
75 |
63 |
if ($ci_level == 0 and $type eq 'k' and $token =~ /$keyword_group_list_pattern/) { }
|
|
35 |
28 |
elsif ($ibeg >= 0) { }
|
15261
|
66 |
9 |
if ($ibeg >= 0 and $level == $level_beg) { }
|
15270
|
0 |
9 |
if ($ibeg >= 0)
|
15282
|
0 |
35 |
if ($level > $level_beg + 1 or $level < $level_beg)
|
15291
|
25 |
10 |
if ($level == $level_beg and $ci_level > 0 or $CODE_type eq "HSC")
|
15300
|
5 |
5 |
if (defined $K_closing and $K_first <= $K_closing)
|
15303
|
3 |
2 |
if ($K_last <= $K_closing)
|
15307
|
1 |
1 |
if ($rLL->[$KK][7] eq ";")
|
15308
|
0 |
1 |
if ($KK < $K_last)
|
15309
|
0 |
0 |
if ($$rLL[++$KK][7] eq "b")
|
15310
|
0 |
0 |
if ($KK > $K_last or $rLL->[$KK][7] ne "#")
|
15461
|
0 |
5022 |
if $ii < 0
|
15463
|
492 |
4530 |
ref $indentation ? :
|
15528
|
50027 |
4751 |
if ($max_index_to_go >= 0) { }
|
15529
|
0 |
50027 |
if ($Ktoken_vars != $K_to_go[$max_index_to_go] + 1) { }
|
|
0 |
81163 |
elsif ($type eq 'b' and $types_to_go[$max_index_to_go] eq 'b') { }
|
15552
|
201 |
4550 |
if ($type eq "b")
|
15556
|
4550 |
50027 |
unless (++$max_index_to_go)
|
15574
|
882 |
3668 |
if ($seqno) { }
|
15579
|
3376 |
292 |
if (defined $Kt)
|
15584
|
520 |
2856 |
if ($is_closing_type{$type_t}) { }
|
15595
|
0 |
4550 |
unless defined $next_parent_seqno
|
15607
|
0 |
54577 |
if ($level < 0)
|
15655
|
9112 |
45465 |
if ($seqno)
|
15662
|
4395 |
4717 |
if ($is_opening_token{$token}) { }
|
|
4345 |
372 |
elsif ($is_closing_token{$token}) { }
|
15678
|
0 |
4345 |
unless defined $parent_seqno
|
15695
|
32907 |
21670 |
if $ci_level
|
15702
|
19 |
54558 |
if ($current_line_starts_in_quote and $Ktoken_vars == $K_first)
|
15706
|
19 |
0 |
if ($max_index_to_go == 0)
|
15727
|
4547 |
893 |
if ($max_index_to_go >= 0)
|
15732
|
19 |
4528 |
if $starting_in_quote
|
15733
|
156 |
4391 |
if $ending_in_quote
|
15735
|
1190 |
3357 |
if ($CODE_type or $last_CODE_type)
|
15736
|
1137 |
53 |
$K_to_go[$max_index_to_go] >= $K_first ? :
|
15747
|
13 |
4534 |
if ($is_static_block_comment and not $last_line_had_side_comment)
|
15776
|
0 |
4955 |
if ($max_index_to_go < 0)
|
15786
|
3959 |
996 |
if ($types_to_go[$max_index_to_go] ne "#")
|
15791
|
48 |
3911 |
if $total_weld_count and $self->[71]{$K_to_go[$max_index_to_go]}
|
15795
|
428 |
3483 |
if (defined $index_start_one_line_block)
|
15824
|
779 |
961 |
if ($CODE_type_flush and $CODE_type_flush eq 'BL') { }
|
15825
|
153 |
626 |
if $max_index_to_go >= 0
|
15869
|
0 |
6573 |
unless (defined $rK_range->[0])
|
15894
|
119 |
6454 |
if (not $rOpts_add_newlines or $CODE_type eq "NIN")
|
15901
|
1065 |
5508 |
if ($rLL->[$K_last][7] eq "#")
|
15902
|
701 |
364 |
if ($K_last == $K_first) { }
|
15912
|
4 |
6569 |
if ($CODE_type eq "VER")
|
15921
|
2481 |
4092 |
if ($max_index_to_go >= 0)
|
15924
|
2305 |
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")
|
15941
|
701 |
5872 |
if ($is_block_comment)
|
15943
|
21 |
680 |
if ($rOpts->{'delete-block-comments'})
|
15949
|
38 |
642 |
if $max_index_to_go >= 0
|
15952
|
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)
|
15984
|
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) { }
|
16013
|
5 |
5867 |
if ($self->[76])
|
16022
|
3 |
0 |
unless ($CODE_type eq "HSC" or $rtok_first->[0] > 0 or $guessed_indentation_level == 0 and $rtok_first->[7] eq "Q")
|
16037
|
12 |
5860 |
if ($CODE_type eq "IO")
|
16044
|
11 |
1 |
unless $line_of_tokens->{'_starting_in_quote'}
|
16067
|
13 |
5847 |
if ($looking_for_else)
|
16070
|
0 |
13 |
unless ($is_elsif_else{$rLL->[$K_first_true][5]})
|
16077
|
2440 |
3420 |
if ($max_index_to_go >= 0)
|
16082
|
0 |
2440 |
if ($rOpts_ignore_old_breakpoints and $rOpts_line_up_parentheses)
|
16084
|
0 |
0 |
if ($is_assignment_or_fat_comma{$type_first})
|
16089
|
30 |
2410 |
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 ",")
|
16103
|
18 |
12 |
if $rOpts_break_at_old_comma_breakpoints
|
16115
|
9 |
2401 |
if ($max_index_to_go >= 0 and $self->[82]{$K_first_true})
|
16119
|
4 |
5 |
if ($self->[82]{$K_first_true} == 2) { }
|
16134
|
3257 |
2603 |
if ($max_index_to_go >= 0)
|
16140
|
562 |
2695 |
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') { }
|
16190
|
0 |
2695 |
if ($break_flag and $break_flag == 2)
|
16195
|
2685 |
0 |
if (not $rOpts_ignore_old_breakpoints or $rOpts_line_up_parentheses and $is_assignment_or_fat_comma{$type})
|
16224
|
20 |
5840 |
if ($max_index_to_go < 0 and $rLL->[$K_first][7] eq "b")
|
16235
|
19092 |
34992 |
if ($rtoken_vars->[7] eq "b")
|
16248
|
197 |
34795 |
if ($rbrace_follower)
|
16250
|
156 |
41 |
unless ($rbrace_follower->{$token})
|
16251
|
136 |
20 |
if $max_index_to_go >= 0
|
16262
|
9062 |
25930 |
if ($rtoken_vars->[8])
|
16268
|
1924 |
4 |
if ($block_type and $token eq $type and $block_type ne "t" and not $self->[39]{$type_sequence})
|
16274
|
962 |
962 |
if ($type eq '{') { }
|
|
962 |
0 |
elsif ($type eq '}') { }
|
16288
|
2196 |
32796 |
if ($has_side_comment)
|
16291
|
364 |
1832 |
if ($Ktoken_vars == $K_last) { }
|
|
364 |
2932 |
elsif ($Ktoken_vars == $K_last - 1 or $Ktoken_vars == $K_last - 2 and $$rLL[$K_last - 1][7] eq 'b') { }
|
16311
|
2537 |
32091 |
if ($type eq ';') { }
|
|
962 |
31129 |
elsif ($is_opening_BLOCK) { }
|
|
962 |
30167 |
elsif ($is_closing_BLOCK) { }
|
|
9 |
30158 |
elsif ($type eq 'h') { }
|
16315
|
525 |
2012 |
if ($Ktoken_vars < $K_last)
|
16317
|
512 |
13 |
if $rLL->[$Knnb][7] eq "b"
|
16322
|
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)
|
16332
|
2094 |
237 |
unless $no_internal_newlines or $rOpts_keep_interior_semicolons and $Ktoken_vars < $K_last or $next_nonblank_token eq "}"
|
16360
|
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)
|
16375
|
21 |
941 |
if ($total_weld_count and defined $self->[70]{$Ktoken_vars})
|
16382
|
50 |
912 |
if ($want_break and not defined $index_start_one_line_block or not $keyword_on_same_line || $rOpts_opening_brace_always_on_right)
|
16399
|
50 |
0 |
unless ($nobreak_BEFORE_BLOCK)
|
16405
|
47 |
3 |
if $max_index_to_go >= 0
|
16414
|
913 |
49 |
if $max_index_to_go >= 0 and not $no_internal_newlines
|
16425
|
417 |
545 |
if ($Ktoken_vars < $K_last)
|
16427
|
253 |
164 |
if $rLL->[$Knnb][7] eq "b"
|
16433
|
351 |
611 |
if (defined $index_start_one_line_block)
|
16440
|
17 |
17 |
if ($has_side_comment and not $rOpts_ignore_side_comment_lengths and $next_nonblank_token_type eq "#")
|
16448
|
0 |
351 |
if ($self->excess_line_length($index_start_one_line_block, $max_index_to_go) + $added_length >= 0)
|
16463
|
67 |
357 |
if $max_index_to_go >= 0 and not $nobreak_BEFORE_BLOCK and not defined $index_start_one_line_block
|
16477
|
351 |
611 |
if (defined $index_start_one_line_block)
|
16495
|
1 |
11 |
if ($rOpts_line_up_parentheses and $next_nonblank_token_type eq "," and $Knnb eq $K_last)
|
16502
|
1 |
0 |
unless $is_excluded
|
16522
|
84 |
1 |
if ($is_block_without_semicolon{$block_type} || $one_line_block_type =~ /^[UG]$/ && $Ktoken_vars == $K_last and $next_nonblank_token ne ";")
|
16536
|
72 |
12 |
unless $no_internal_newlines
|
16543
|
184 |
778 |
if ($is_if_unless_elsif_else{$block_type}) { }
|
|
45 |
733 |
elsif ($block_type eq 'do') { }
|
|
133 |
600 |
elsif ($is_sort_map_grep_eval{$block_type} or $one_line_block_type eq 'G') { }
|
|
173 |
427 |
elsif ($self->[8]{$type_sequence}) { }
|
16548
|
3 |
42 |
if ($self->tight_paren_follows($K_to_go[0], $Ktoken_vars))
|
16566
|
81 |
92 |
if ($one_line_block_type) { }
|
16572
|
2 |
79 |
if ($Ktoken_vars < $K_last and $next_nonblank_token eq '}') { }
|
|
1 |
154 |
elsif ($Ktoken_vars == $K_last and $rOpts_line_up_parentheses) { }
|
16597
|
1 |
0 |
if $keep_going
|
16616
|
25 |
937 |
if ($block_type eq "elsif")
|
16618
|
17 |
8 |
if ($next_nonblank_token_type eq 'b') { }
|
16623
|
0 |
8 |
unless ($is_elsif_else{$next_nonblank_token})
|
16631
|
136 |
826 |
if ($keep_going) { }
|
|
506 |
320 |
elsif ($next_nonblank_token_type eq 'b' and $rOpts_add_newlines) { }
|
|
292 |
28 |
elsif ($rbrace_follower) { }
|
16642
|
156 |
350 |
unless ($rbrace_follower)
|
16643
|
116 |
40 |
unless $no_internal_newlines or $max_index_to_go < 0
|
16650
|
192 |
100 |
if ($rbrace_follower->{$next_nonblank_token}) { }
|
16656
|
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))
|
16666
|
57 |
43 |
unless $no_internal_newlines or $max_index_to_go < 0
|
16675
|
17 |
11 |
unless $no_internal_newlines or $max_index_to_go < 0
|
16700
|
3 |
5 |
if ($rOpts_break_after_labels and $type eq "J" and $rOpts_break_after_labels == 1)
|
16704
|
3 |
0 |
unless $no_internal_newlines
|
16729
|
0 |
0 |
if ($type_KK ne ",")
|
16735
|
0 |
0 |
if (defined $Knnb)
|
16738
|
0 |
0 |
if ($type_sequence and $is_closing_type{$type_Knnb})
|
16782
|
0 |
45 |
unless defined $K_ic
|
16787
|
0 |
45 |
unless $seqno_i
|
16791
|
1 |
44 |
unless defined $K_oc
|
16793
|
37 |
7 |
unless $token_next eq ")"
|
16798
|
0 |
7 |
unless defined $K_io and defined $K_oo
|
16806
|
3 |
4 |
if (defined $K_test and $rLL->[$K_test][7] eq "{")
|
16808
|
3 |
0 |
if ($seqno_test)
|
16809
|
3 |
0 |
if ($self->[8]{$seqno_test} or $self->[9]{$seqno_test})
|
16836
|
4 |
0 |
if $K_ic - $K_io > 16
|
16852
|
0 |
0 |
if $K_io - $K_oo > 9
|
16855
|
0 |
0 |
if $K_oo < $K_to_go_0
|
16873
|
0 |
0 |
unless ($rOpts_ignore_old_breakpoints)
|
16876
|
0 |
0 |
if $iline_oo != $iline_oc
|
16931
|
0 |
962 |
if (not defined $max_index_to_go or $max_index_to_go < 0)
|
16939
|
20 |
942 |
if ($rbreak_container->{$type_sequence_j})
|
16947
|
0 |
942 |
unless defined $block_type
|
16951
|
924 |
18 |
if (defined $K_last_nonblank)
|
16953
|
820 |
104 |
if ($i_last_nonblank >= 0)
|
16961
|
148 |
794 |
if ($max_index_to_go == 0 or $is_brace_semicolon_colon{$block_type} or substr($block_type, 0, 7) eq 'package') { }
|
|
575 |
219 |
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 '()') { }
|
|
215 |
4 |
elsif ($previous_nonblank_token eq ')') { }
|
|
4 |
0 |
elsif ($block_type eq 'case' or $block_type eq 'when') { }
|
16987
|
33 |
542 |
if ($tokens_to_go[$i_start] eq ")")
|
16991
|
0 |
33 |
unless defined $K_start
|
16993
|
0 |
33 |
unless $seqno
|
16995
|
0 |
33 |
unless defined $K_opening
|
16999
|
0 |
33 |
unless $i_opening >= 0
|
17003
|
33 |
0 |
if ($i_start > 0)
|
17004
|
19 |
14 |
if ($types_to_go[$i_start] eq "b" and $i_start > 0)
|
17006
|
2 |
31 |
if ($lev > $rLL->[$Kj][4])
|
17019
|
2 |
213 |
if ($types_to_go[$i_start] eq "b")
|
17029
|
0 |
215 |
if (substr($block_type, -2, 2) eq "()")
|
17032
|
9 |
206 |
unless ($tokens_to_go[$i_start] eq $stripped_block_type)
|
17043
|
0 |
4 |
if ($types_to_go[$i_start] eq "b")
|
17046
|
0 |
4 |
unless ($tokens_to_go[$i_start] eq $block_type)
|
17064
|
14 |
917 |
if ($pos > $maximum_line_length)
|
17079
|
0 |
917 |
unless defined $K_closing
|
17086
|
24 |
893 |
if ($total_weld_count and $self->is_welded_at_seqno($type_sequence_j))
|
17090
|
273 |
644 |
if ($excess > 0)
|
17094
|
271 |
2 |
if $excess > 1
|
17102
|
2 |
0 |
if $ldiff
|
17111
|
1243 |
2012 |
if ($rLL->[$Ki][7] eq 'b') { }
|
17119
|
0 |
3255 |
if ($pos > $maximum_line_length) { }
|
|
2590 |
665 |
elsif (not $type_sequence_i) { }
|
|
26 |
639 |
elsif ($rLL->[$Ki][5] eq '{' and $rLL->[$Ki][7] eq '{' and $rblock_type_of_seqno->{$type_sequence_i} and not $nobreak) { }
|
|
330 |
309 |
elsif ($rLL->[$Ki][5] eq '}' and $rLL->[$Ki][7] eq '}' and $rblock_type_of_seqno->{$type_sequence_i} and not $nobreak) { }
|
17147
|
183 |
147 |
if ($Ki_nonblank < $K_last)
|
17149
|
111 |
72 |
if ($rLL->[$Ki_nonblank][7] eq "b" and $Ki_nonblank < $K_last)
|
17182
|
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)
|
17200
|
19 |
0 |
if (not $is_if_unless_elsif_else{$block_type} or $K_last == $Ki_nonblank)
|
17206
|
19 |
0 |
if ($Ki_nonblank > $Ki + 1)
|
17210
|
17 |
2 |
if ($$rLL[$Ki + 1][7] eq 'b') { }
|
17216
|
0 |
19 |
if ($pos >= $maximum_line_length)
|
17252
|
47 |
241 |
if ($want_one_line_block{$block_type} and not $is_bli)
|
17255
|
26 |
21 |
$rtype_count && $rtype_count->{';'} ? :
|
17258
|
44 |
3 |
if ($semicolon_count <= 2)
|
17262
|
23 |
21 |
if (defined $Kp and $rLL->[$Kp][7] eq ";")
|
17268
|
26 |
21 |
if ($semicolon_count <= 0) { }
|
|
18 |
6 |
elsif ($semicolon_count == 1 and $block_type eq 'eval') { }
|
17286
|
47 |
3 |
if ($max_index_to_go > 0) { }
|
17302
|
0 |
3 |
unless defined $K_first
|
17308
|
0 |
3 |
if $type eq "b"
|
17313
|
0 |
3 |
if ($structural_indentation_level > $self->[79])
|
17324
|
0 |
3 |
if ($guessed_indentation_level ne $structural_indentation_level) { }
|
17327
|
0 |
0 |
if ($is_closing_block)
|
17329
|
0 |
0 |
unless ($self->[67])
|
17332
|
0 |
0 |
unless ($self->[66])
|
17337
|
0 |
0 |
unless ($self->[65])
|
17340
|
0 |
0 |
if ($self->[64] <= 6)
|
17346
|
0 |
0 |
unless $self->[62]
|
17352
|
0 |
3 |
if $is_closing_block
|
17355
|
0 |
3 |
if ($in_tabbing_disagreement)
|
17357
|
0 |
0 |
if ($self->[64] <= 6)
|
17362
|
0 |
0 |
if ($self->[64] == 6)
|
17431
|
0 |
3938 |
if (not defined $i or $i < 0)
|
17449
|
1576 |
2362 |
if (defined $i_nonblank and $is_opening_sequence_token{$tokens_to_go[$i_nonblank]})
|
17499
|
0 |
4492 |
unless defined $i and $i >= 0
|
17503
|
752 |
3740 |
if ($i > 0 and $types_to_go[$i] eq "b")
|
17508
|
43 |
4449 |
if $total_weld_count and $self->[71]{$K_to_go[$i]}
|
17515
|
1925 |
2524 |
if ($break_before_or_after_token{$token} and $type eq $token || $type eq 'k') { }
|
|
12 |
5024 |
elsif ($is_if_unless{$token} and $type eq 'k') { }
|
17518
|
238 |
1687 |
if ($want_break_before{$token} and $i >= 0)
|
17524
|
4443 |
6 |
if ($i >= 0 and $i <= $max_index_to_go)
|
17525
|
4201 |
242 |
$types_to_go[$i] ne 'b' ? :
|
17527
|
3515 |
928 |
if ($i_nonblank >= 0 and not $nobreak_to_go[$i_nonblank] and not $forced_breakpoint_to_go[$i_nonblank])
|
17533
|
2386 |
1129 |
if ($i_nonblank > $index_max_forced_break)
|
17566
|
0 |
447 |
if ($i_start < 0)
|
17580
|
746 |
0 |
if ($i >= 0 and $i <= $max_index_to_go) { }
|
17624
|
561 |
1682 |
if (defined $mate_index_to_go[$i_break]) { }
|
17628
|
554 |
7 |
if ($mate_index_to_go[$i_break] > $i_break + 2)
|
17632
|
23 |
531 |
$tokens_to_go[$i_break] eq '?' ? :
|
17639
|
1682 |
0 |
if ($type_sequence)
|
17712
|
0 |
0 |
if ($max_index_to_go < 0)
|
17727
|
0 |
0 |
if (not defined $KK or $KK < 0 or $KK > $Klimit)
|
17728
|
0 |
0 |
unless defined $KK
|
17734
|
0 |
0 |
if ($ii > 0 and $KK != $Km + 1)
|
17795
|
220 |
4327 |
if ($max_index_to_go >= 0 and $types_to_go[$max_index_to_go] eq "b")
|
17799
|
0 |
4547 |
if $max_index_to_go < 0
|
17802
|
302 |
4245 |
if ($rOpts_line_up_parentheses)
|
17811
|
629 |
655 |
if (not $max_index_to_go and $types_to_go[0] eq "#" and not $lp_object_count_this_batch)
|
17848
|
18671 |
35007 |
if ($types_to_go[$i] eq "b")
|
17858
|
21979 |
13028 |
unless $quick_filter{$types_to_go[$i]}
|
17863
|
9062 |
3966 |
if ($type_sequence_to_go[$i]) { }
|
|
2916 |
1050 |
elsif ($type eq ',') { }
|
|
1016 |
34 |
elsif ($type eq '=>') { }
|
|
34 |
0 |
elsif ($type eq 'f') { }
|
17869
|
120 |
8942 |
if ($self->[75]{$seqno})
|
17873
|
4531 |
4531 |
if ($is_opening_sequence_token{$token}) { }
|
|
4531 |
0 |
elsif ($is_closing_sequence_token{$token}) { }
|
17874
|
22 |
4509 |
if ($self->[38]{$seqno})
|
17878
|
186 |
4345 |
if ($type eq "?")
|
17884
|
3 |
3885 |
if ($i > 0 and $self->[38]{$seqno})
|
17889
|
3717 |
814 |
if (defined $i_mate and $i_mate >= 0) { }
|
17890
|
3717 |
0 |
if ($type_sequence_to_go[$i_mate] == $type_sequence_to_go[$i]) { }
|
17896
|
447 |
3270 |
if $cac
|
17907
|
186 |
4345 |
if ($type eq ":")
|
17916
|
948 |
68 |
if (@unmatched_opening_indexes_in_this_batch)
|
17929
|
2 |
3916 |
if (@i_for_semicolon and @i_for_semicolon == 1)
|
17932
|
2 |
0 |
if ($inext <= $max_index_to_go and $types_to_go[$inext] ne "#")
|
17940
|
711 |
3207 |
if (@unmatched_opening_indexes_in_this_batch)
|
17945
|
40 |
3878 |
if (@ix_seqno_controlling_ci)
|
17959
|
354 |
723 |
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]})
|
17979
|
22 |
727 |
if $levels_to_go[$i] < $lev
|
17980
|
0 |
727 |
if $levels_to_go[$i] > $lev
|
17982
|
0 |
727 |
if ($block_type_to_go[$i]) { }
|
|
276 |
451 |
elsif (not $types_to_go[$i] =~ /^[\(\)Gwib]$/) { }
|
17983
|
0 |
0 |
if ($tokens_to_go[$i] eq "}")
|
18003
|
0 |
3918 |
if ($types_to_go[$imin] eq "b")
|
18004
|
0 |
3918 |
if ($types_to_go[$imax] eq "b")
|
18006
|
0 |
3918 |
if ($imin > $imax)
|
18025
|
3069 |
849 |
if ($last_line_leading_type ne "#")
|
18030
|
1138 |
1931 |
if ($leading_type eq 'k') { }
|
|
511 |
1420 |
elsif ($leading_type eq 'i') { }
|
|
601 |
819 |
elsif ($leading_token eq '}') { }
|
18031
|
7 |
1131 |
if ($leading_token eq 'BEGIN' or $leading_token eq 'END') { }
|
|
102 |
1029 |
elsif ($last_line_leading_type ne 'b' and $is_if_unless_while_until_for_foreach{$leading_token}) { }
|
18032
|
1 |
6 |
if terminal_type_i(0, $max_index_to_go) ne "}"
|
18043
|
0 |
102 |
unless (defined $lc)
|
18047
|
32 |
70 |
if ($levels_to_go[0] != $last_line_leading_level)
|
18051
|
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 "}")
|
18066
|
73 |
438 |
if ($special_identifier)
|
18068
|
55 |
18 |
if ($special_identifier eq 'sub') { }
|
|
18 |
0 |
elsif ($special_identifier eq 'package') { }
|
18070
|
22 |
33 |
unless terminal_type_i(0, $max_index_to_go) =~ /^[\;\}\,]$/
|
18083
|
18 |
0 |
unless $self->[93]{$pseqno}
|
18091
|
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/)
|
18097
|
2 |
0 |
if ($nblanks > $blank_count)
|
18103
|
43 |
3026 |
if ($blank_count)
|
18114
|
2295 |
1623 |
if ($leading_level == $last_line_leading_level and $leading_type ne '#' and defined $nonblank_lines_at_depth[$leading_level]) { }
|
18141
|
3263 |
655 |
if ($max_index_to_go > 0) { }
|
|
493 |
162 |
elsif ($is_unbalanced_batch) { }
|
18155
|
191 |
293 |
if ($block_type and not $lp_object_count_this_batch and $is_block_without_semicolon{$block_type})
|
18161
|
14 |
177 |
if ($leading_type eq '{') { }
|
18164
|
14 |
0 |
if ($rtype_count)
|
18166
|
14 |
0 |
unless ($comma_count)
|
18181
|
56 |
2180 |
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)
|
18218
|
655 |
3263 |
if (not $max_index_to_go) { }
|
18229
|
2153 |
1110 |
if (not +($is_long_line || $saw_good_break || $forced_breakpoint_count) && $rOpts_add_newlines) { }
|
18258
|
0 |
1110 |
unless $called_pad_array_to_go
|
18267
|
501 |
609 |
if @{$ri_first;} >= 3
|
18273
|
731 |
379 |
if $rOpts_recombine and @{$ri_first;} > 1
|
18275
|
81 |
1029 |
if @colon_list
|
18279
|
50 |
3213 |
if %break_before_container_types and $max_index_to_go > 0
|
18284
|
18 |
3245 |
if (not $token_lengths_to_go[$imax] and $types_to_go[$imax] eq ";")
|
18288
|
6 |
3257 |
if ($rOpts_one_line_block_semicolons == 0)
|
18294
|
953 |
2310 |
if ($max_index_to_go > $peak_batch_size)
|
18302
|
134 |
3784 |
if ($lp_object_count_this_batch)
|
18317
|
6 |
3912 |
if ($rOpts_blank_lines_after_opening_block)
|
18319
|
0 |
6 |
if ($types_to_go[$iterm] eq "#" and $iterm > $imin)
|
18321
|
0 |
0 |
if ($types_to_go[$iterm] eq "b" and $iterm > $imin)
|
18326
|
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/)
|
18346
|
3915 |
170 |
$i - 1 > 0 && $types_to_go[$i - 1] eq 'b' ? :
|
18368
|
0 |
18 |
unless $type eq ";"
|
18371
|
0 |
18 |
if ($want_left_space{$type} != -1)
|
18401
|
128 |
711 |
unless defined $runmatched_opening_indexes
|
18408
|
149 |
690 |
if ($types_to_go[$max_index_to_go] eq "q")
|
18412
|
32 |
117 |
if ($seqno_qw_opening)
|
18423
|
32 |
814 |
unless ($seqno)
|
18424
|
32 |
0 |
if ($seqno_qw_opening and $_ == $max_index_to_go) { }
|
18448
|
864 |
0 |
if ($seqno)
|
18449
|
864 |
0 |
if ($saved_opening_indentation{$seqno})
|
18486
|
0 |
1396 |
unless (@{$ri_last;})
|
18499
|
183 |
1213 |
if $i_opening < $ri_start->[$nline]
|
18502
|
0 |
1396 |
if ($i_opening > $ri_last->[-1]) { }
|
18543
|
8 |
61 |
if ($type_i eq "#")
|
18545
|
0 |
8 |
if ($i < $ibeg)
|
18546
|
0 |
0 |
wantarray ? :
|
18552
|
7 |
62 |
if ($type_i eq "b")
|
18554
|
0 |
7 |
if ($i < $ibeg)
|
18555
|
0 |
0 |
wantarray ? :
|
18564
|
1 |
33 |
if ($type_i eq "}" and !$block_type || $is_sort_map_grep_eval_do{$block_type})
|
18572
|
5 |
64 |
wantarray ? :
|
18593
|
223 |
1515 |
if ($is_closing_type{$types_to_go[$max_index_to_go]}) { }
|
|
559 |
956 |
elsif ($is_opening_type{$types_to_go[$max_index_to_go]}) { }
|
18594
|
0 |
223 |
if ($nesting_depth_to_go[$max_index_to_go] <= 0) { }
|
18599
|
0 |
0 |
unless (get_saw_brace_error())
|
18641
|
5 |
3979 |
if $typel eq "-"
|
18642
|
10 |
3974 |
if $typer eq "-"
|
18643
|
4 |
3980 |
if $typel eq "/"
|
18644
|
13 |
3971 |
if $typer eq "/"
|
18646
|
697 |
3287 |
$typel eq 'k' ? :
|
18647
|
56 |
3928 |
$typer eq 'k' ? :
|
18648
|
321 |
65 |
if ($is_chain_operator{$keyl} and $want_break_before{$typel})
|
18649
|
66 |
255 |
if $typel eq "?"
|
18654
|
48 |
3870 |
if ($is_chain_operator{$keyr} and not $want_break_before{$typer})
|
18655
|
1 |
47 |
if $typer eq "?"
|
18661
|
986 |
124 |
unless $count
|
18671
|
110 |
4074 |
$type eq 'k' ? :
|
18672
|
54 |
4130 |
if $key eq "-"
|
18673
|
85 |
4099 |
if $key eq "/"
|
18674
|
193 |
3991 |
if ($saw_chain_type{$key})
|
18681
|
91 |
33 |
unless $count
|
18689
|
0 |
19 |
if ($has_interior_dot_or_plus and $nmax == 1 and @keys == 1)
|
18703
|
71 |
122 |
if ($left_chain_type{$key})
|
18704
|
0 |
71 |
if $nobreak_to_go[$itest - 1]
|
18706
|
131 |
15 |
unless $self->in_same_container_i($i, $itest)
|
18717
|
1 |
14 |
if ($key eq ":" and $levels_to_go[$i] != $levels_to_go[$itest])
|
18721
|
1 |
0 |
if (defined $i_question and $i_question > 0)
|
18730
|
122 |
71 |
if ($right_chain_type{$key})
|
18731
|
0 |
122 |
if $nobreak_to_go[$itest]
|
18733
|
196 |
31 |
unless $self->in_same_container_i($i, $itest)
|
18737
|
0 |
31 |
if ($key eq ":" and $levels_to_go[$i] != $levels_to_go[$itest])
|
18741
|
0 |
0 |
if (defined $i_question)
|
18752
|
20 |
13 |
if (@insert_list)
|
18769
|
0 |
216 |
if $nobreak_to_go[$i_break_left]
|
18777
|
0 |
383 |
if ($line_number >= @{$ri_last;})
|
18790
|
11 |
205 |
if ($types_to_go[$i_break_left] eq "b")
|
18793
|
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)
|
18832
|
316 |
58 |
if $parent_seqno_to_go[$i2] ne $parent_seqno_1
|
18834
|
52 |
6 |
if ($i2 < $i1)
|
18840
|
0 |
58 |
if $depth_1 < 0
|
18843
|
0 |
58 |
unless $nesting_depth_to_go[$i2] == $depth_1
|
18847
|
55 |
3 |
$type_1 ne ':' ? :
|
18853
|
3 |
323 |
unless defined $KK
|
18854
|
55 |
268 |
if $KK >= $K2
|
18857
|
0 |
268 |
if $depth_i < $depth_1
|
18858
|
217 |
51 |
if $depth_i > $depth_1
|
18859
|
45 |
6 |
if ($type_1 ne ":")
|
18861
|
0 |
45 |
if $tok_i eq "?" or $tok_i eq ":"
|
18872
|
0 |
58 |
if $i2 - $i1 > 200
|
18877
|
1268 |
400 |
if $depth_i > $depth_1
|
18878
|
0 |
400 |
if $depth_i < $depth_1
|
18880
|
11 |
389 |
if $rbreak->{$tok_i}
|
18908
|
0 |
501 |
unless $nmax >= 2
|
18917
|
41 |
491 |
$typel eq 'k' ? :
|
18920
|
482 |
50 |
unless $has_leading_op
|
18921
|
19 |
31 |
if ($n > 1)
|
18923
|
4 |
15 |
unless $tokenl eq $tokbeg and $nesting_depth_to_go[$il] eq $depth_beg
|
18938
|
1 |
131 |
if ($is_assignment{$type} and $nesting_depth_to_go[$i] eq $depth_beg)
|
18941
|
0 |
1 |
if ($want_break_before{$type}) { }
|
18962
|
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)
|
18970
|
10 |
5 |
unless @insert_list
|
18985
|
0 |
100 |
if $is_assignment{$type} and $nesting_depth_to_go[$i] eq $depth_beg
|
18991
|
5 |
0 |
if (@insert_list)
|
19061
|
2 |
4 |
if ($type_end eq "#")
|
19063
|
2 |
0 |
if (defined $K_end)
|
19068
|
0 |
6 |
unless $type_end eq "}" and $rLL->[$K_end][5] eq "}"
|
19072
|
0 |
6 |
unless defined $K_semicolon
|
19074
|
0 |
6 |
if $i_semicolon <= $i_beg
|
19075
|
0 |
6 |
unless $rLL->[$K_semicolon][7] eq ";"
|
19079
|
0 |
6 |
if ($types_to_go[$i_semicolon] ne ";")
|
19088
|
0 |
6 |
unless defined $K_opening
|
19090
|
0 |
6 |
if $i_opening < $i_beg
|
19095
|
2 |
20 |
if ($rLL->[$K][7] eq ";")
|
19100
|
2 |
4 |
if $semicolon_count
|
19143
|
1 |
730 |
if $high_stress_level <= 2
|
19146
|
0 |
730 |
if $nmax_start <= 0
|
19149
|
46 |
684 |
if ($types_to_go[$iend_max] eq "#")
|
19177
|
200 |
5116 |
if ($is_math_op{$type} or $is_amp_amp{$type} or $is_assignment{$type} or $type eq ":")
|
19191
|
2584 |
162 |
if ($excess <= 1 or defined $nend_sec and $nn < 5 || $nmax_start - $nn < 5) { }
|
19203
|
29 |
133 |
if (defined $nend_sec)
|
19206
|
19 |
10 |
if ($num > $nmax_section)
|
19214
|
656 |
74 |
if (defined $nend_sec)
|
19217
|
647 |
9 |
if ($num > $nmax_section)
|
19349
|
69 |
2515 |
if ($is_amp_amp{$types_to_go[$ibeg_2]})
|
19357
|
0 |
3020 |
unless $Perl::Tidy::Formatter::b->[1] <=> $Perl::Tidy::Formatter::a->[1]
|
19398
|
685 |
807 |
if ($nmax_batch >= $nmax_last)
|
19409
|
0 |
807 |
if ($rhash->{'_num_compares'} > $max_compares)
|
19467
|
42 |
765 |
if ($rhash->{'_optimization_on'} and $num_joints <= 2)
|
19526
|
389 |
2524 |
if $excess > 0
|
19541
|
609 |
1915 |
if ($n == $nmax)
|
19543
|
39 |
570 |
if ($type_ibeg_2 eq "{")
|
19546
|
1 |
0 |
if ($rOpts_cuddled_paren_brace and $type_iend_1 eq "}" and $iend_1 == $ibeg_1 and $ibeg_2 == $iend_2)
|
19551
|
1 |
0 |
if ($tokens_to_go[$iend_1] eq ")" and $tokens_to_go[$ibeg_2] eq "{")
|
19562
|
38 |
0 |
if $type_iend_1 ne "=>"
|
19579
|
339 |
2146 |
if ($itok)
|
19581
|
167 |
172 |
unless $ok_0
|
19589
|
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]})
|
19610
|
1700 |
618 |
unless $ok_2
|
19621
|
12 |
606 |
if ($skip_Section_3)
|
19632
|
230 |
376 |
unless $ok_3
|
19640
|
227 |
149 |
if $forced_breakpoint_to_go[$iend_1]
|
19666
|
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 ","
|
19673
|
138 |
11 |
if ($n < $nmax)
|
19677
|
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 '('
|
19695
|
109 |
40 |
if (not $n_best) { }
|
19705
|
40 |
69 |
if ($rhash->{'_optimization_on'} == 1)
|
19715
|
0 |
40 |
if ($bs > $bs_best or $bs == $bs_best and $n < $n_best)
|
19727
|
122 |
685 |
if ($n_best)
|
19741
|
361 |
365 |
if ($n_old > $n_best)
|
19753
|
69 |
53 |
if (not $rhash->{'_optimization_on'} || $incomplete_loop and $num_bs)
|
19812
|
339 |
0 |
if ($itok)
|
19816
|
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}) { }
|
19820
|
1 |
102 |
if ($itok eq $iend_1) { }
|
19821
|
1 |
0 |
unless $want_break_before{$type}
|
19824
|
102 |
0 |
if $want_break_before{$type}
|
19852
|
26 |
61 |
if ($types_to_go[$itokp] eq "n")
|
19855
|
2 |
24 |
if ($itokp == $iend_2) { }
|
19870
|
15 |
72 |
if (not $good_combo and $types_to_go[$itokm] eq "n")
|
19873
|
6 |
9 |
if ($itokm == $ibeg_1) { }
|
19890
|
68 |
19 |
unless ($good_combo)
|
19896
|
42 |
26 |
$itok eq $iend_1 ? :
|
19944
|
64 |
23 |
unless ($good_combo)
|
19948
|
40 |
24 |
$itok == $iend_1 ? :
|
19956
|
64 |
23 |
unless $good_combo
|
20000
|
1785 |
533 |
$n < $nmax ? :
|
20009
|
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 '.') { }
|
20069
|
16 |
329 |
if ($is_amp_amp{$type_ibeg_2})
|
20073
|
5 |
10 |
if ($is_amp_amp{$type_t} or $type_t eq ":")
|
20107
|
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]})
|
20139
|
244 |
89 |
unless $skip_Section_3 or $type_ibeg_2 =~ /^[\.\?]$/ or $type_ibeg_2 eq "=="
|
20156
|
585 |
11 |
if $forced_breakpoint_to_go[$iend_1]
|
20161
|
0 |
0 |
unless $want_break_before{$type_iend_1}
|
20169
|
0 |
1 |
if $levels_to_go[$ibeg_1] ne $levels_to_go[$ibeg_2]
|
20172
|
0 |
1 |
unless $type_iend_2 eq ":"
|
20182
|
665 |
140 |
if $old_breakpoint_to_go[$iend_1]
|
20187
|
1 |
139 |
if ($type_ibeg_1 eq '}' and $type_ibeg_2 eq 'i') { }
|
20191
|
1 |
0 |
unless $ibeg_1 == $iend_1 - 1 and $iend_2 == $ibeg_2 + 1 and $this_line_is_semicolon_terminated
|
20204
|
112 |
27 |
unless $n + 1 >= $nmax
|
20209
|
17 |
10 |
if $levels_to_go[$iend_1] != $levels_to_go[$iend_2]
|
20215
|
0 |
29 |
if ($tokens_to_go[$ii] eq "(")
|
20220
|
0 |
10 |
if $saw_paren
|
20247
|
36 |
42 |
if $old_breakpoint_to_go[$iend_1] and $iend_1 != $ibeg_1
|
20265
|
42 |
0 |
if ($ibeg_1 != $iend_1 and not $is_short_quote and not $is_ternary)
|
20274
|
19 |
0 |
unless $nmax < $n + 2 || $nmax == $n + 2 && $types_to_go[$ibeg_nmax] eq ';' || $type_iend_2 eq 'h' || !$forced_breakpoint_to_go[$iend_1] && $type_iend_2 eq '{' and $type_ibeg_2 ne $tokens_to_go[$ibeg_2] || $ibeg_3 >= 0 && $type_ibeg_2 ne $types_to_go[$ibeg_3]
|
20305
|
1 |
20 |
if ($nmax >= $n + 2 and not $ibeg_3 > 0 && ref $leading_spaces_to_go[$ibeg_3] && $type_iend_2 eq ',')
|
20327
|
0 |
1 |
unless $ok
|
20332
|
19 |
2 |
unless ($tokens_to_go[$ibeg_2] =~ /^[\{\(\[]$/)
|
20346
|
11 |
15 |
if $is_last_next_redo_return{$tokens_to_go[$iend_1]} and $n < $nmax
|
20352
|
0 |
15 |
if ($is_and_or{$tokens_to_go[$iend_1]})
|
20354
|
0 |
0 |
unless $want_break_before{$tokens_to_go[$iend_1]}
|
20386
|
0 |
0 |
unless $n == 2 and $n == $nmax and $type_iend_1 ne $type_iend_2 or $types_to_go[$i_next_nonblank] eq "Q" and $i_next_nonblank >= $iend_2 - 2 and $token_lengths_to_go[$i_next_nonblank] < $rOpts_short_concatenation_item_length and $types_to_go[$iend_1_minus] ne 'Q' || $summed_len_2 < $summed_len_1
|
20419
|
0 |
2 |
if ($nesting_depth_to_go[$i] != $depth)
|
20421
|
0 |
0 |
if $tv > 1
|
20428
|
0 |
1 |
if ($tv > 0)
|
20432
|
0 |
0 |
if $tv > 1
|
20437
|
0 |
0 |
$n < $nmax ? :
|
20442
|
0 |
0 |
if ($nesting_depth_to_go[$i] != $depth)
|
20444
|
0 |
0 |
if $tv > 2
|
20451
|
0 |
0 |
if $tv > 2
|
20484
|
496 |
110 |
$n > 1 ? :
|
20485
|
436 |
170 |
$n < $nmax ? :
|
20486
|
312 |
294 |
$n + 2 <= $nmax ? :
|
20495
|
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}) { }
|
20532
|
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]
|
20539
|
43 |
0 |
if not $ok and $want_break_before{$type_ibeg_2}
|
20552
|
15 |
72 |
if $lev ne $levels_to_go[$ibeg_1]
|
20561
|
17 |
55 |
unless $follows_colon or $precedes_colon
|
20564
|
29 |
26 |
unless ($follows_colon)
|
20571
|
34 |
71 |
if $ii >= 0 and $types_to_go[$ii] eq ":" and $levels_to_go[$ii] == $lev
|
20576
|
24 |
5 |
unless $local_count > 1
|
20603
|
23 |
0 |
unless $n == 2 and $n == $nmax and $type_ibeg_1 ne $type_ibeg_2 or $types_to_go[$i_next_nonblank] eq "Q" and $i_next_nonblank >= $iend_2 - 1 and $token_lengths_to_go[$i_next_nonblank] < $rOpts_short_concatenation_item_length and $types_to_go[$iend_1] ne 'Q' || $summed_len_2 < $summed_len_1 || $n == 2 && $n == $nmax && $this_line_is_semicolon_terminated
|
20635
|
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]}) { }
|
20645
|
4 |
3 |
unless $this_line_is_semicolon_terminated and $type_ibeg_1 eq '}' || $type_ibeg_1 eq 'k' && $is_if_unless{$tokens_to_go[$ibeg_1]} && $iend_2 - $ibeg_2 <= 7
|
20658
|
3 |
1 |
unless $old_breakpoint_to_go[$iend_1]
|
20689
|
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')
|
20709
|
1 |
0 |
unless $this_line_is_semicolon_terminated and $type_ibeg_1 eq "k" and $is_and_or{$tokens_to_go[$ibeg_1]}
|
20719
|
8 |
1 |
unless ($is_assignment{$type_iend_1})
|
20721
|
8 |
0 |
if $type_iend_1 ne "k" and $tokens_to_go[$ibeg_2] ne "while"
|
20743
|
0 |
0 |
unless $this_line_is_semicolon_terminated and $type_ibeg_1 eq "k" and $is_if_unless{$tokens_to_go[$ibeg_1]}
|
20750
|
0 |
11 |
unless $n == 1 or $n == $nmax
|
20751
|
0 |
11 |
if $old_breakpoint_to_go[$iend_1]
|
20756
|
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
|
20791
|
35 |
229 |
if $typel eq "?"
|
20792
|
1 |
228 |
if $typer eq "?"
|
20793
|
20 |
208 |
if ($typel eq ':') { }
|
|
1 |
207 |
elsif ($typer eq ':') { }
|
20801
|
20 |
25 |
if ($i_first_colon > 0)
|
20803
|
12 |
8 |
if (defined $i_question and $i_question > 0)
|
20820
|
1 |
7 |
if ($type eq ',' || $type eq 'k' && ($nmax > 1 && $token eq 'return') and $self->in_same_container_i($ii, $i_question))
|
20834
|
1 |
11 |
if (@insert_list)
|
20851
|
0 |
50 |
unless %break_before_container_types
|
20854
|
0 |
50 |
unless $nmax >= 0
|
20867
|
21 |
122 |
unless $ir > $il
|
20874
|
4 |
118 |
if ($type_end eq "#")
|
20876
|
0 |
4 |
unless defined $Kend
|
20881
|
0 |
122 |
if ($total_weld_count)
|
20883
|
0 |
0 |
if (defined $Kend_test and $Kend_test > $Kl)
|
20890
|
0 |
0 |
if defined $Kend_test
|
20894
|
92 |
30 |
unless $is_opening_token{$token}
|
20895
|
0 |
30 |
unless $Kl < $Kend - 1
|
20898
|
0 |
30 |
unless defined $seqno
|
20901
|
16 |
14 |
unless $rbreak_before_container_by_seqno->{$seqno}
|
20906
|
0 |
14 |
if $ibreak < $il
|
20907
|
0 |
14 |
if $nobreak_to_go[$ibreak]
|
20912
|
10 |
40 |
if (@insert_list)
|
20921
|
15 |
3 |
if ($self->[53] == 0)
|
20932
|
2 |
11 |
if ($self->[56] == 0)
|
20944
|
0 |
0 |
unless ($self->[60])
|
20948
|
0 |
0 |
if ($self->[59] <= 6)
|
20980
|
5 |
129 |
if (@{$ri_starting_one_line_block;})
|
21005
|
804 |
3065 |
unless ref $indentation
|
21008
|
2457 |
608 |
if $indentation->get_marked
|
21015
|
379 |
229 |
unless $align_seqno
|
21020
|
229 |
0 |
if (defined $Ko and defined $Kc)
|
21021
|
99 |
130 |
if $Ko >= $K_to_go[$ibeg] and $Kc <= $K_to_go[$iend]
|
21040
|
50 |
80 |
if ($line == 1 and $i == $ibeg)
|
21053
|
118 |
12 |
if ($i == $ibeg) { }
|
21056
|
7 |
111 |
if ($line == 0) { }
|
21062
|
7 |
0 |
if (defined $indent)
|
21082
|
89 |
22 |
if $types_to_go[$iendm + 1] eq "b"
|
21097
|
10 |
2 |
if ($closing_index > $iend)
|
21099
|
9 |
1 |
if ($ci_levels_to_go[$ibeg_next] > 0)
|
21118
|
52 |
78 |
if ($move_right == 0)
|
21126
|
68 |
10 |
unless defined $collapsed_length
|
21136
|
10 |
68 |
if ($closing_index < 0 and not $collapsed_length)
|
21157
|
67 |
1 |
if ($have_child or $move_right > 0)
|
21162
|
3 |
64 |
if ($Kc > $K_to_go[$max_index_to_go])
|
21166
|
61 |
6 |
if ($i == $ibeg)
|
21168
|
60 |
1 |
if ($length > $max_length)
|
21175
|
60 |
463 |
if $closing_index <= $ibeg_t
|
21184
|
96 |
367 |
if ($length_t > $max_length)
|
21192
|
0 |
67 |
if ($right_margin < 0)
|
21215
|
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) { }
|
21233
|
36 |
26 |
$move_right <= $right_margin ? :
|
21267
|
0 |
5 |
unless @ilist
|
21276
|
6 |
9 |
if $inext > $iend
|
21280
|
7 |
2 |
ref $leading_spaces_to_go[$ibeg] ? :
|
21285
|
0 |
9 |
if ($excess > 0)
|
21288
|
0 |
0 |
if ($available_spaces > 0)
|
21299
|
0 |
4 |
if $inext <= $iend
|
21300
|
4 |
0 |
if $inext > $iend
|
21302
|
5 |
4 |
if $inext <= $iend
|
21329
|
0 |
9 |
unless $max_line > $line_open
|
21342
|
0 |
9 |
if ($ibeg eq $closing_index)
|
21343
|
0 |
9 |
if $lev_start != $levels_to_go[$ibeg]
|
21344
|
9 |
0 |
if $ci_start_plus != $ci_levels_to_go[$ibeg]
|
21345
|
0 |
0 |
if $closing_index <= $iend
|
21403
|
1 |
1109 |
if ($types_to_go[0] eq ":")
|
21409
|
13 |
1097 |
if (@{$rbond_strength_bias;})
|
21412
|
31 |
0 |
if ($ii >= 0 and $ii <= $max_index_to_go) { }
|
21427
|
0 |
1110 |
if ($types_to_go[$imin] eq "b")
|
21428
|
0 |
1110 |
if ($types_to_go[$imax] eq "b")
|
21439
|
9 |
196 |
if ($_ eq $last_tok)
|
21469
|
439 |
3511 |
if (@{$rcolon_list;})
|
21478
|
383 |
56 |
unless ($is_colon_chain)
|
21480
|
1769 |
66 |
unless $tokens_to_go[$i] eq "?"
|
21484
|
0 |
66 |
if $tokens_to_go[$max_index_to_go] eq "#" and not terminal_type_i(0, $max_index_to_go) =~ /^[\;\}]$/
|
21490
|
61 |
5 |
if defined $mate_index_to_go[$i] and $mate_index_to_go[$i] <= $i_next_nonblank
|
21494
|
4 |
1 |
if ($want_break_before{'?'})
|
21509
|
32 |
407 |
if ($next_nonblank_type eq '?') { }
|
|
4 |
403 |
elsif ($types_to_go[$i_lowest] eq '?') { }
|
21521
|
88 |
351 |
if ($next_nonblank_type eq ':') { }
|
|
4 |
347 |
elsif ($types_to_go[$i_lowest] eq ':') { }
|
21533
|
0 |
3950 |
if ($i_lowest <= $i_last_break)
|
21546
|
0 |
3950 |
$types_to_go[$i_begin] eq 'b' ? :
|
21548
|
281 |
3669 |
$types_to_go[$i_lowest] eq 'b' ? :
|
21553
|
10 |
3940 |
if ($tokens_to_go[$i_lowest] eq '{' || $tokens_to_go[$i_lowest] eq '[' and not $forced_breakpoint_to_go[$i_lowest])
|
21570
|
2295 |
1655 |
if ($i_begin <= $imax and $types_to_go[$i_begin] eq "b")
|
21583
|
49 |
1061 |
if (@i_colon_breaks)
|
21585
|
38 |
11 |
unless ($is_chain)
|
21650
|
56 |
3894 |
if ($types_to_go[$i_begin] eq "i" and substr($tokens_to_go[$i_begin], 0, 1) =~ /\w/)
|
21654
|
6 |
50 |
if ($tokens_to_go[$i_next_nonblank] eq "(")
|
21664
|
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)
|
21714
|
10914 |
22346 |
if ($type eq "b")
|
21717
|
503 |
32757 |
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}) { }
|
21749
|
323 |
32434 |
if ($len >= $maximum_line_length)
|
21778
|
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})
|
21798
|
28 |
30558 |
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/ || $next_nonblank_block_type =~ /$ASUB_PATTERN/) && $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)
|
21847
|
2702 |
0 |
if ($strength < 9999)
|
21857
|
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)
|
21869
|
11 |
34 |
if ($i_lowest >= 0)
|
21880
|
14250 |
18999 |
if ($strength <= $lowest_strength and $strength < 10000)
|
21885
|
108 |
14142 |
if ($leading_alignment_type)
|
21899
|
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")
|
21931
|
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")
|
21944
|
3 |
3 |
if ($types_to_go[$il] =~ m[^[/\*\+\-\%]$] or $types_to_go[$ir] =~ m[^[/\*\+\-\%]$])
|
21957
|
2702 |
11431 |
if ($must_break)
|
21966
|
3514 |
4507 |
if ($line_count > 0 and $i_test < $imax and $lowest_strength - $last_break_strength <= "0.001")
|
21973
|
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])
|
22002
|
647 |
29783 |
if $i_test >= $imax
|
22011
|
29205 |
578 |
if ($excess < 0) { }
|
|
157 |
421 |
elsif ($excess == 0) { }
|
22031
|
115 |
42 |
if ($i_test + 1 < $imax and $next_nonblank_type ne ',' and not $is_closing_type{$next_nonblank_type}) { }
|
22066
|
3 |
85 |
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)
|
22078
|
473 |
60 |
if ($i_lowest >= 0)
|
22093
|
0 |
3950 |
if ($i_lowest < 0)
|
22109
|
57 |
8 |
if (defined $i_question)
|
22110
|
56 |
1 |
if ($want_break_before{'?'})
|
22114
|
57 |
0 |
if ($i_question >= 0)
|
22235
|
31 |
524 |
if ($rOpts_line_up_parentheses)
|
22238
|
3 |
28 |
if ($rOpts_extended_continuation_indentation) { }
|
22247
|
168 |
0 |
unless $closing_vertical_tightness{$_}
|
22266
|
2363 |
0 |
if ($depth_t < $minimum_depth)
|
22275
|
0 |
2363 |
if ($rOpts_comma_arrow_breakpoints == 3 and $seqno)
|
22298
|
883 |
1480 |
if ($changed_seqno or not defined $has_broken_sublist[$depth_t])
|
22319
|
543 |
0 |
if ($item_count_stack[$dd])
|
22327
|
543 |
0 |
$seqno ? :
|
22330
|
40 |
503 |
if ($dont_align[$dd]) { }
|
|
497 |
6 |
elsif ($real_comma_count) { }
|
22360
|
251 |
246 |
if $must_break_open
|
22410
|
34 |
55 |
if ($old_breakpoint_to_go[$ii])
|
22462
|
0 |
40 |
if ($ci_start and $rOpts_extended_continuation_indentation)
|
22464
|
0 |
0 |
if ($self->[74]{$K0})
|
22466
|
8 |
27 |
if (not $ci_start and $old_breakpoint_to_go[$i_first_comma] and $level_comma == $levels_to_go[0])
|
22473
|
3 |
59 |
if ($old_breakpoint_to_go[$ii])
|
22475
|
0 |
3 |
if $obp_count > 1
|
22476
|
3 |
0 |
if $levels_to_go[$ii] == $level_comma
|
22482
|
3 |
0 |
if ($ibreak >= 0 and $obp_count == 1 and $old_comma_break_count > 0)
|
22485
|
0 |
3 |
if $types_to_go[$ibreak_m] eq "b"
|
22486
|
3 |
0 |
if ($ibreak_m >= 0)
|
22508
|
3 |
0 |
if ($is_uncontained_comma_break_included_type{$type_m})
|
22516
|
0 |
3 |
if (not $rOpts_break_at_old_ternary_breakpoints and $ibreak_p <= $max_index_to_go)
|
22523
|
3 |
0 |
unless $no_break
|
22561
|
69 |
0 |
if ($item_count_stack[$dd] == 0 and $is_logical_container{$container_type[$dd]} or $has_old_logical_breakpoints[$dd])
|
22573
|
42 |
168 |
if ($rand_or_list[$dd][$i])
|
22636
|
1738 |
0 |
if $current_depth < $minimum_depth
|
22648
|
22133 |
12702 |
if ($type ne "b")
|
22669
|
17 |
34818 |
if ($i_want_previous_break >= 0)
|
22677
|
2490 |
32345 |
if ($old_breakpoint_to_go[$i])
|
22683
|
12702 |
22133 |
if $type eq "b"
|
22694
|
134 |
21999 |
if ($type eq "#")
|
22695
|
0 |
134 |
if ($i != $max_index_to_go)
|
22709
|
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))
|
22742
|
61 |
22072 |
if ($type eq '||') { }
|
|
55 |
22017 |
elsif ($type eq '&&') { }
|
|
28 |
21989 |
elsif ($type eq 'f') { }
|
|
1370 |
20619 |
elsif ($type eq 'k') { }
|
|
505 |
20114 |
elsif ($is_assignment{$type}) { }
|
22744
|
29 |
32 |
if $i == $i_line_start || $i == $i_line_end and $rOpts_break_at_old_logical_breakpoints
|
22750
|
26 |
29 |
if $i == $i_line_start || $i == $i_line_end and $rOpts_break_at_old_logical_breakpoints
|
22758
|
44 |
1326 |
if ($token eq 'and') { }
|
|
40 |
1286 |
elsif ($token eq 'or') { }
|
|
120 |
1166 |
elsif ($token eq 'if' or $token eq 'unless') { }
|
22760
|
19 |
25 |
if $i == $i_line_start || $i == $i_line_end and $rOpts_break_at_old_logical_breakpoints
|
22770
|
15 |
25 |
if $i == $i_line_start || $i == $i_line_end and $rOpts_break_at_old_logical_breakpoints
|
22773
|
9 |
31 |
if ($is_logical_container{$container_type[$depth]}) { }
|
22776
|
16 |
15 |
if ($is_long_line) { }
|
|
4 |
22 |
elsif ($i == $i_line_start || $i == $i_line_end and $rOpts_break_at_old_logical_breakpoints) { }
|
22786
|
7 |
113 |
if ($i == $i_line_start || $i == $i_line_end and $rOpts_break_at_old_logical_breakpoints)
|
22800
|
6131 |
16002 |
if ($type_sequence)
|
22810
|
3017 |
19116 |
if ($depth == $current_depth + 1 and $is_opening_type{$type}) { }
|
|
2854 |
16262 |
elsif ($depth == $current_depth - 1 and $is_closing_type{$type}) { }
|
22836
|
17184 |
4949 |
unless $quick_filter{$type}
|
22839
|
984 |
3965 |
if ($type eq '=>') { }
|
|
116 |
3849 |
elsif ($type eq '.') { }
|
|
1443 |
4802 |
elsif ($is_non_list_type{$type} and not $self->is_in_list_by_i($i)) { }
|
22840
|
0 |
984 |
if $last_nonblank_type eq "=>"
|
22841
|
6 |
978 |
if $rOpts_break_at_old_comma_breakpoints
|
22843
|
0 |
978 |
if $rOpts_comma_arrow_breakpoints == 3 and not defined $override_cab3[$depth]
|
22867
|
28 |
1415 |
if ($type eq "f")
|
22871
|
1569 |
2396 |
if $type ne ","
|
22884
|
788 |
1738 |
if $dd < $current_depth
|
22885
|
90 |
2436 |
if $item_count_stack[$dd]
|
22887
|
46 |
2480 |
if $has_old_logical_breakpoints[$dd]
|
22893
|
788 |
1738 |
if (defined $i_opening and $i_opening >= 0)
|
22894
|
4 |
0 |
unless is_unbreakable_container($dd) or $type eq "Q" and $i_opening >= $max_index_to_go - 2 and $token eq q['] || $token eq '"'
|
22913
|
31 |
1707 |
if ($has_old_logical_breakpoints[$current_depth]) { }
|
|
12 |
1711 |
elsif ($i_old_assignment_break and $total_depth_variation > 4 and $old_breakpoint_count == 1 and $i_old_assignment_break < $max_index_to_go) { }
|
22949
|
610 |
1786 |
if ($want_comma_break[$depth])
|
22951
|
145 |
465 |
if ($next_nonblank_type =~ /^[\)\}\]R]$/)
|
22952
|
145 |
0 |
if ($rOpts_comma_arrow_breakpoints)
|
22958
|
465 |
0 |
unless $next_nonblank_type eq "#"
|
22971
|
460 |
5 |
if ($ibreak > 0 and not $tokens_to_go[$ibreak + 1] =~ /^[\)\}\]]$/)
|
22974
|
142 |
318 |
if ($tokens_to_go[$ibreak] eq "-")
|
22975
|
451 |
9 |
if ($types_to_go[$ibreak] eq "b")
|
22976
|
453 |
7 |
if ($types_to_go[$ibreak] =~ /^[,wiZCUG\(\{\[]$/)
|
22985
|
453 |
0 |
if ($tokens_to_go[$ibreak + 1] ne "->" and $tokens_to_go[$ibreak + 1] ne ",")
|
23005
|
8 |
11 |
if ($depth < $starting_depth and $comma_follows_last_closing_token and not $dont_align[$depth])
|
23009
|
8 |
0 |
unless $next_nonblank_type eq "#"
|
23016
|
543 |
1235 |
if ($item_count == 0)
|
23023
|
29 |
514 |
if ($opening_structure_index_stack[$depth] < 0 and $self->is_in_block_by_i($i))
|
23032
|
411 |
1367 |
if ($last_nonblank_type =~ /^[iR\]]$/)
|
23084
|
28 |
2462 |
if ($type eq 'k') { }
|
23087
|
150 |
2340 |
if ($next_nonblank_type eq 'k') { }
|
23094
|
6 |
2484 |
if ($poor_break)
|
23111
|
2482 |
2 |
if ($rOpts_break_at_old_keyword_breakpoints)
|
23112
|
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})
|
23132
|
12 |
0 |
unless $skip
|
23139
|
2480 |
4 |
if ($rOpts_break_at_old_attribute_breakpoints)
|
23140
|
5 |
2475 |
if ($next_nonblank_type eq "A")
|
23148
|
73 |
2411 |
if ($is_assignment{$type}) { }
|
|
0 |
2411 |
elsif ($is_assignment{$next_nonblank_type}) { }
|
23166
|
2984 |
3147 |
if ($is_closing_sequence_token{$token}) { }
|
23168
|
130 |
2854 |
if ($type eq ":")
|
23172
|
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)
|
23183
|
6 |
67 |
unless (defined $mix)
|
23184
|
17 |
56 |
if ($ieq > 0 and $ieq < $mix)
|
23192
|
728 |
2256 |
if (has_postponed_breakpoint($type_sequence))
|
23193
|
12 |
716 |
$type eq ':' ? :
|
23194
|
266 |
462 |
if ($i >= $inc)
|
23206
|
130 |
3017 |
if ($token eq '?') { }
|
23208
|
0 |
118 |
if (not defined $i_colon or $i == 0 or $i == $max_index_to_go)
|
23220
|
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 "#")
|
23243
|
26 |
2991 |
if ($rOpts_extended_line_up_parentheses and not defined $mate_index_to_go[$i])
|
23248
|
13 |
13 |
if ($lp_object)
|
23275
|
0 |
3017 |
if ($rOpts_comma_arrow_breakpoints == 3 and $type_sequence)
|
23284
|
890 |
2127 |
$is_container_label_type{$last_nonblank_type} ? :
|
23305
|
609 |
2408 |
if ($next_nonblank_type eq "b" or $next_nonblank_type eq "#")
|
23341
|
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 "{")
|
23375
|
625 |
2229 |
if $depth < $minimum_depth
|
23386
|
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)
|
23401
|
453 |
2401 |
if $item_count_stack[$current_depth]
|
23413
|
279 |
2575 |
if ($rOpts_line_up_parentheses and $saw_opening_structure)
|
23434
|
0 |
2854 |
if ($cab_flag == 3 and $type_sequence)
|
23436
|
0 |
0 |
if (defined $test_cab)
|
23443
|
1924 |
930 |
if ($type_sequence and not $self->[36]{$type_sequence})
|
23454
|
29 |
2200 |
if ($saw_opening_structure and not $lp_object and $levels_to_go[$i_opening] >= $high_stress_level)
|
23475
|
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]})
|
23489
|
1949 |
905 |
if (not $is_long_term and $saw_opening_structure)
|
23500
|
25 |
92 |
if (ref $indentation and $self->[18]{$type_sequence})
|
23506
|
0 |
25 |
if ($diff > 0)
|
23512
|
25 |
0 |
if ($lp_tol_boost and $lp_object and $rOpts_extended_continuation_indentation || !$self->[36]{$type_sequence})
|
23528
|
0 |
509 |
if (not $ci_levels_to_go[$i_opening] and $self->[90]{$type_sequence})
|
23543
|
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)
|
23675
|
0 |
2854 |
if ($saw_opening_structure and $rOpts_break_open_compact_parens)
|
23684
|
0 |
0 |
if ($flag eq '*' or $flag eq '1') { }
|
23700
|
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]})
|
23709
|
191 |
13 |
if (not $has_comma_breakpoints) { }
|
23724
|
4 |
2850 |
if ($is_long_term and @{$rfor_semicolon_list[$current_depth];})
|
23731
|
3 |
1 |
unless $lp_object
|
23738
|
681 |
2173 |
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 |
2163 |
elsif ($is_simple_logical_expression and $has_old_logical_breakpoints[$current_depth]) { }
|
|
78 |
2085 |
elsif ($is_long_term) { }
|
23773
|
96 |
585 |
if ($lp_object)
|
23781
|
681 |
0 |
if ($minimum_depth <= $current_depth)
|
23783
|
485 |
196 |
if ($i_opening >= 0)
|
23784
|
445 |
0 |
unless ($do_not_break_apart or is_unbreakable_container($current_depth))
|
23793
|
0 |
0 |
if ($is_long_term and $types_to_go[$i_opening] eq "L" and $opening_vertical_tightness{'{'} and $closing_vertical_tightness{'}'})
|
23799
|
0 |
0 |
if ($seqno)
|
23807
|
107 |
574 |
if ($last_comma_index[$depth])
|
23812
|
5 |
676 |
if ($last_dot_index[$depth])
|
23820
|
427 |
254 |
if ($i_opening > 2)
|
23821
|
219 |
208 |
$types_to_go[$i_opening - 1] eq 'b' ? :
|
23828
|
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}) { }
|
23848
|
79 |
602 |
if ($types_to_go[$i + 1] eq ",")
|
23853
|
0 |
681 |
if ($is_assignment{$next_nonblank_type} and $breakpoint_stack[$current_depth] != $forced_breakpoint_count)
|
23869
|
25 |
656 |
if (defined $icomma and $i_opening - $icomma < 5)
|
23870
|
0 |
25 |
unless ($forced_breakpoint_to_go[$icomma])
|
23925
|
22 |
2242 |
if ($i_opening_minus <= 0)
|
23931
|
1188 |
1054 |
if ($type_prev_nb eq "b" and $iprev_nb > 0)
|
23936
|
182 |
2060 |
if ($type_prev_nb eq ',') { }
|
|
1702 |
358 |
elsif ($tokens_to_go[$i_opening_paren] eq '(' or $is_kwiZ{$type_prev_nb}) { }
|
23957
|
1401 |
2341 |
if ($is_key_type{$types_to_go[$j]})
|
23960
|
106 |
1295 |
if ($types_to_go[$j] eq "=")
|
23965
|
61 |
1641 |
if ($types_to_go[$i_opening_minus] eq "b")
|
24019
|
8 |
489 |
unless defined $rhash_A
|
24037
|
80 |
409 |
if ($has_broken_sublist)
|
24049
|
93 |
315 |
if ($rOpts_break_at_old_comma_breakpoints or $interrupted or $i_opening_paren < 0)
|
24068
|
0 |
0 |
if ($break_before_container_types{$opening_token} and $container_indentation_options{$opening_token} and $container_indentation_options{$opening_token} == 2)
|
24075
|
0 |
0 |
if ($tol < $rOpts_continuation_indentation)
|
24082
|
20 |
295 |
if ($rOpts_delete_trailing_commas and $rOpts_add_trailing_commas)
|
24089
|
180 |
135 |
if $excess + $tol <= 0
|
24125
|
0 |
80 |
if ($rOpts_maximum_fields_per_table and $fields > $rOpts_maximum_fields_per_table)
|
24137
|
25 |
173 |
if ($j < $item_count and $ri_term_end->[$j] == $ri_term_begin->[$j] and $ritem_lengths->[$j] <= $small_length)
|
24143
|
80 |
198 |
if $j == 0
|
24144
|
6 |
192 |
if ($is_simple_last_term and $is_simple_next_term and $skipped_count < $max_skipped_count) { }
|
24153
|
65 |
127 |
unless defined $i_tc
|
24161
|
8 |
72 |
if ($interrupted)
|
24232
|
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) { }
|
24253
|
1 |
1 |
unless $must_break_open
|
24321
|
18 |
117 |
if ($is_lp_formatting and not $must_break_open)
|
24333
|
10 |
125 |
unless defined $hash_B
|
24362
|
66 |
34 |
$packed_lines == 2 ? :
|
|
8 |
100 |
$packed_lines == 1 ? :
|
|
17 |
108 |
$item_count < 3 ? :
|
24369
|
107 |
18 |
if ($opening_token eq "(")
|
24375
|
0 |
107 |
if ($rOpts_break_open_compact_parens)
|
24382
|
0 |
0 |
if ($flag eq '*' or $flag eq '1') { }
|
|
0 |
0 |
elsif ($flag eq '0') { }
|
24403
|
55 |
19 |
if ($packed_lines <= 2 and $item_count < 9 and $opening_is_in_block and $two_line_word_wrap_ok)
|
24413
|
5 |
6 |
if ($is_lp_formatting and $item_count == 2 and not $must_break_open)
|
24428
|
26 |
24 |
if ($number_of_fields == 2 and $item_count == 3 or $new_identifier_count > 0 and $sparsity > "0.15")
|
24439
|
1 |
25 |
if $use_separate_first_term
|
24444
|
23 |
3 |
unless ($must_break_open)
|
24446
|
21 |
2 |
if ($break_count <= 1) { }
|
|
1 |
2 |
elsif ($is_lp_formatting and not $need_lp_break_open) { }
|
24489
|
1 |
0 |
if (not $too_long and $i_opening_paren > 0 and $opening_token eq "(")
|
24498
|
0 |
0 |
if (not $too_long and $i_opening_paren > 0 and $list_type eq "=>")
|
24500
|
0 |
0 |
if ($i_opening_minus >= 0)
|
24520
|
12 |
82 |
if ($formatted_lines < 3 and $packed_lines < $formatted_lines or $formatted_lines < 2 or $unused_columns > $max_allowed_sparsity * $formatted_columns)
|
24530
|
0 |
12 |
if ($packed_lines > 2 and $item_count > 10) { }
|
24540
|
0 |
12 |
if $use_separate_first_term
|
24542
|
0 |
12 |
unless ($must_break_open_container)
|
24543
|
0 |
0 |
if ($break_count <= 1) { }
|
|
0 |
0 |
elsif ($is_lp_formatting and not $need_lp_break_open) { }
|
24580
|
0 |
497 |
if $item_count < 1
|
24585
|
21 |
476 |
if ($i_last_comma >= $max_index_to_go)
|
24587
|
8 |
13 |
if $item_count < 1
|
24610
|
1 |
1661 |
$i == 0 || $types_to_go[$i - 1] eq 'b' ? :
|
24614
|
1575 |
87 |
$types_to_go[$i_prev_plus] eq 'b' ? :
|
24627
|
489 |
1173 |
if ($j == 0) { }
|
24632
|
562 |
611 |
if ($length > $rmax_length->[$is_odd])
|
24641
|
484 |
5 |
$types_to_go[$i_last_comma + 1] eq 'b' ? :
|
24645
|
402 |
87 |
$types_to_go[$i_closing_paren - 1] eq 'b' ? :
|
24653
|
416 |
73 |
if ($last_item_length > 0)
|
24664
|
360 |
56 |
if ($last_item_length > $rmax_length->[$i_odd])
|
24671
|
144 |
272 |
if ($types_to_go[$i_b + 1] =~ /^[iR\]]$/)
|
24677
|
50 |
439 |
if ($i_effective_last_comma >= $max_index_to_go)
|
24742
|
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 =~ /^[\:\?]$/)
|
24766
|
135 |
0 |
unless ($use_separate_first_term)
|
24767
|
4 |
131 |
if ($is_keyword_with_special_leading_term{$list_type})
|
24771
|
3 |
1 |
if ($item_count < 3) { }
|
|
1 |
0 |
elsif ($first_term_length < 20 and $i_first_comma - $i_opening_paren < 4) { }
|
24772
|
3 |
0 |
if ($i_first_comma - $i_opening_paren < 4)
|
24780
|
1 |
0 |
if ($first_term_length < $columns)
|
24788
|
4 |
131 |
if ($use_separate_first_term) { }
|
24799
|
3 |
1 |
if $item_count <= 1
|
24811
|
44 |
87 |
if ($first_term_length > $rmax_length->[0])
|
24818
|
75 |
57 |
$rmax_length->[0] > $rmax_length->[1] ? :
|
24831
|
0 |
0 |
if ($rOpts_variable_maximum_line_length and $tokens_to_go[$i_opening_paren] eq "(" and @{$ri_term_begin;})
|
24840
|
0 |
0 |
if ($type eq "w")
|
24870
|
18 |
114 |
if ($number_of_fields_best != 0 and $number_of_fields_best < $number_of_fields_max) { }
|
|
0 |
228 |
elsif ($number_of_fields_best > 1 and $number_of_fields_best > $number_of_fields_max) { }
|
24885
|
16 |
19 |
if ($is_lp_formatting and $number_of_fields == 0 || $number_of_fields == 1 && $number_of_fields != $number_of_fields_best)
|
24910
|
46 |
86 |
if ($number_of_fields <= 0)
|
24916
|
0 |
132 |
if ($rOpts_maximum_fields_per_table and $number_of_fields > $rOpts_maximum_fields_per_table)
|
24926
|
0 |
132 |
if ($columns <= 0)
|
24933
|
7 |
125 |
if ($number_of_fields <= 0)
|
24954
|
38 |
87 |
if ($formatted_lines != int $formatted_lines)
|
24966
|
61 |
64 |
if ($number_of_fields > 1) { }
|
24974
|
7 |
118 |
if ($formatted_columns < $packed_columns)
|
25023
|
9 |
7 |
if ($available_spaces > 0)
|
25027
|
5 |
4 |
if ($number_of_fields_best == 0)
|
25032
|
3 |
6 |
if ($number_of_fields_best != 1)
|
25034
|
3 |
0 |
if ($available_spaces > $spaces_wanted_2)
|
25039
|
6 |
3 |
if ($spaces_wanted > 0)
|
25045
|
5 |
1 |
if ($deleted_spaces > 0)
|
25051
|
0 |
5 |
if ($number_of_fields_best == 1 and $number_of_fields >= 1)
|
25072
|
0 |
82 |
$use_separate_first_term ? :
|
25124
|
298 |
640 |
if ($types_to_go[$ib] =~ /^[qQ]$/) { }
|
|
36 |
604 |
elsif ($types_to_go[$ib] =~ /^[w\-]$/) { }
|
25132
|
727 |
211 |
if ($ib eq $ie) { }
|
25133
|
50 |
677 |
if ($is_quote and $tokens_to_go[$ib] =~ /\s/) { }
|
25141
|
181 |
30 |
if (grep {$_ eq "b";} @types_to_go[$ib .. $ie])
|
25145
|
24 |
187 |
if (grep {$_ eq "..";} @types_to_go[$ib .. $ie])
|
25160
|
239 |
699 |
if ($weighted_length >= $definitely_complex) { }
|
|
11 |
723 |
elsif ($i == $i_max and $i_last_break == $i - 1 and $weighted_length <= $definitely_simple) { }
|
25164
|
21 |
97 |
if ($i_last_break == $i - 1 and $i > 1 and $i_last_last_break != $i - 2)
|
25193
|
49 |
80 |
if ($max_width > 12 and $complex_item_count > $item_count / 2 and $number_of_fields_best != 2)
|
25215
|
2 |
3 |
if ($item_count <= 5) { }
|
25235
|
9 |
15 |
if ($length > $max_length[$is_odd])
|
25239
|
21 |
3 |
if (defined $last_length)
|
25246
|
18 |
6 |
if (defined $ll) { }
|
25257
|
3 |
0 |
$item_count > 5 ? :
|
|
0 |
3 |
$item_count > 10 ? :
|
25258
|
0 |
3 |
unless ($total_variation_2 < $factor * $total_variation_1)
|
25285
|
7 |
130 |
if ($odd_or_even == 1 and $max_pairs * $pair_width + $max_width <= $columns)
|
25299
|
43 |
82 |
if ($number_of_fields >= $odd_or_even * 2 and $formatted_lines > 0)
|
25322
|
38 |
32 |
if ($j)
|
25336
|
121 |
1056 |
if ($old_breakpoint_to_go[$i])
|
25348
|
0 |
121 |
if ($types_to_go[$ibreak] ne "," and $controlled_comma_style)
|
25350
|
0 |
0 |
if ($index > $ibreak and $types_to_go[$index] eq ",")
|
25362
|
351 |
0 |
if ($i >= 0 and $i <= $j and $j <= $max_index_to_go) { }
|
25395
|
0 |
3938 |
if ($ibeg < 0)
|
25398
|
74 |
3864 |
if ($ibeg > $iend)
|
25412
|
603 |
1252 |
if (ref $spaces)
|
25430
|
871 |
10688 |
if (ref $excess)
|
25433
|
231 |
380 |
if ($total_weld_count and $type_sequence_to_go[$iend] and not $ignore_right_weld)
|
25438
|
12 |
219 |
if defined $wr
|
25455
|
150 |
1803 |
ref $indentation ? :
|
25464
|
38 |
0 |
ref $indentation ? :
|
25475
|
16 |
0 |
ref $item ? :
|
25514
|
6 |
549 |
if ($high_stress_level <= 1)
|
25577
|
0 |
302 |
if (not $rOpts_line_up_parentheses && defined $max_index_to_go or $max_index_to_go < 0)
|
25612
|
2 |
300 |
if ($starting_in_quote)
|
25617
|
210 |
92 |
if ($Kpnb > 0 and $rLL->[$Kpnb][7] eq "b")
|
25620
|
272 |
30 |
if ($Kpnb >= 0 and $rLL->[$Kpnb][7] ne "b")
|
25624
|
272 |
30 |
if (defined $K_last_nonblank)
|
25641
|
1757 |
4010 |
if ($stack_changed)
|
25644
|
808 |
949 |
if ($lp_object) { }
|
25659
|
335 |
5432 |
if ($type eq "{" or $type eq "(")
|
25667
|
141 |
194 |
if ($ii_last_equals)
|
25679
|
935 |
4832 |
if ($level < $current_level or $ci_level < $current_ci_level)
|
25686
|
1485 |
4282 |
if ($level > $current_level or $ci_level > $current_ci_level)
|
25693
|
3772 |
1995 |
if ($type ne "b")
|
25698
|
227 |
3545 |
if ($type eq '=>') { }
|
|
615 |
2930 |
elsif ($type eq ',') { }
|
|
85 |
2845 |
elsif ($is_assignment{$type}) { }
|
25715
|
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))
|
25775
|
1057 |
0 |
if ($ii_begin_line > 0)
|
25779
|
8 |
1049 |
$last_nonblank_type eq 'k' ? :
|
25780
|
14 |
1043 |
if $wbb
|
25792
|
4414 |
1353 |
if ($ii > $ii_begin_line) { }
|
25800
|
2746 |
1668 |
if (ref $indentation)
|
25821
|
3398 |
2369 |
if ($rLP->[$max_lp_stack][2])
|
25825
|
1379 |
2019 |
if ($max_lp_stack > 0 and $ci_level and $$rLP[$max_lp_stack - 1][2]) { }
|
25839
|
229 |
73 |
unless $rOpts_extended_line_up_parentheses
|
25863
|
132 |
9 |
if ($ii_last_equals and $ii < $max_index_to_go)
|
25866
|
99 |
33 |
if $types_to_go[$inext_nb] eq "b"
|
25872
|
104 |
37 |
if ($ii_last_equals and $ii_last_equals > $ii_begin_line and not $is_empty_container)
|
25891
|
0 |
104 |
if ($want_break_before{$types_to_go[$i_test]}) { }
|
|
104 |
0 |
elsif ($types_to_go[$i_test + 1] eq 'b') { }
|
25893
|
0 |
0 |
if $types_to_go[$i_test] eq "b"
|
25911
|
2 |
102 |
if ($min_len and $min_len > $len_increase)
|
25915
|
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])
|
25947
|
15 |
1 |
if (defined $Kc and $Kc <= $K_to_go[$max_index_to_go] or $rOpts_extended_line_up_parentheses)
|
25973
|
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})
|
26001
|
0 |
1064 |
unless ($max_lp_stack)
|
26013
|
608 |
456 |
if ($rLP->[$max_lp_stack][2])
|
26021
|
340 |
268 |
if ($type eq "}" or $type eq ")")
|
26025
|
168 |
172 |
unless $comma_count
|
26026
|
221 |
119 |
unless $arrow_count
|
26036
|
62 |
51 |
if ($available_spaces > 0 and $K_start >= $K_to_go[0] and $comma_count <= 0 || $arrow_count > 0)
|
26047
|
0 |
62 |
if ($i < 0 or $i > $max_lp_object_list)
|
26056
|
36 |
26 |
if ($arrow_count == 0) { }
|
26080
|
498 |
566 |
if ($rLP_top->[2])
|
26088
|
935 |
129 |
if ($lev <= $level and $ci_lev <= $ci_level)
|
26127
|
1455 |
30 |
if (defined $K_last_nonblank)
|
26131
|
490 |
965 |
$last_nonblank_seqno ? :
|
26140
|
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) { }
|
26172
|
509 |
680 |
if ($in_lp_mode)
|
26190
|
54 |
211 |
if (defined $min_len)
|
26195
|
3 |
51 |
if ($excess > 0)
|
26207
|
148 |
117 |
if ($rLP_top->[2])
|
26214
|
0 |
265 |
if (not $in_lp_mode and $available_spaces <= 0 || $next_opening_too_far) { }
|
26226
|
202 |
63 |
if ($available_spaces >= $standard_increment) { }
|
|
41 |
22 |
elsif ($available_spaces > 1) { }
|
|
22 |
0 |
elsif ($is_opening_token{$last_nonblank_token}) { }
|
26238
|
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")
|
26261
|
13 |
9 |
if ($tightness{$last_nonblank_token} < 2) { }
|
26273
|
54 |
211 |
if ($available_spaces < 0)
|
26284
|
1122 |
363 |
if ($type ne "b")
|
26286
|
498 |
624 |
if ($rLP->[$max_lp_stack][2])
|
26296
|
608 |
514 |
if ($in_lp_mode)
|
26301
|
608 |
0 |
if ($level >= 0)
|
26306
|
608 |
0 |
if ($ii_begin_line >= 0 and $ii_begin_line <= $max_index_to_go)
|
26316
|
2 |
3 |
if ($type eq "#" and $max_index_to_go > 0 and $align_seqno)
|
26345
|
608 |
0 |
if ($level >= 0)
|
26349
|
259 |
349 |
if ($is_opening_token{$last_nonblank_token} and $last_nonblank_seqno)
|
26376
|
169 |
953 |
if ($available_spaces > 0 and $lp_object)
|
26380
|
31 |
138 |
if $space_count > $halfway
|
26395
|
242 |
815 |
if $max_lp_object_list < 0
|
26403
|
32 |
783 |
if ($tokens_to_go[$ii_to_go] eq "," and $ii_to_go < $max_index_to_go)
|
26407
|
32 |
0 |
if ($types_to_go[$in] eq "b" and $in < $max_index_to_go)
|
26408
|
7 |
25 |
if ($is_closing_token{$tokens_to_go[$in]})
|
26418
|
813 |
2 |
if $spaces_needed <= 0
|
26432
|
187 |
13 |
if $item->get_closed >= 0
|
26436
|
8 |
5 |
if ($available_spaces > 0)
|
26441
|
0 |
2 |
unless @candidates
|
26446
|
0 |
7 |
unless $Perl::Tidy::Formatter::b->[1] <=> $Perl::Tidy::Formatter::a->[1]
|
26451
|
2 |
0 |
$available_spaces > $spaces_needed ? :
|
26467
|
200 |
0 |
if ($old_spaces >= $deleted_spaces) { }
|
26489
|
2 |
0 |
unless $spaces_needed > 0
|
26510
|
146 |
83 |
if $max_lp_object_list < 0
|
26517
|
508 |
19 |
if $item->get_closed >= 0
|
26522
|
9 |
10 |
if ($available_spaces > 0)
|
26563
|
0 |
109 |
if $i_begin_line < 0 or $i_begin_line > $max_index_to_go
|
26568
|
18 |
91 |
if ($i_begin_line == $i_opening)
|
26578
|
18 |
0 |
unless $self->[71]{$K_to_go[$i_opening]}
|
26579
|
0 |
0 |
unless $types_to_go[$max_index_to_go] eq "q"
|
26586
|
1 |
90 |
if $test2 != $test1
|
26590
|
44 |
46 |
if ($ibr > 0 and $types_to_go[$ibr] eq "b")
|
26595
|
44 |
46 |
if ($ibr >= 0)
|
26601
|
33 |
11 |
if (defined $i_nonblank)
|
26621
|
5 |
1 |
if ($available_spaces > 0 and $spaces_wanted <= $available_spaces || !$item->get_have_child)
|
26647
|
0 |
0 |
unless (defined $ri_first and defined $ri_last)
|
26655
|
0 |
0 |
if ($nmax < 0 or $nmax_check < 0 or $nmax != $nmax_check)
|
26667
|
0 |
0 |
if ($ibeg < 0 or $iend < $ibeg or $iend > $max_index_to_go)
|
26673
|
0 |
0 |
if $n == 0
|
26674
|
0 |
0 |
if ($ibeg <= $iend_m)
|
26723
|
632 |
3915 |
if (not $max_index_to_go and $type_beg_next eq "#")
|
26727
|
61 |
4486 |
if ($rOpts_closing_side_comments)
|
26732
|
828 |
3719 |
if ($n_last_line > 0 or $rOpts_extended_continuation_indentation)
|
26738
|
753 |
3794 |
if ($n_last_line > 0)
|
26743
|
21 |
279 |
if $type_beg_next eq "k" and $is_if_unless{$token_beg_next}
|
26745
|
749 |
4 |
if $rOpts_logical_padding
|
26748
|
33 |
720 |
if $rOpts_extended_line_up_parentheses
|
26759
|
1284 |
3263 |
if (not $max_index_to_go) { }
|
26813
|
752 |
6614 |
$batch_CODE_type && $batch_CODE_type ne 'VER' ? :
|
26818
|
2819 |
4547 |
if ($n < $n_last_line) { }
|
|
3376 |
1171 |
elsif (not $is_block_comment and $Kend < $Klimit) { }
|
26838
|
2850 |
526 |
if ($Kbeg_next < $Klimit and $rLL->[$Kbeg_next][7] eq "b")
|
26907
|
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)
|
26925
|
14 |
870 |
if (ref $indentation)
|
26936
|
26 |
7340 |
if ($is_outdented_line) { }
|
|
50 |
7290 |
elsif ($do_not_pad) { }
|
|
134 |
12725 |
elsif ($type_beg eq 'k' and $token_beg eq 'if') { }
|
26951
|
105 |
29 |
if ($Kbeg > 0)
|
26954
|
93 |
12 |
if ($type_m eq "b" and $Km > 0)
|
26958
|
23 |
82 |
if ($type_m eq "#" and $Km > 0)
|
26961
|
9 |
14 |
if ($type_m eq "b" and $Km > 0)
|
26968
|
44 |
61 |
if ($seqno_m)
|
26974
|
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")
|
26994
|
1308 |
5426 |
unless $is_block_comment or $self->[97]
|
27018
|
97 |
7269 |
if ($type_beg eq ":" or $n > 0 and $type_end_last eq ":")
|
27021
|
93 |
4 |
$n > 0 ? :
|
27023
|
61 |
6 |
if ($terminal_type ne ";" and $n_last_line > $n and $level_end == $lev)
|
27031
|
16 |
27 |
if ($last_leading_type eq ":" and $terminal_type eq ';' && $level_end <= $lev || $terminal_type ne ':' && $level_end < $lev)
|
27049
|
0 |
6 |
if ($type_KP eq "?" or $type_KP eq ":")
|
27062
|
9 |
0 |
if ($closing_side_comment and $n == $n_last_line and @{$rfields;})
|
27080
|
6734 |
632 |
unless ($is_block_comment)
|
27096
|
1234 |
6132 |
if ($is_closing_type{$types_to_go[$ibeg]})
|
27097
|
1011 |
6355 |
if ($is_closing_type{$types_to_go[$iend]})
|
27106
|
0 |
850 |
if ($rOpts_line_up_parentheses and $type_beg eq "q" and $ibeg == $iend)
|
27114
|
0 |
0 |
if (defined $Km and $rLL->[$Km][7] eq "q" or defined $Kp and $rLL->[$Kp][7] eq "q")
|
27129
|
59 |
7307 |
if ($block_type_to_go[$i_terminal] and $nesting_depth_end > $nesting_depth_beg)
|
27189
|
839 |
3708 |
if $this_batch->[11] or $types_to_go[$max_index_to_go] eq "q"
|
27195
|
0 |
4547 |
if ($cscw_block_comment)
|
27206
|
0 |
0 |
unless defined $msg
|
27224
|
0 |
0 |
if (defined $KK and not $rOpts_indent_only)
|
27227
|
0 |
0 |
if ($len_by_sum != $len_tok_i or defined $len_tok_K and $len_by_sum != $len_tok_K)
|
27230
|
0 |
0 |
defined $KK ? :
|
27231
|
0 |
0 |
unless defined $KK
|
27311
|
0 |
3260 |
if ($max_i < $max_index_to_go)
|
27318
|
87 |
3173 |
if ($max_i <= 0 or not $rOpts_add_whitespace)
|
27326
|
343 |
2830 |
if ($types_to_go[$max_i] eq "#")
|
27330
|
343 |
0 |
if ($i_terminal > 0 and $types_to_go[$i_terminal] eq "b")
|
27360
|
8 |
335 |
if (not $do_not_align || $rOpts_valign_side_comments and $rOpts_valign_code)
|
27367
|
8 |
0 |
if ($types_to_go[$ipad] eq "b")
|
27375
|
325 |
18 |
unless ($do_not_align)
|
27385
|
17 |
3156 |
unless ($rOpts_valign_code)
|
27398
|
411 |
5386 |
if $iend <= $ibeg
|
27401
|
326 |
5060 |
if ($iend > $i_terminal)
|
27446
|
1645 |
3741 |
if ($type_beg eq "k")
|
27452
|
1510 |
135 |
if ($types_to_go[$i_good_paren] eq "b")
|
27460
|
21 |
0 |
if ($token_beg eq "elsif" and $i_good_paren < $iend and $tokens_to_go[$i_good_paren] eq "(")
|
27466
|
0 |
21 |
unless (defined $i_elsif_close)
|
27475
|
15669 |
27505 |
if $types_to_go[$i] eq "b"
|
27507
|
972 |
26533 |
if ($token eq ")" and @imatch_list)
|
27514
|
0 |
972 |
unless (defined $imate)
|
27515
|
54 |
139 |
if ($imatch_list[-1] eq $imate and $ibeg > 1 || @imatch_list > 1 and $imate > $i_good_paren)
|
27519
|
54 |
0 |
if ($ralignment_type_to_go->[$imate])
|
27530
|
157 |
27348 |
if ($levels_to_go[$i] < $level_beg)
|
27543
|
1980 |
25368 |
if ($i < $ibeg + 2) { }
|
|
9779 |
15589 |
elsif ($types_to_go[$i - 1] ne 'b') { }
|
|
3161 |
12428 |
elsif ($last_vertical_alignment_BEFORE_index == $i - 2) { }
|
|
627 |
11801 |
elsif ($type eq 'k') { }
|
|
68 |
11733 |
elsif ($type eq 'q') { }
|
|
4003 |
15377 |
elsif ($is_vertical_alignment_type{$type} and not $is_not_vertical_alignment_token{$token}) { }
|
27557
|
135 |
492 |
if ($is_vertical_alignment_keyword{$token})
|
27563
|
2 |
133 |
if ($token eq "unless" and $rOpts_valign_if_unless)
|
27571
|
34 |
34 |
if ($types_to_go[0] eq "k" and $tokens_to_go[0] eq "use")
|
27590
|
593 |
3410 |
if ($i == $iend)
|
27592
|
577 |
16 |
unless $is_terminal_alignment_type{$type}
|
27612
|
36 |
54 |
if ($type_beg_special_char and $i == $ibeg + 2 and $types_to_go[$i - 1] eq "b")
|
27621
|
124 |
3879 |
if ($is_low_level_alignment_token{$token} and $levels_to_go[$i] != $level_beg)
|
27627
|
569 |
3434 |
if ($token eq "(")
|
27634
|
171 |
398 |
if ($vert_last_nonblank_type eq "k" and not $is_if_unless_elsif{$vert_last_nonblank_token})
|
27642
|
7 |
562 |
unless ($rOpts_function_paren_vertical_alignment)
|
27645
|
7 |
0 |
if $self->[16]{$seqno}
|
27649
|
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)
|
27673
|
3289 |
24059 |
if ($alignment_type) { }
|
|
1802 |
22264 |
elsif ($vert_last_nonblank_type eq ',' || $vert_last_nonblank_type eq ';' and $types_to_go[$i - 1] eq 'b' and not $is_closing_token{$type}) { }
|
27708
|
5091 |
22257 |
if ($alignment_type)
|
27711
|
63 |
5028 |
if ($token eq '{' and $block_type_to_go[$i] and $block_type_to_go[$i] =~ /$ASUB_PATTERN/) { }
|
|
17 |
5011 |
elsif ($i > $i_elsif_open and $i < $i_elsif_close) { }
|
|
5 |
5006 |
elsif (substr($alignment_type, 0, 1) eq ' ') { }
|
27751
|
0 |
3263 |
if ($max_index_to_go == 0)
|
27752
|
0 |
0 |
if (@{$ri_first;} == 1 and $ri_last->[0] == 0) { }
|
27783
|
3260 |
3 |
if ($rOpts_valign_code or $types_to_go[$max_index_to_go] eq "#")
|
27823
|
18 |
0 |
if ($rLL->[$KK][7] eq "q")
|
27826
|
2 |
16 |
if ($ii > 0) { }
|
27827
|
2 |
0 |
if $token =~ /^qw\s*[\(\{\[]/
|
27830
|
6 |
10 |
unless ($ending_in_quote)
|
27831
|
3 |
3 |
if $token =~ /[\)\}\]]$/
|
27863
|
40 |
788 |
if ($rix_seqno_controlling_ci and @{$rix_seqno_controlling_ci;})
|
27881
|
71 |
757 |
if ($rOpts_line_up_parentheses and $rOpts_extended_continuation_indentation)
|
27888
|
19 |
66 |
if (ref $leading_spaces_to_go[$ibeg])
|
27923
|
2803 |
844 |
if ($line > 0 and not $skip_SECTION_1)
|
27926
|
11 |
2792 |
if ($line_1) { }
|
27929
|
8 |
3 |
if ($lev == $lev_last) { }
|
|
3 |
0 |
elsif ($lev < $lev_last) { }
|
|
0 |
0 |
elsif ($lev > $lev_last) { }
|
27930
|
6 |
2 |
if ($types_to_go[$ibeg] eq 'k' and $is_sort_map_grep{$tokens_to_go[$ibeg]}) { }
|
27949
|
0 |
6 |
if $is_semicolon_terminated
|
27970
|
3 |
8 |
if (defined $line_2 and defined $line_1)
|
27972
|
3 |
0 |
if $continuation_line_count >= 0
|
27987
|
686 |
2106 |
if ($lev > $lev_last)
|
27988
|
10 |
676 |
if ($types_to_go[$ibeg] eq "k" and $is_sort_map_grep{$tokens_to_go[$ibeg]})
|
28005
|
450 |
3197 |
if ($types_to_go[$ibeg] eq "}" and $nesting_depth_to_go[$iend] + 1 == $nesting_depth_to_go[$ibeg])
|
28012
|
6 |
444 |
if ($terminal_type eq "#" and $iend > $ibeg)
|
28014
|
0 |
6 |
if ($terminal_type eq "#" and $iend - 1 > $ibeg)
|
28025
|
13 |
437 |
if ($terminal_type eq "{" and not $is_cuddled_closing_brace)
|
28036
|
1316 |
2331 |
if ($ci_levels_to_go[$ibeg])
|
28039
|
50 |
33 |
if ($seqno and $undo_extended_ci{$seqno})
|
28042
|
36 |
14 |
unless (ref $reduced_spaces_to_go[$ibeg])
|
28054
|
27 |
3620 |
if (not $ci_levels_to_go[$ibeg] and defined $i_controlling_ci[$line])
|
28128
|
632 |
117 |
if ($K_to_go[0] > 0)
|
28130
|
589 |
43 |
if ($Kp > 0 and $rLL->[$Kp][7] eq "b")
|
28133
|
194 |
438 |
if ($Kp > 0 and $rLL->[$Kp][7] eq "#")
|
28135
|
25 |
169 |
if ($Kp > 0 and $rLL->[$Kp][7] eq "b")
|
28140
|
124 |
508 |
if ($seqno)
|
28142
|
93 |
31 |
if ($block_type)
|
28161
|
649 |
2158 |
$tok_next =~ /^\w/ ? :
|
28163
|
2485 |
322 |
unless $has_leading_op_next
|
28167
|
35 |
287 |
if $nesting_depth_to_go[$ibeg] > $nesting_depth_to_go[$ibeg_next]
|
28174
|
265 |
22 |
if ($nesting_depth_to_go[$ibeg] == $nesting_depth_to_go[$ibeg_next])
|
28179
|
237 |
28 |
if ($line > 0) { }
|
28182
|
159 |
78 |
if $has_leading_op
|
28212
|
0 |
78 |
if $levels_to_go[$ibeg] ne $levels_to_go[$ibeg_next]
|
28221
|
0 |
3 |
if ($types_to_go[$iendm] eq "," and $line == 1 and $max_line > 2)
|
28232
|
22 |
5 |
unless $is_assignment{$types_to_go[$iendm]} or $ok_comma or $nesting_depth_to_go[$ibegm] < $nesting_depth_to_go[$ibeg] or $types_to_go[$iendm] eq "k" and $tokens_to_go[$iendm] eq "return"
|
28249
|
0 |
28 |
if $starting_in_quote
|
28253
|
0 |
28 |
if ($types_to_go[$ibeg] eq '}') { }
|
|
2 |
26 |
elsif ($is_short_block) { }
|
28266
|
0 |
26 |
if $nesting_depth_to_go[$ibeg] != $nesting_depth_to_go[$ibeg_next]
|
28286
|
16 |
10 |
if $max_line <= 1
|
28296
|
3 |
7 |
if $leading_token eq "."
|
28300
|
0 |
11 |
if $line + $l > $max_line
|
28304
|
7 |
4 |
if $tokens_to_go[$ibeg_next_next] eq $leading_token
|
28309
|
4 |
3 |
if $tokens_differ
|
28310
|
0 |
3 |
if $count < 3 and $leading_token ne ":"
|
28317
|
22 |
61 |
unless (defined $ipad)
|
28323
|
0 |
22 |
unless $type_sequence_to_go[$i] and defined $mate_index_to_go[$i] and $mate_index_to_go[$i] > $iend
|
28329
|
22 |
0 |
if $ipad
|
28331
|
0 |
22 |
if not $ipad or $ipad > $iend
|
28353
|
0 |
83 |
if $ipad == 0 and $peak_batch_size <= 1
|
28358
|
6 |
77 |
if $nesting_depth_to_go[$iend_next + 1] > $nesting_depth_to_go[$ipad]
|
28367
|
71 |
6 |
if ($line + 2 <= $max_line)
|
28370
|
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])
|
28383
|
4 |
73 |
if (not $types_match and $type eq "!")
|
28387
|
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])
|
28451
|
19 |
152 |
if $nesting_depth_to_go[$ibeg_t + 1] < $depth or $nesting_depth_to_go[$ibeg_t] < $depth
|
28456
|
2 |
150 |
if ($levels_to_go[$ibeg_t] + $ci_levels_to_go[$ibeg_t] < $lsp)
|
28465
|
41 |
15 |
if ($l == $max_line)
|
28467
|
1 |
40 |
if ($types_to_go[$i2] eq "#")
|
28469
|
0 |
1 |
if terminal_type_i($i1, $i2) eq ","
|
28490
|
0 |
56 |
if ($types_to_go[$ibeg_next] eq "m")
|
28491
|
0 |
0 |
if $types_to_go[$ibeg] eq "Q"
|
28494
|
2 |
54 |
unless $ok_to_pad
|
28517
|
4 |
50 |
if ($matches_without_bang)
|
28521
|
0 |
54 |
if (ref $indentation_1 and $indentation_1->get_recoverable_spaces == 0)
|
28525
|
0 |
0 |
if (ref $indentation_2 and $indentation_2->get_recoverable_spaces != 0)
|
28534
|
5 |
49 |
if ($pad_spaces < 0)
|
28540
|
3 |
2 |
if ($pad_spaces == -1)
|
28541
|
2 |
1 |
if ($ipad > $ibeg and $types_to_go[$ipad - 1] eq "b" and not %keyword_paren_inner_tightness)
|
28552
|
47 |
7 |
if ($ipad >= 0 and $pad_spaces)
|
28555
|
47 |
0 |
if ($pad_spaces + $length_t <= $maximum_line_length_at_level[$levels_to_go[$ibeg]])
|
28581
|
55 |
2 |
if ($pad_spaces > 0) { }
|
|
0 |
2 |
elsif ($pad_spaces == 0) { }
|
|
2 |
0 |
elsif ($pad_spaces == -1 and $tokens_to_go[$ipad] eq ' ') { }
|
28635
|
0 |
33 |
unless @{$ri_first;} > 1
|
28640
|
5 |
28 |
unless ref $lp_object
|
28644
|
25 |
3 |
unless $K_extra_space
|
28650
|
0 |
3 |
if $ii <= $ibeg_0 or $ii > $iend_0
|
28654
|
1 |
2 |
if substr($tok, 0, 1) eq " "
|
28659
|
0 |
2 |
if $types_to_go[$ibeg_0] eq "k" and $is_if_unless_elsif{$tokens_to_go[$ibeg_0]}
|
28663
|
2 |
0 |
if ($spaces > 0)
|
28817
|
3077 |
3005 |
unless ($alignment_count)
|
28824
|
593 |
2484 |
if ($ibeg == $iend) { }
|
28856
|
1563 |
1442 |
if ($ibeg == 0 and $iend == $max_index_to_go)
|
28858
|
289 |
1274 |
if ($types_to_go[$iterm] eq "#")
|
28867
|
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])
|
28893
|
5276 |
31589 |
if ($type_sequence_to_go[$i])
|
28895
|
2703 |
2573 |
if ($is_opening_token{$token}) { }
|
|
2305 |
268 |
elsif ($is_closing_type{$token}) { }
|
28899
|
302 |
2401 |
unless (defined $i_mate)
|
28900
|
2180 |
523 |
if ($i_mate > $i and $i_mate <= $iend)
|
28922
|
957 |
1223 |
$token eq '(' ? :
|
28926
|
1 |
2179 |
if ($name eq ".")
|
28957
|
1658 |
522 |
unless ($ralignment_type_to_go->[$i])
|
28967
|
36 |
1622 |
if ($saw_exclamation_mark)
|
28972
|
728 |
930 |
if ($i_start == $ibeg)
|
28978
|
0 |
1658 |
if ($len < 0)
|
28990
|
2180 |
125 |
if $depth > 0
|
28998
|
5277 |
28583 |
if ($i > $i_start and $ralignment_type_to_go->[$i])
|
29004
|
13 |
5264 |
if $tok_map
|
29008
|
4952 |
325 |
if ($raw_tok ne "#")
|
29014
|
2739 |
2538 |
if ($raw_tok eq "," or $raw_tok eq "=>")
|
29018
|
61 |
2678 |
$i == $i_depth_prev ? :
|
29019
|
61 |
2678 |
$depth_last < $depth ? :
|
29021
|
1404 |
1335 |
if ($container_name{$depth_p})
|
29037
|
205 |
5072 |
if ($raw_tok eq "(")
|
29038
|
1 |
204 |
if ($ci_levels_to_go[$ibeg] and $container_name{$depth} =~ /^\+(if|unless)/)
|
29049
|
234 |
27 |
if ($raw_tok eq "{" and $block_type_to_go[$i])
|
29055
|
53 |
181 |
if defined $block_type_map{$block_type}
|
29059
|
45 |
189 |
if ($block_type =~ /$SUB_PATTERN/)
|
29062
|
12 |
222 |
if ($block_type =~ /^[A-Z]+$/)
|
29068
|
24 |
210 |
if ($ci_levels_to_go[$ibeg])
|
29081
|
2007 |
3270 |
if ($raw_tok eq "=" or $raw_tok eq "=>")
|
29083
|
193 |
1814 |
if ($token_count{$tok} > 1)
|
29111
|
1833 |
35032 |
if ($type eq 'k') { }
|
|
13124 |
21908 |
elsif ($type eq 'b') { }
|
|
2621 |
19287 |
elsif ($is_w_n_C{$type}) { }
|
|
43 |
19244 |
elsif ($type eq '!') { }
|
29118
|
121 |
1712 |
if defined $keyword_map{$tok_fix}
|
29134
|
2330 |
291 |
if ($i < $iend - 1)
|
29136
|
1356 |
974 |
$next_type eq 'b' ? :
|
29139
|
789 |
1541 |
if ($types_to_go[$i_next_nonblank] eq "=>")
|
29147
|
212 |
577 |
if ($patterns[$j] eq "m")
|
29158
|
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")
|
29168
|
1395 |
1226 |
if ($type eq "n")
|
29183
|
613 |
18631 |
if ($depth == 0 and $type eq "=>")
|
29214
|
383 |
1290 |
if ($type eq "b")
|
29223
|
7 |
341 |
if ($token eq "(" or $is_binary_type{$type} or $type eq "k" and $is_binary_keyword{$token})
|
29232
|
612 |
486 |
unless $is_kwU{$type}
|
29235
|
380 |
106 |
if ($count == 0) { }
|
|
42 |
64 |
elsif (defined $count_max and $count >= $count_max) { }
|
29236
|
65 |
315 |
if ($type eq 'k' and $is_use_like{$tokens_to_go[$_]}) { }
|
29249
|
0 |
444 |
if (defined $name_map{$token})
|
29259
|
206 |
2 |
if ($name and defined $ilast_blank and $ilast_blank > $iname_end)
|
29279
|
19 |
938 |
if $im < 0
|
29280
|
494 |
444 |
if ($types_to_go[$im] eq "b")
|
29281
|
0 |
938 |
if $im < 0
|
29286
|
5 |
933 |
if ($name eq "->")
|
29288
|
5 |
0 |
if ($im >= 0 and $types_to_go[$im] ne "b")
|
29294
|
0 |
938 |
if (substr($name, 0, 2) eq "->")
|
29359
|
364 |
7002 |
if ($terminal_type eq "#" and $i_terminal > $ibeg)
|
29362
|
350 |
14 |
if ($terminal_type eq "b" and $i_terminal > $ibeg)
|
29380
|
204 |
7162 |
if ($type_beg eq "q" and $ibeg == 0)
|
29442
|
1976 |
5390 |
if ($seqno_beg or $seqno_qw_closing) { }
|
|
0 |
5444 |
elsif (substr($rpatterns->[0], 0, 2) eq 'qb' and substr($rfields->[0], -1, 1) eq ';' and $rfields->[0] =~ /^([\)\}\]\>]);$/) { }
|
29479
|
0 |
0 |
if ($closing_token_indentation{$1} == 0) { }
|
29504
|
6399 |
967 |
if ($adjust_indentation == 0) { }
|
|
861 |
106 |
elsif ($adjust_indentation == 1) { }
|
|
88 |
18 |
elsif ($adjust_indentation == 2) { }
|
29534
|
2 |
1192 |
if ($levels_to_go[$i_ind] < $lev)
|
29570
|
38 |
50 |
if (ref $last_indentation_written and not $is_closing_token{$last_leading_token})
|
29582
|
49 |
39 |
if ($diff > 0) { }
|
29597
|
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) { }
|
29642
|
6 |
12 |
if ($block_type_beg and $ci_levels_to_go[$i_terminal] == 0) { }
|
29666
|
1 |
11 |
if (get_spaces($last_indentation_written) < get_spaces($indentation))
|
29682
|
7347 |
19 |
unless ($ibeg == 0 and $starting_in_quote)
|
29710
|
4 |
28 |
if ($seqno_qw_closing and length $token_beg > 1 || $token_beg eq '>')
|
29734
|
822 |
508 |
if (defined $opening_indentation and not $leading_paren_arrow and not $is_isolated_block_brace and not $is_unaligned_colon)
|
29741
|
48 |
774 |
if (get_spaces($opening_indentation) > get_spaces($indentation))
|
29754
|
30 |
4515 |
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)
|
29777
|
26 |
6 |
if ($space_count > 0)
|
29780
|
0 |
26 |
if ($space_count < 0)
|
29785
|
0 |
26 |
if ($type_beg eq "#" and $space_count == 0)
|
29842
|
4 |
1940 |
if ($seqno_beg and $self->[30]{$seqno_beg})
|
29845
|
4 |
0 |
if ($is_closing_type{$type_beg} or $ibeg == $i_terminal) { }
|
|
0 |
0 |
elsif ($total_weld_count) { }
|
29854
|
0 |
0 |
if (defined $Kterm_test and $Kterm_test >= $K_beg)
|
29857
|
0 |
0 |
if ($Kterm == $K_beg)
|
29862
|
1944 |
32 |
$seqno_beg ? :
|
29870
|
21 |
1955 |
if ($is_bli_beg and $is_bli_beg == 1)
|
29874
|
21 |
0 |
if ($K_beg eq $K_opening) { }
|
29885
|
8 |
1968 |
if ($seqno_qw_closing and $total_weld_count)
|
29887
|
8 |
0 |
if ($i_plus <= $max_index_to_go)
|
29889
|
6 |
2 |
if (defined $self->[70]{$K_plus})
|
29896
|
1266 |
710 |
if ($is_closing_type_beg or $seqno_qw_closing) { }
|
|
93 |
617 |
elsif ($type_beg eq ':') { }
|
29917
|
362 |
405 |
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]})
|
29975
|
87 |
1179 |
if ($terminal_type eq "," and $self->is_in_list_by_i($i_terminal))
|
29996
|
526 |
94 |
if ($i_terminal == $ibeg and $is_closing_type_beg and defined $K_beg and $K_beg < $Klimit)
|
30004
|
473 |
53 |
if ($type_plus eq "b" and $K_plus < $Klimit)
|
30008
|
49 |
477 |
if ($type_plus eq "#" and $K_plus < $Klimit)
|
30010
|
42 |
7 |
if ($type_plus eq "b" and $K_plus < $Klimit)
|
30026
|
512 |
14 |
if (not $is_bli_beg and defined $K_plus)
|
30033
|
296 |
216 |
if $level_next < $lev and not $self->[74]{$K_beg}
|
30042
|
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))
|
30054
|
14 |
4 |
if (defined $opening_indentation and get_spaces($indentation) > get_spaces($opening_indentation))
|
30067
|
30 |
1 |
if ($block_type_beg and $block_type_beg eq "eval" and not ref $leading_spaces_beg and not $rOpts_indent_closing_brace)
|
30079
|
24 |
6 |
if (defined $opening_indentation and get_spaces($indentation) > get_spaces($opening_indentation))
|
30088
|
21 |
1245 |
if $is_bli_beg
|
30095
|
671 |
595 |
if (not $block_type_beg) { }
|
30104
|
26 |
645 |
if ($seqno_qw_closing and $ibeg_weld_fix == $ibeg)
|
30116
|
3 |
23 |
if (not defined $cti and length $tok == 1)
|
30124
|
3 |
0 |
if ($tok ne ">")
|
30131
|
0 |
26 |
if (defined $cti and $cti == 1)
|
30134
|
3 |
668 |
if (not defined $cti) { }
|
|
43 |
625 |
elsif ($cti == 1) { }
|
|
3 |
622 |
elsif ($cti == 2) { }
|
|
3 |
619 |
elsif ($cti == 3) { }
|
30149
|
42 |
1 |
if ($i_terminal <= $ibeg + 1 or $is_semicolon_terminated) { }
|
30159
|
3 |
0 |
if ($is_semicolon_terminated) { }
|
30173
|
12 |
0 |
if ($rOpts_indent_closing_brace and $i_terminal == $ibeg || $is_semicolon_terminated)
|
30195
|
46 |
47 |
if ($is_leading)
|
30240
|
550 |
857 |
if (defined $i_opening and $i_opening >= 0) { }
|
30251
|
26 |
831 |
unless $seqno
|
30267
|
3 |
552 |
if ($rOpts_freeze_whitespace)
|
30277
|
31 |
521 |
if $rOpts_line_up_parentheses
|
30280
|
12 |
3054 |
if $opening_vertical_tightness{$key}
|
30285
|
9 |
3000 |
if $closing_vertical_tightness{$key}
|
30290
|
2 |
1494 |
if $opening_token_right{$key}
|
30295
|
1 |
1491 |
if $stack_opening_token{$key}
|
30298
|
0 |
1491 |
if $stack_closing_token{$key}
|
30302
|
2 |
495 |
if $rOpts_block_brace_vertical_tightness
|
30305
|
2 |
493 |
if $rOpts_stack_closing_block_brace
|
30379
|
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) { }
|
30389
|
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')
|
30415
|
0 |
0 |
if $self->[70]{$K_to_go[$iend_next]} and $is_closing_type{$type_end_next}
|
30420
|
0 |
16 |
if ($ovt and $seqno and $self->[38]{$seqno})
|
30428
|
0 |
74 |
if (defined $self->[96]{$seqno})
|
30433
|
60 |
14 |
unless ($ovt < 2 and $nesting_depth_to_go[$iend_next + 1] != $nesting_depth_to_go[$ibeg_next])
|
30458
|
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 "#")
|
30468
|
0 |
34 |
if ($cvt and $self->[38]{$seqno})
|
30474
|
2 |
195 |
if ($cvt == 3)
|
30475
|
1 |
1 |
$self->[92]{$seqno} ? :
|
30480
|
0 |
29 |
if ($cvt == 2 and $rOpts_delete_old_whitespace and not $rOpts_add_whitespace)
|
30492
|
10 |
23 |
if ($cvt and $self->[94]{$seqno})
|
30498
|
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]}))
|
30528
|
25 |
51 |
if ($cvt == 2 or $iend_next == $ibeg_next) { }
|
30535
|
50 |
1 |
if ($str =~ /^b?[\)\]\}R#;]/)
|
30538
|
75 |
1 |
if ($ok)
|
30552
|
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))
|
30559
|
0 |
0 |
$cvt ? :
|
30564
|
17 |
58 |
$tightness{$token_next} == 2 ? :
|
30591
|
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]})
|
30628
|
2 |
0 |
$types_to_go[$ibeg_next - 1] eq 'b' ? :
|
30645
|
1 |
800 |
if ($types_to_go[$ibeg_next] eq "q")
|
30646
|
1 |
0 |
if ($token_beg_next =~ /^qw\s*([\[\(\{])$/)
|
30651
|
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}) { }
|
30659
|
70 |
0 |
unless $block_type_to_go[$ibeg_next] or $seq_next and $self->[38]{$seq_next}
|
30664
|
41 |
0 |
unless $block_type_to_go[$ibeg_next]
|
30669
|
6 |
795 |
if ($stackable)
|
30672
|
5 |
1 |
if ($n + 1 == $n_last_line)
|
30682
|
6 |
0 |
if ($is_semicolon_terminated or ($iend_next == $ibeg_next or $iend_next == $ibeg_next + 2 and $types_to_go[$iend_next] eq "#"))
|
30689
|
5 |
1 |
$types_to_go[$ibeg_next - 1] eq 'b' ? :
|
30733
|
0 |
5 |
$rOpts_block_brace_tightness == 2 ? :
|
30744
|
886 |
422 |
unless ($vt_seqno_beg)
|
30745
|
11 |
875 |
if ($types_to_go[$ibeg] eq 'q') { }
|
30752
|
853 |
455 |
unless ($vt_seqno_end)
|
30753
|
7 |
846 |
if ($types_to_go[$iend] eq 'q') { }
|
30759
|
1 |
1307 |
unless (defined $vt_seqno)
|
30813
|
9 |
555 |
if ($accumulating_text_for_block)
|
30816
|
5 |
4 |
if ($is_if_elsif{$accumulating_text_for_block})
|
30832
|
7 |
2 |
unless ($accumulating_text_for_block =~ /^els/)
|
30854
|
92 |
0 |
if ($accumulating_text_for_block and not $leading_block_text_length_exceeded and $types_to_go[$i] ne "#")
|
30860
|
0 |
92 |
if $i == 0
|
30865
|
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') { }
|
30910
|
0 |
89 |
if ($i == 0 and $types_to_go[$i] ne "b")
|
30947
|
61 |
0 |
unless $csc_last_label
|
30948
|
0 |
61 |
if ($types_to_go[0] eq "J")
|
30956
|
683 |
34 |
unless $block_type
|
30959
|
463 |
254 |
if ($type ne "#" and $type ne "b")
|
30966
|
34 |
683 |
if ($block_type and $type_sequence)
|
30968
|
17 |
17 |
if ($token eq '}') { }
|
|
17 |
0 |
elsif ($token eq '{') { }
|
30971
|
9 |
8 |
if (defined $block_leading_text{$type_sequence})
|
30980
|
17 |
0 |
if (defined $csc_block_label{$type_sequence})
|
30987
|
0 |
17 |
if ($accumulating_text_for_block and $levels_to_go[$i] <= $leading_block_text_level)
|
30994
|
17 |
0 |
if (defined $block_opening_line_number{$type_sequence}) { }
|
31019
|
0 |
17 |
if ($block_type =~ /:$/)
|
31025
|
9 |
8 |
if ($accumulating_text_for_block and $levels_to_go[$i] == $leading_block_text_level)
|
31029
|
9 |
0 |
if ($accumulating_text_for_block eq $block_type) { }
|
31051
|
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/) { }
|
31062
|
454 |
1 |
if ($type ne "b" and $type ne "#" and $type ne "q")
|
31066
|
0 |
708 |
if ($type eq ';' and $accumulating_text_for_block and $levels_to_go[$i] == $leading_block_text_level) { }
|
31081
|
2 |
59 |
if ($terminal_block_type =~ /^els/ and $rblock_leading_if_elsif_text)
|
31089
|
0 |
61 |
if ($terminal_type eq "J")
|
31116
|
0 |
2 |
if ($block_type eq "elsif" and $rOpts_closing_side_comment_else_flag == 0)
|
31123
|
0 |
2 |
unless $count
|
31128
|
2 |
0 |
if ($block_type eq "else")
|
31133
|
2 |
0 |
if ($rOpts_closing_side_comment_else_flag == 0)
|
31138
|
0 |
0 |
if ($count > 1)
|
31140
|
0 |
0 |
if ($count > 2)
|
31145
|
0 |
0 |
if ($block_type eq 'else') { }
|
31153
|
0 |
0 |
if ($rOpts_closing_side_comment_else_flag == 2)
|
31163
|
0 |
0 |
if ($length > $maximum_line_length_at_level[$leading_block_text_level])
|
31217
|
164 |
7 |
unless $matching_char{$char}
|
31224
|
4 |
3 |
unless $top eq $char
|
31256
|
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/)
|
31303
|
0 |
9 |
if ($block_label)
|
31308
|
5 |
4 |
if ($i_block_leading_text == $i_terminal)
|
31313
|
6 |
3 |
if $rOpts->{'closing-side-comments-balanced'}
|
31318
|
0 |
9 |
if ($have_side_comment) { }
|
31321
|
0 |
0 |
if ($rOpts->{'closing-side-comment-warnings'})
|
31337
|
0 |
0 |
if ($block_type_to_go[$i_terminal] eq 'else') { }
|
|
0 |
0 |
elsif ($block_type_to_go[$i_terminal] eq 'elsif') { }
|
31338
|
0 |
0 |
if ($old_csc =~ /\[\s*elsif/)
|
31341
|
0 |
0 |
if ($old_csc =~ /\[\s*if/)
|
31346
|
0 |
0 |
if (length $new_csc > length $old_csc)
|
31352
|
0 |
0 |
if (length $new_csc < length $old_csc and $new_trailing_dots)
|
31359
|
0 |
0 |
if ($new_csc ne $old_csc) { }
|
|
0 |
0 |
elsif ($block_line_count < $rOpts->{'closing-side-comment-interval'}) { }
|
31363
|
0 |
0 |
if ($block_line_count < $rOpts->{'closing-side-comment-interval'}) { }
|
31374
|
0 |
0 |
if (defined $K)
|
31385
|
0 |
0 |
if ($rOpts->{'timestamp'})
|
31409
|
0 |
0 |
if ($iend > $ibeg and $iend == $max_index_to_go and $types_to_go[$max_index_to_go] eq "#")
|
31415
|
0 |
0 |
if ($iend > $ibeg and $types_to_go[$max_index_to_go] eq "b")
|
31427
|
0 |
0 |
if ($token)
|
31481
|
15 |
540 |
if ($added_semicolon_count > 0)
|
31482
|
3 |
12 |
$added_semicolon_count > 1 ? :
|
31483
|
3 |
12 |
$added_semicolon_count > 1 ? :
|
31489
|
3 |
12 |
if ($added_semicolon_count > 1)
|
31500
|
2 |
553 |
if ($deleted_semicolon_count > 0)
|
31501
|
2 |
0 |
$deleted_semicolon_count > 1 ? :
|
31502
|
2 |
0 |
$deleted_semicolon_count > 1 ? :
|
31511
|
2 |
0 |
if ($deleted_semicolon_count > 1)
|
31522
|
0 |
555 |
if ($embedded_tab_count > 0)
|
31523
|
0 |
0 |
$embedded_tab_count > 1 ? :
|
31524
|
0 |
0 |
$embedded_tab_count > 1 ? :
|
31534
|
0 |
0 |
if ($embedded_tab_count > 1)
|
31546
|
0 |
555 |
if ($first_tabbing_disagreement)
|
31553
|
0 |
555 |
if ($first_btd)
|
31559
|
0 |
0 |
if (get_saw_brace_error())
|
31563
|
0 |
555 |
if ($in_btd)
|
31569
|
0 |
0 |
if (get_saw_brace_error())
|
31572
|
0 |
555 |
if ($in_tabbing_disagreement) { }
|
31579
|
0 |
555 |
if ($last_tabbing_disagreement) { }
|
31590
|
0 |
555 |
if ($first_tabbing_disagreement)
|