| line |
true |
false |
branch |
|
77
|
0 |
0 |
if $AUTOLOAD =~ /\bDESTROY$/
|
|
257
|
0 |
4 |
unless defined $rlist
|
|
261
|
4 |
0 |
if Perl::Tidy::Tokenizer::is_valid_token_type($item)
|
|
262
|
0 |
0 |
if Perl::Tidy::Tokenizer::is_keyword($item)
|
|
265
|
4 |
0 |
unless @unknown_items
|
|
267
|
0 |
0 |
if ($option_name)
|
|
274
|
0 |
0 |
if $die_on_error
|
|
292
|
0 |
644 |
if (not $rOpts->{'valign-exclusion-list'} and $rOpts->{'valign-inclusion-list'})
|
|
299
|
3 |
644 |
if ($rOpts->{'valign-exclusion-list'})
|
|
302
|
1 |
2 |
if ($rOpts->{'valign-inclusion-list'})
|
|
316
|
0 |
3 |
unless (@vxl)
|
|
323
|
1 |
2 |
if (defined $valign_control_hash{'*'})
|
|
329
|
3 |
0 |
if (%valign_control_hash)
|
|
374
|
0 |
0 |
if ($exact_match)
|
|
375
|
0 |
0 |
if ($error)
|
|
400
|
0 |
648 |
if (@arglist % 2)
|
|
465
|
521 |
1696 |
if @{$self->[13];}
|
|
506
|
0 |
0 |
if ($diagnostics_object)
|
|
515
|
0 |
0 |
if ($logger_object)
|
|
523
|
0 |
1 |
get_cached_line_type() ? :
|
|
534
|
264 |
4319 |
ref $indentation ? :
|
|
703
|
392 |
8007 |
ref $indentation ? :
|
|
718
|
50 |
8349 |
if $is_hanging_side_comment
|
|
724
|
711 |
7688 |
if ($is_block_comment) { }
|
|
733
|
78 |
7610 |
if ($self->[12] > 1)
|
|
741
|
46 |
8353 |
if ($forget_side_comment)
|
|
761
|
227 |
8172 |
if ($cached_line_type)
|
|
763
|
157 |
70 |
if ($rvertical_tightness_flags)
|
|
765
|
4 |
137 |
if ($cached_seqno and $rvertical_tightness_flags->{'_vt_seqno'} and $rvertical_tightness_flags->{'_vt_seqno'} == $cached_seqno)
|
|
777
|
4 |
0 |
unless $min_lines
|
|
778
|
4 |
0 |
unless $max_lines
|
|
779
|
3 |
1 |
if ($line_count >= $min_lines and $line_count <= $max_lines)
|
|
790
|
0 |
11 |
if ($cached_line_type == 3 and not $self->group_line_count and $cached_line_opening_flag < 2 and not $is_balanced_line)
|
|
800
|
0 |
8399 |
if ($level < 0)
|
|
805
|
15 |
5184 |
if ($level != $group_level or $group_maximum_line_length and $maximum_line_length != $group_maximum_line_length or $is_outdented or $is_block_comment and not $rOpts_valign_block_comments or not $is_block_comment || $rOpts_valign_side_comments || $rOpts_valign_code)
|
|
818
|
1069 |
2146 |
if @{$self->[13];}
|
|
826
|
187 |
3028 |
ref $indentation ? :
|
|
833
|
599 |
7800 |
if ($self->[15] eq "COMMENT")
|
|
834
|
90 |
509 |
if ($is_block_comment and $outdent_long_lines and $leading_space_count == $self->[19]) { }
|
|
847
|
509 |
0 |
if @{$self->[13];}
|
|
852
|
30 |
8279 |
if ($break_alignment_before and @{$rgroup_lines;})
|
|
861
|
14 |
8295 |
if ($is_terminal_ternary and @{$rgroup_lines;})
|
|
882
|
9 |
3 |
if ($rfields->[0] eq "else " and @{$rgroup_lines;} and $is_balanced_line)
|
|
901
|
4811 |
3498 |
if ($jmax <= 0) { }
|
|
908
|
384 |
4386 |
if (not $is_numeric and @{$rgroup_lines;} and not get_recoverable_spaces($rgroup_lines->[0]{'indentation'}))
|
|
915
|
348 |
36 |
if ($rgroup_lines->[0]{'jmax'} > 1 or $self->[17] > 3)
|
|
919
|
348 |
0 |
if @{$self->[13];}
|
|
928
|
594 |
27 |
if ($is_block_comment and $outdent_long_lines and not @{$rgroup_lines;})
|
|
943
|
4126 |
1 |
unless (@{$rgroup_lines;} or $is_numeric or get_recoverable_spaces($indentation))
|
|
973
|
3241 |
348 |
if ($jmax == 0 or $$rtokens[$jmax - 1] ne "#")
|
|
1024
|
1149 |
2440 |
if $list_seqno
|
|
1034
|
21 |
3568 |
if (defined $j_terminal_match) { }
|
|
|
143 |
3425 |
elsif ($level_end < $level or $is_closing_token{substr $rfields->[0], 0, 1}) { }
|
|
1036
|
21 |
0 |
if @{$self->[13];}
|
|
1044
|
143 |
0 |
if @{$self->[13];}
|
|
1084
|
0 |
38 |
unless $jmax == 1
|
|
1088
|
0 |
38 |
unless $rtokens->[0] eq "#"
|
|
1092
|
0 |
38 |
unless $rfields->[0] =~ /^\s*$/
|
|
1096
|
35 |
3 |
if $maximum_field_index <= $jmax
|
|
1138
|
1028 |
165 |
if ($is_comma_token{$raw_tok})
|
|
1145
|
26 |
1051 |
unless ($is_comma_token{$raw_tok})
|
|
1177
|
0 |
14 |
unless $old_line
|
|
1180
|
0 |
14 |
if (%valign_control_hash)
|
|
1182
|
0 |
0 |
unless defined $align_ok
|
|
1183
|
0 |
0 |
unless $align_ok
|
|
1202
|
14 |
1 |
if ($raw_tok eq "?")
|
|
1206
|
0 |
14 |
if $depth_question ne $group_level
|
|
1209
|
14 |
0 |
if ($$rfields_old[$j + 1] =~ /^(\?\s*)/) { }
|
|
1219
|
0 |
14 |
unless defined $jquestion
|
|
1244
|
14 |
0 |
if ($fields[0] =~ /^(:\s*)(.*)$/) { }
|
|
1253
|
14 |
0 |
if ($therest) { }
|
|
1267
|
0 |
14 |
unless $patterns[0] =~ s/^\:/?/
|
|
1274
|
1 |
13 |
if $jadd
|
|
1275
|
1 |
13 |
if $jadd
|
|
1285
|
0 |
0 |
if $jmax <= 0 or $tokens[0] eq "#"
|
|
1298
|
0 |
0 |
if $jadd
|
|
1299
|
0 |
0 |
if $jadd
|
|
1318
|
0 |
0 |
if $jadd
|
|
1319
|
0 |
0 |
if $jadd
|
|
1359
|
0 |
9 |
unless $old_line
|
|
1361
|
0 |
9 |
if $jmax <= 0
|
|
1363
|
0 |
9 |
if (%valign_control_hash)
|
|
1365
|
0 |
0 |
unless defined $align_ok
|
|
1366
|
0 |
0 |
unless $align_ok
|
|
1373
|
2 |
7 |
unless $rfields_old->[0] =~ /^(?:if|elsif|unless)\s*$/
|
|
1378
|
7 |
0 |
if ($tok_brace =~ /^\{(\d+)/) { }
|
|
1391
|
0 |
7 |
if ($tok_test ne $tok_paren)
|
|
1400
|
7 |
1 |
if ($tok eq $tok_brace)
|
|
1405
|
0 |
7 |
unless (defined $jbrace)
|
|
1420
|
0 |
7 |
if ($rfields_old->[0] =~ /^case\s*$/) { }
|
|
1473
|
101 |
1220 |
if ($jmax > $maximum_field_index)
|
|
1477
|
38 |
1283 |
if ($new_line->{'is_hanging_side_comment'}) { }
|
|
1487
|
0 |
1283 |
if ($base_line->{'is_hanging_side_comment'}) { }
|
|
1511
|
0 |
1283 |
if ($ci_prev != $ci_new and $imax_align >= 0 and $ci_new == 0 || $group_line_count > 1) { }
|
|
|
39 |
1244 |
elsif ($imax_align != $jlimit) { }
|
|
1530
|
1282 |
39 |
unless (defined $return_value)
|
|
1534
|
141 |
1141 |
if ($maximum_field_index != $jmax) { }
|
|
|
1127 |
14 |
elsif ($self->check_fit($new_line, $base_line) and !0) { }
|
|
1587
|
0 |
1141 |
if ($jmax_old ne $jmax)
|
|
1607
|
1141 |
2873 |
if ($j == 0)
|
|
1612
|
1317 |
2697 |
if $pad < 0
|
|
1615
|
14 |
2683 |
if ($pad > $padding_available)
|
|
1693
|
10 |
0 |
if ($rOpts_indent_columns)
|
|
1698
|
0 |
10 |
if ($level < 0)
|
|
1714
|
0 |
594 |
unless @{$rgroup_lines;}
|
|
1725
|
39 |
645 |
if ($excess > $max_excess)
|
|
1731
|
37 |
557 |
if ($max_excess > 0)
|
|
1733
|
37 |
0 |
if ($leading_space_count < 0)
|
|
1741
|
19 |
18 |
unless ($outdented_line_count)
|
|
1789
|
0 |
2611 |
unless @{$rgroup_lines;}
|
|
1804
|
594 |
2017 |
if ($group_type eq "COMMENT")
|
|
1826
|
299 |
1718 |
if @{$rgroups;} > 1
|
|
1829
|
222 |
1795 |
if ($saw_side_comment)
|
|
1841
|
1017 |
1000 |
if ($group_level > $self->[4])
|
|
1844
|
672 |
345 |
if (defined $level_jump) { }
|
|
1856
|
443 |
1574 |
$extra_indent_ok ? :
|
|
1862
|
70 |
1947 |
if $saw_signed_number and $rOpts_valign_signed_numbers
|
|
1866
|
12 |
2005 |
if $rOpts_valign_wide_equals
|
|
1893
|
94 |
1923 |
if (ref $object)
|
|
1922
|
2462 |
1127 |
if ($group_line_count == 0) { }
|
|
1937
|
0 |
1493 |
unless @{$rgroups;}
|
|
1938
|
0 |
1493 |
if $group_line_count <= 0
|
|
1951
|
0 |
2482 |
unless @{$rgroups;}
|
|
1952
|
20 |
2462 |
if $group_line_count <= 0
|
|
1959
|
290 |
2172 |
if ($jend - $jbeg == 1)
|
|
1964
|
0 |
290 |
if ($imax_pair > $imax_align)
|
|
1972
|
75 |
215 |
$jbeg > 0 ? :
|
|
1977
|
16 |
274 |
if ($is_marginal)
|
|
1990
|
0 |
1 |
if @{$rgroups;} <= 1
|
|
2021
|
0 |
2017 |
unless (@{$rlines;})
|
|
2036
|
2096 |
1493 |
unless ($group_line_count)
|
|
2038
|
26 |
2070 |
if ($new_line->{'end_group'})
|
|
2046
|
0 |
1493 |
unless (defined $jbeg)
|
|
2062
|
20 |
1473 |
if (defined $j_terminal_match)
|
|
2070
|
0 |
20 |
unless defined $col_matching_terminal
|
|
2093
|
38 |
1455 |
if ($new_line->{'is_hanging_side_comment'}) { }
|
|
|
244 |
1211 |
elsif ($new_line->{'jmax'} == 1) { }
|
|
2112
|
199 |
45 |
unless ($side_comment and $prev_comment)
|
|
2121
|
172 |
27 |
if not $is_numeric or $side_comment
|
|
2131
|
1321 |
172 |
if ($group_line_count)
|
|
2136
|
194 |
1127 |
if ($match_code != 2)
|
|
2142
|
20 |
1473 |
if (defined $j_terminal_match) { }
|
|
|
53 |
1420 |
elsif ($new_line->{'end_group'}) { }
|
|
2153
|
3 |
17 |
if ($group_line_count == 1)
|
|
2155
|
2 |
1 |
unless ($fixit)
|
|
2156
|
2 |
0 |
if (@{$rgroups;} > 1)
|
|
2164
|
2 |
18 |
if ($fixit)
|
|
2170
|
0 |
2 |
unless defined $col_now
|
|
2175
|
1 |
1 |
if ($col_now and $pad > 0 and $pad <= $padding_available)
|
|
2181
|
1 |
1 |
unless ($new_line->{'is_terminal_ternary'})
|
|
2235
|
0 |
21 |
if $imax_min >= @{$rfield_lengths;} or $imax_min >= @{$rfield_lengths_m;}
|
|
2244
|
12 |
9 |
$lensum >= $lensum_m ? :
|
|
2248
|
17 |
0 |
if ($line_m->{'list_type'} and $line->{'list_type'})
|
|
2257
|
0 |
47 |
if ($pat_m ne $pat and length $pat_m eq length $pat)
|
|
2262
|
2 |
45 |
if ($pat ne $pat_m)
|
|
2267
|
0 |
21 |
if (not $patterns_match and $lenmax > 2 * $lenmin)
|
|
2301
|
0 |
299 |
if $ng_max <= 0
|
|
2358
|
0 |
744 |
unless defined $istop
|
|
2359
|
0 |
744 |
if $istop > $imax
|
|
2362
|
299 |
445 |
if $ng == 0
|
|
2365
|
106 |
339 |
$imax > $imax_m ? :
|
|
2368
|
65 |
380 |
if ($istop_m < $imax_min)
|
|
2376
|
79 |
169 |
if ($jend == $jbeg and $jend_m == $jbeg_m and $ng == 1 || $istop_mm < 0 and $ng == $ng_max || $istop < 0 and not $line->{'j_terminal_match'} and $imax != $imax_m || $istop_m != $imax_m)
|
|
2392
|
53 |
26 |
if $imax_min < 0
|
|
2394
|
5 |
17 |
unless $rtokens->[0] =~ /^=\d/ or $list_type
|
|
2402
|
0 |
21 |
unless $pad_max
|
|
2409
|
97 |
290 |
if ($imax_min >= 0)
|
|
2413
|
0 |
174 |
if $tok ne $tok_m
|
|
2418
|
225 |
74 |
unless @icommon
|
|
2426
|
0 |
146 |
unless $Perl::Tidy::VerticalAligner::a->[0] <=> $Perl::Tidy::VerticalAligner::b->[0]
|
|
2440
|
38 |
62 |
if (defined $ng_last and $ng_beg == $ng_last and $i == $i_last)
|
|
2520
|
12 |
127 |
if not defined $ngb or $nge <= $ngb
|
|
2527
|
92 |
197 |
if ($move > 0) { }
|
|
|
0 |
197 |
elsif ($move < 0) { }
|
|
2533
|
0 |
22 |
if defined $rmax_move->{$ng} and $move > $rmax_move->{$ng} and not $is_good_alignment_token{$raw_tok}
|
|
2572
|
0 |
136 |
if $ng_end <= $ng_beg
|
|
2605
|
136 |
174 |
unless (defined $col_want)
|
|
2662
|
56 |
118 |
if ($top_level and $is_good_alignment_token{$raw_tok}) { }
|
|
2669
|
106 |
7 |
if (defined $is_good_alignment_token{$raw_tok} and $lines_total > 2 || $group_list_type && $jmax < $jmax_m && $top_level)
|
|
2687
|
70 |
36 |
if ($top_level)
|
|
2694
|
145 |
29 |
unless ($is_same_group)
|
|
2706
|
0 |
174 |
if ($is_big_gap)
|
|
2711
|
0 |
162 |
if ($col_want > $col_max or $col > $col_limit or $is_big_gap or $is_blocked)
|
|
2718
|
10 |
2 |
unless (defined $blocking_level[$ng])
|
|
2746
|
49 |
113 |
if ($col > $col_want)
|
|
2747
|
47 |
115 |
if ($col_max < $col_limit)
|
|
2751
|
127 |
9 |
if ($ng_end > $ng_first)
|
|
2781
|
0 |
539 |
unless defined $line_obj and defined $ridel and @{$ridel;}
|
|
2825
|
846 |
881 |
if (not $delete_me{$j}) { }
|
|
2832
|
539 |
342 |
unless (defined $jmin_del)
|
|
2853
|
1 |
538 |
if (defined $j_terminal_match and $jmin_del <= $j_terminal_match)
|
|
2858
|
76 |
463 |
if ($line_obj->{'list_seqno'})
|
|
2867
|
49 |
27 |
if ($rtokens_new->[0] =~ /^(=>|,)/)
|
|
2870
|
44 |
32 |
if (not $old_list_type or $old_list_type ne $new_list_type)
|
|
2930
|
9205 |
1666 |
if (defined $decoded_token{$tok})
|
|
2935
|
1308 |
358 |
if ($tok =~ /^(\D+)(\d+)([^\.]*)(\.(\d+))?$/)
|
|
2938
|
506 |
802 |
if $3
|
|
2939
|
71 |
1237 |
if $5
|
|
2964
|
0 |
2017 |
unless @{$rlines;}
|
|
2967
|
1343 |
674 |
if (@{$rlines;} == 1)
|
|
2984
|
1 |
673 |
if $jmax < 0
|
|
3000
|
79 |
1446 |
if ($rnew_lines->[$jl]{'end_group'})
|
|
3018
|
171 |
502 |
if $max_lev_diff
|
|
3064
|
3856 |
2198 |
if ($tok ne '#') { }
|
|
3065
|
2030 |
1826 |
if (not defined $lev_min) { }
|
|
3070
|
84 |
1742 |
if ($lev < $lev_min)
|
|
3071
|
294 |
1532 |
if ($lev > $lev_max)
|
|
3075
|
1991 |
207 |
unless ($saw_side_comment)
|
|
3087
|
629 |
5425 |
if (not defined $i_eq and $raw_tok eq "=")
|
|
3089
|
512 |
117 |
if ($lev eq $group_level)
|
|
3099
|
2030 |
168 |
if (defined $lev_min)
|
|
3101
|
179 |
1851 |
if ($lev_diff > $max_lev_diff)
|
|
3117
|
3087 |
559 |
if (defined $rhash_r->{$tok})
|
|
3122
|
1562 |
1525 |
if ($tok ne "#")
|
|
3131
|
39 |
1486 |
if ($nr == 0 and $nl > 0)
|
|
3152
|
264 |
1261 |
if (defined $i_eq_l and defined $i_eq_r)
|
|
3158
|
13 |
246 |
if ($tok_eq_l eq $tok_eq_r and $i_eq_l == 0 and $i_eq_r == 0 and substr($pat_eq_l, 0, 1) ne substr($pat_eq_r, 0, 1) || $ci_jump)
|
|
3220
|
354 |
398 |
if ($nlines > 2)
|
|
3227
|
3582 |
673 |
unless ($seen{$tok})
|
|
3235
|
657 |
439 |
if ($token_line_count{$tok} == $nlines)
|
|
3236
|
23 |
634 |
if (substr($tok, 0, 1) eq "?" or substr($tok, 0, 1) eq "{" and $tok =~ /^\{\d+if/)
|
|
3265
|
0 |
3856 |
if $tok eq "#"
|
|
3278
|
33 |
3823 |
if (%valign_control_hash)
|
|
3280
|
20 |
13 |
unless defined $align_ok
|
|
3291
|
163 |
3693 |
if ($dividing_token)
|
|
3292
|
132 |
31 |
if ($token_line_count{$tok} >= $nlines) { }
|
|
3315
|
326 |
3530 |
if (defined $delete_above_level)
|
|
3316
|
153 |
173 |
if ($lev > $delete_above_level) { }
|
|
3324
|
62 |
17 |
if ($deleted_assignment_token and $lev > $group_level || !$is_if_or{$raw_tok})
|
|
3339
|
18 |
1284 |
if $jj == $jbeg and $has_terminal_match and $nlines == 2
|
|
3345
|
828 |
3028 |
if ($delete_me and $tok_count == 1)
|
|
3350
|
305 |
523 |
if ($raw_tok eq ",")
|
|
3353
|
15 |
290 |
if defined $i_eq and $i < $i_eq
|
|
3357
|
80 |
225 |
if $lev <= $group_level
|
|
3361
|
136 |
692 |
if ($is_assignment{$raw_tok} and $lev == $group_level)
|
|
3368
|
13 |
123 |
if ($imax > 0 and $i == $imax) { }
|
|
3384
|
766 |
3090 |
if ($delete_me)
|
|
3388
|
613 |
153 |
if (not defined $delete_above_level or $lev < $delete_above_level)
|
|
3397
|
55 |
558 |
if ($raw_tok eq "=>")
|
|
3405
|
479 |
1719 |
if (@idel)
|
|
3448
|
101 |
651 |
if $nlines <= 1
|
|
3471
|
1924 |
173 |
unless ($saw_signed_number)
|
|
3475
|
3648 |
952 |
if (index($rpatterns->[$i], "n") == -1)
|
|
3477
|
72 |
880 |
if (index($field, "-") != -1 or index($field, "+") != -1)
|
|
3487
|
651 |
1446 |
if $jj == $jbeg
|
|
3491
|
101 |
1345 |
$imax_m < $imax ? :
|
|
3500
|
0 |
1446 |
if ($line->{'is_hanging_side_comment'}) { }
|
|
|
526 |
920 |
elsif ($list_type and $list_type eq $list_type_m) { }
|
|
3512
|
0 |
526 |
if ($ci_jump)
|
|
3518
|
0 |
1049 |
if ($tok ne $tok_m)
|
|
3535
|
31 |
878 |
if ($tok ne $tok_m)
|
|
3544
|
198 |
680 |
if ($pat_m ne $pat)
|
|
3550
|
186 |
692 |
if ($pat_m ne $pat)
|
|
3563
|
8 |
178 |
if ($match_code)
|
|
3564
|
7 |
1 |
if ($match_code == 1) { }
|
|
|
1 |
0 |
elsif ($match_code == 2) { }
|
|
3585
|
26 |
647 |
if (@{$rlines;} > @{$rnew_lines;})
|
|
3588
|
41 |
58 |
if ($line_t->{'is_hanging_side_comment'}) { }
|
|
3638
|
26 |
160 |
if ($alignment_token eq ',') { }
|
|
|
4 |
156 |
elsif ($alignment_token eq '(') { }
|
|
|
20 |
136 |
elsif ($alignment_token eq '=') { }
|
|
3642
|
3 |
23 |
if (not $tok =~ /[A-Za-z]/) { }
|
|
3657
|
4 |
0 |
if ($pad != 0) { }
|
|
3680
|
0 |
20 |
if (substr($pat_m, 0, 1) ne substr($pat, 0, 1)) { }
|
|
|
1 |
19 |
elsif ((index($pat_m, ',') != -1) ne (index($pat, ',') != -1)) { }
|
|
3707
|
1 |
0 |
if ($lev eq $group_level)
|
|
3739
|
181 |
652 |
if ($str =~ /^=>([^\.]*)/)
|
|
3773
|
691 |
1122 |
if $tok eq "#"
|
|
3774
|
90 |
1032 |
if ($i > 0 and $lev < $last_lev)
|
|
3777
|
87 |
604 |
unless ($is_monotonic)
|
|
3806
|
146 |
545 |
if ($all_monotonic and $tok_end =~ /^,/)
|
|
3820
|
691 |
1029 |
if $i > $imax
|
|
3821
|
0 |
1029 |
if $tok eq "#"
|
|
3825
|
0 |
1029 |
if $tok eq "#"
|
|
3828
|
584 |
445 |
if (not defined $lev_min) { }
|
|
3833
|
60 |
385 |
if ($lev < $lev_min)
|
|
3834
|
134 |
311 |
if ($lev > $lev_max)
|
|
3835
|
90 |
355 |
if ($lev < $last_lev)
|
|
3844
|
107 |
584 |
if (not defined $lev_min) { }
|
|
|
399 |
185 |
elsif ($lev_max == $lev_min) { }
|
|
3867
|
185 |
586 |
if $itok > $imax
|
|
3870
|
0 |
586 |
if $raw_tok eq "#"
|
|
3872
|
317 |
309 |
if $lev > $lev_test
|
|
3909
|
0 |
171 |
if $jmax <= 0
|
|
3974
|
135 |
36 |
if $all_monotonic
|
|
4027
|
93 |
252 |
if $depth > $MAX_DEPTH
|
|
4030
|
71 |
6 |
if ($jl >= 0 and defined $match_tree[$depth] and @{$match_tree[$depth];} and defined $levels_current[$depth])
|
|
4040
|
77 |
175 |
if (defined $match_tree[$depth])
|
|
4053
|
127 |
125 |
if (not defined $levels_next[$depth] or $depth > 0 and $levels_next[$depth] <= $levels_next[$depth - 1])
|
|
4091
|
5 |
241 |
if (@{$rlevs;} > $MAX_DEPTH)
|
|
4097
|
340 |
398 |
defined $item ? :
|
|
4099
|
340 |
398 |
defined $item ? :
|
|
4106
|
36 |
210 |
if ($jp == 0) { }
|
|
|
11 |
199 |
elsif ($rlines->[$jm]{'end_group'}) { }
|
|
|
0 |
199 |
elsif ($rlines->[$jp]{'is_hanging_side_comment'}) { }
|
|
4128
|
152 |
4 |
unless $def_current or $def_next
|
|
4129
|
46 |
215 |
if (not $def_current && $def_next or $token_patterns_current[$dep] ne $token_patterns_next[$dep])
|
|
4135
|
23 |
23 |
if ($dep > 0 and defined $match_tree[$dep - 1])
|
|
4156
|
35 |
37 |
unless defined $match_tree[$depth]
|
|
4161
|
0 |
55 |
unless (defined $np)
|
|
4167
|
40 |
15 |
if (not defined $np_now or $np != $np_now)
|
|
4194
|
36 |
0 |
if (defined $match_tree[0])
|
|
4199
|
36 |
65 |
unless @todo_list
|
|
4208
|
63 |
40 |
unless defined $nc_beg_p
|
|
4227
|
26 |
14 |
if ($nmin_mono > $nlines_p - 1)
|
|
4230
|
36 |
4 |
if ($nmin_non_mono > $nlines_p - 1)
|
|
4241
|
1 |
54 |
$is_monotonic ? :
|
|
4242
|
22 |
33 |
if ($nlines_c < $nmin) { }
|
|
4269
|
83 |
69 |
if ($lev > $level_keep)
|
|
4273
|
28 |
0 |
if (@idel)
|
|
4291
|
0 |
0 |
unless defined $val
|
|
4333
|
127 |
156 |
if (defined $line_1->{'j_terminal_match'} or $line_0->{'list_type'} or $line_1->{'is_hanging_side_comment'})
|
|
4373
|
179 |
28 |
if ($raw_tok and $lev == $group_level)
|
|
4374
|
143 |
36 |
unless ($raw_tokb)
|
|
4387
|
148 |
59 |
if ($j == 0)
|
|
4392
|
88 |
60 |
if ($raw_tok eq "=" and $lev == $group_level)
|
|
4396
|
5 |
83 |
if $j0_max_pad < 4
|
|
4400
|
48 |
159 |
if ($pad < 0)
|
|
4401
|
110 |
97 |
if ($pad > $max_pad)
|
|
4402
|
151 |
56 |
if ($is_good_marginal_alignment{$raw_tok} and not $line_ending_fat_comma) { }
|
|
4408
|
47 |
9 |
unless defined $jfirst_bad
|
|
4412
|
3 |
204 |
if ($pat_0 ne $pat_1 and length $pat_0 eq length $pat_1)
|
|
4416
|
44 |
163 |
if ($pat_0 ne $pat_1)
|
|
4422
|
24 |
20 |
unless defined $jfirst_bad
|
|
4423
|
43 |
1 |
if $is_marginal == 0
|
|
4424
|
13 |
31 |
if ($raw_tok eq "=")
|
|
4439
|
0 |
156 |
if $is_marginal == 0 and $line_ending_fat_comma
|
|
4452
|
24 |
6 |
if ($is_marginal == 1 and $saw_good_alignment || $max_pad < 3)
|
|
4462
|
0 |
156 |
if ($jmax_0 < 1 or $jmax_1 < 1) { }
|
|
4473
|
37 |
100 |
unless ($is_marginal or $sc_term0)
|
|
4479
|
1 |
36 |
if ($is_assignment{$raw_tokb})
|
|
4496
|
135 |
21 |
unless ($is_marginal)
|
|
4527
|
14 |
7 |
if ($is_assignment{$raw_tokb}) { }
|
|
|
0 |
7 |
elsif ($raw_tokb eq '=>') { }
|
|
|
0 |
7 |
elsif ($raw_tokb eq '=~') { }
|
|
4531
|
13 |
1 |
if ($sc_term0)
|
|
4544
|
0 |
0 |
if ($sc_term1 and $sc_term0)
|
|
4565
|
5 |
16 |
if ($saw_if_or)
|
|
4568
|
5 |
0 |
if ($sc_term0 and $sc_term1)
|
|
4574
|
0 |
16 |
if ($is_marginal and defined $jfirst_bad and $imax_align > $jfirst_bad - 1)
|
|
4584
|
14 |
7 |
if ($imax_align < 0 and defined $j0_eq_pad)
|
|
4586
|
0 |
0 |
if ($imax_next >= 0 || $imax_prev >= 0 || 0 and $j0_eq_pad >= -$j0_max_pad and $j0_eq_pad <= $j0_max_pad)
|
|
4626
|
0 |
0 |
unless ($rpatterns_0->[0] =~ /,/ or $rpatterns_1->[0] =~ /,/)
|
|
4650
|
0 |
443 |
unless @{$rlines;} and @{$rgroups;}
|
|
4653
|
384 |
59 |
unless ref $object
|
|
4656
|
46 |
13 |
unless $extra_indentation_spaces_wanted
|
|
4659
|
13 |
0 |
if ($min_spaces > 0)
|
|
4668
|
13 |
31 |
if $j == 0
|
|
4671
|
1 |
30 |
if ($object != $rlines->[$j]{'indentation'})
|
|
4678
|
30 |
1 |
$avail > $extra_indentation_spaces_wanted ? :
|
|
4692
|
0 |
31 |
if ($ngroups > 1 and $spaces < 0)
|
|
4695
|
13 |
18 |
if ($ng == 0 or $spaces < $extra_leading_spaces)
|
|
4736
|
12 |
210 |
if $is_hanging_side_comment
|
|
4747
|
0 |
210 |
unless $num5
|
|
4765
|
82 |
128 |
if $line_diff > $short_diff or not $rOpts_valign_side_comments
|
|
4774
|
18 |
110 |
if $level < $last_sc_level and $is_closing_block_type{substr $rfields->[0], 0, 1}
|
|
4778
|
4 |
106 |
if (my $cached_line_type = get_cached_line_type())
|
|
4791
|
0 |
4 |
if $cached_line_type == 2 or $cached_line_type == 4
|
|
4835
|
251 |
152 |
if ($line->{'rfield_lengths'}[$jmax])
|
|
4839
|
222 |
29 |
unless (defined $j_sc_beg)
|
|
4848
|
0 |
222 |
unless @todo
|
|
4855
|
6 |
204 |
if $ldiff > 5
|
|
4859
|
83 |
121 |
unless $sc_len
|
|
4869
|
122 |
100 |
$keep_it ? :
|
|
4874
|
24 |
198 |
@todo > 1 ? :
|
|
4883
|
222 |
24 |
if ($PASS == $MAX_PASS)
|
|
4898
|
4 |
300 |
if $PASS < $MAX_PASS and $is_hanging_side_comment
|
|
4909
|
246 |
54 |
unless (defined $column_limit)
|
|
4913
|
0 |
300 |
if $jmax <= 0
|
|
4917
|
13 |
287 |
if ($move > $avail)
|
|
4922
|
5 |
82 |
if ($move >= 0 and $j_sc_beg == 0 and $continuing_sc_flow)
|
|
4930
|
16 |
284 |
if ($is_hanging_side_comment)
|
|
4932
|
215 |
85 |
if ($move < $min_move)
|
|
4937
|
11 |
289 |
if ($move > $avail)
|
|
4940
|
8 |
292 |
if ($move < 0)
|
|
4943
|
49 |
251 |
if ($PASS < $MAX_PASS) { }
|
|
4947
|
23 |
26 |
if ($col > $max_comment_column and $col < $column_limit)
|
|
4969
|
222 |
3 |
if ($line->{'rfield_lengths'}[$jmax])
|
|
4976
|
222 |
0 |
if (defined $j_sc_last)
|
|
5012
|
0 |
42 |
unless $num
|
|
5019
|
26 |
16 |
@sorted % 2 ? :
|
|
5039
|
0 |
30 |
unless $rcol_hash
|
|
5045
|
0 |
30 |
if (not $signed and $unsigned)
|
|
5057
|
0 |
30 |
if ($signed + $unsigned != $nlines)
|
|
5083
|
18 |
27 |
if ($Nu > 0 and $Nu <= $rOpts_valign_signed_numbers_limit)
|
|
5093
|
18 |
12 |
if ($Nu > 0 and $Nu <= $rOpts_valign_signed_numbers_limit)
|
|
5097
|
9 |
21 |
unless (@unsigned_subgroups)
|
|
5118
|
102 |
0 |
if ($str =~ /^([^\s\,\)\]\}]*)/)
|
|
5120
|
33 |
69 |
if ($is_signed{$ix}) { }
|
|
5131
|
0 |
21 |
if ($max_signed_length <= $min_unsigned_length) { }
|
|
|
10 |
11 |
elsif ($max_signed_length > $max_unsigned_length) { }
|
|
5182
|
11 |
0 |
$excess ? :
|
|
5187
|
13 |
30 |
unless ($excess)
|
|
5189
|
15 |
28 |
if ($is_signed{$ix_m}) { }
|
|
5192
|
13 |
2 |
unless ($is_signed{$ix})
|
|
5193
|
8 |
5 |
if ($excess) { }
|
|
5202
|
9 |
19 |
if ($is_signed{$ix}) { }
|
|
5203
|
9 |
0 |
if ($excess_m) { }
|
|
5209
|
7 |
12 |
if ($excess_m xor $excess)
|
|
5217
|
1 |
10 |
if ($bad_count > $good_count)
|
|
5224
|
0 |
6 |
if ($median_unsigned_length >= $median_signed_length and $bad_count > 1 and $immobile_count > 1)
|
|
5246
|
0 |
56 |
if ($jcol >= $jmax)
|
|
5257
|
16 |
40 |
$jcol == 0 ? :
|
|
5262
|
56 |
0 |
if ($excess > 0)
|
|
5266
|
0 |
20 |
unless $movable_count
|
|
5273
|
22 |
12 |
if $excess_space{$ix_min} > 0 and $ix_min != $ix_first
|
|
5274
|
17 |
17 |
if $excess_space{$ix_max} > 0 and $ix_max != $ix_last
|
|
5281
|
0 |
20 |
if ($unsigned > $Nc * $rOpts_valign_signed_numbers_limit)
|
|
5292
|
0 |
56 |
if $excess_space{$ix} <= 0
|
|
5323
|
16 |
40 |
if ($pos_start_number > 0)
|
|
5325
|
0 |
16 |
if ($pos_start_number >= $len)
|
|
5341
|
0 |
16 |
if ($test_char1 ne $char_end_part1)
|
|
5352
|
56 |
0 |
if ($is_digit_char{$test_char2}) { }
|
|
5391
|
20 |
104 |
if ($n_count and $n_count > 1)
|
|
5397
|
0 |
104 |
if ($comma_count and $comma_count > 1)
|
|
5404
|
0 |
104 |
unless $len_pat1 and $len_field
|
|
5409
|
79 |
25 |
if ($ch eq "b")
|
|
5416
|
56 |
48 |
if ($ch eq '{') { }
|
|
5420
|
0 |
56 |
if $brace_count != 1
|
|
5426
|
18 |
38 |
if ($i_paren >= 0)
|
|
5430
|
38 |
18 |
if ($i_bracket >= 0 and $i_bracket < $i_opening)
|
|
5436
|
0 |
56 |
if ($i_brace >= 0 and $i_brace < $i_opening)
|
|
5440
|
56 |
0 |
if ($i_opening >= 0 and $i_opening < length($field) - 1) { }
|
|
5444
|
25 |
31 |
unless $ending_b
|
|
5456
|
0 |
48 |
unless ($ending_b)
|
|
5460
|
11 |
37 |
if $pos_equals < 0
|
|
5464
|
3 |
34 |
if $equals_count != 1
|
|
5466
|
8 |
26 |
if ($len_pat1 >= 2 and substr($pat1, -2, 2) eq '=b') { }
|
|
|
16 |
10 |
elsif ($len_pat1 >= 3 and substr($pat1, -3, 3) eq '=>b') { }
|
|
5479
|
0 |
80 |
if ($pos_start_number <= 0 or $pos_start_number >= $len_field)
|
|
5503
|
192 |
72 |
if ($next_char eq ',') { }
|
|
|
47 |
25 |
elsif ($next_char eq 'b') { }
|
|
|
25 |
0 |
elsif ($next_char eq '}') { }
|
|
5505
|
192 |
0 |
if ($icomma >= 0)
|
|
5513
|
47 |
0 |
if ($ispace >= 0)
|
|
5520
|
25 |
0 |
if ($field2 =~ /^([^\)\}\]]+)/)
|
|
5535
|
0 |
264 |
unless (length $field2_trim)
|
|
5544
|
2 |
262 |
unless ($field2_trim =~ /^[\d\.\+\-abcdefpx_]+$/i)
|
|
5583
|
0 |
70 |
unless $rOpts_valign_signed_numbers
|
|
5607
|
11 |
338 |
if ($jmax < $jmax_last)
|
|
5612
|
4 |
2 |
if $jcol < $jmax
|
|
5614
|
0 |
2 |
unless $rcol_hash
|
|
5615
|
0 |
0 |
if ($rcol_hash->{'signed_count'} and $rcol_hash->{'unsigned_count'})
|
|
5627
|
2 |
9 |
if ($jcol >= 0 and $column_info{$jcol})
|
|
5632
|
0 |
0 |
if ($col < $old_col and $rfields->[$jcol] =~ /^([+-]?)\d/ and $1 || $column_info{$jcol}{'signed_count'})
|
|
5645
|
0 |
0 |
if ($spaces_available >= $spaces_needed)
|
|
5664
|
55 |
730 |
if (defined $old_col and $old_col != $col)
|
|
5666
|
6 |
11 |
if $jcol_old < $jcol
|
|
5668
|
1 |
0 |
if ($rcol_hash->{'signed_count'} and $rcol_hash->{'unsigned_count'})
|
|
5702
|
755 |
30 |
if ($field_ok and $pattern)
|
|
5709
|
333 |
422 |
if ($posq < 0) { }
|
|
5720
|
310 |
445 |
if ($field_ok)
|
|
5724
|
124 |
186 |
if ($pat1)
|
|
5736
|
310 |
0 |
if ($field_ok)
|
|
5741
|
49 |
261 |
if ($is_plus_or_minus{$test_char})
|
|
5748
|
264 |
46 |
if ($is_digit_char{$test_char}) { }
|
|
5750
|
47 |
217 |
if ($sign) { }
|
|
5757
|
67 |
150 |
$pos_start_number ? :
|
|
5783
|
584 |
201 |
if (not $rcol_hash) { }
|
|
5786
|
500 |
84 |
unless $field_ok
|
|
5796
|
0 |
167 |
if (not $field_ok or $rcol_hash->{'pos_start_number'} ne $pos_start_number or $rcol_hash->{'char_end_part1'} ne $char_end_part1 or $rcol_hash->{'col'} ne $col)
|
|
5803
|
0 |
0 |
if ($rcol_hash->{'signed_count'} and $rcol_hash->{'unsigned_count'})
|
|
5823
|
118 |
167 |
if (not defined $rcol_hash) { }
|
|
5825
|
23 |
95 |
unless $field_ok
|
|
5827
|
12 |
83 |
$is_signed_number ? :
|
|
5846
|
35 |
132 |
if ($is_signed_number)
|
|
5858
|
29 |
1 |
if ($rcol_hash->{'signed_count'} and $rcol_hash->{'unsigned_count'})
|
|
5881
|
0 |
12 |
unless $rcol_hash
|
|
5892
|
0 |
12 |
if ($num != $nlines)
|
|
5940
|
18 |
32 |
if ($jcolp >= $jmax - 1) { }
|
|
|
9 |
23 |
elsif (not $current_alignment) { }
|
|
|
6 |
17 |
elsif (builtin::refaddr($alignment) != builtin::refaddr($current_alignment)) { }
|
|
5958
|
1 |
5 |
if ($starting_colp != $colp) { }
|
|
5968
|
3 |
2 |
if ($current_colp > $colp)
|
|
5972
|
3 |
0 |
if ($excess <= $padding_available)
|
|
5993
|
33 |
17 |
if ($pad > 0)
|
|
6002
|
13 |
20 |
if ($excess > 0)
|
|
6005
|
12 |
1 |
if ($excess <= $padding_available) { }
|
|
6012
|
1 |
0 |
if ($excess <= $padding_available) { }
|
|
6055
|
0 |
12 |
unless $rOpts_valign_wide_equals
|
|
6078
|
6 |
44 |
if ($jmax < $jmax_last)
|
|
6083
|
6 |
0 |
if $jcol < $jmax
|
|
6085
|
0 |
0 |
unless $rcol_hash
|
|
6086
|
0 |
0 |
if ($rcol_hash->{'max_width'} > $rcol_hash->{'min_width'})
|
|
6106
|
14 |
133 |
if (defined $old_col and $old_col != $col)
|
|
6108
|
14 |
0 |
if $jcol_old < $jcol
|
|
6110
|
0 |
0 |
if ($rcol_hash->{'max_width'} > $rcol_hash->{'min_width'})
|
|
6130
|
50 |
47 |
if (length $token > 1 and substr($token, 0, 1) eq "=" and $is_digit_char{substr $token, 1, 1})
|
|
6138
|
50 |
0 |
if ($pos >= 0 and $pos <= 2)
|
|
6144
|
109 |
38 |
if (not $rcol_hash) { }
|
|
6147
|
97 |
12 |
unless $len_equals_symbol
|
|
6157
|
0 |
38 |
if (not $len_equals_symbol or $rcol_hash->{'col'} ne $col)
|
|
6160
|
0 |
0 |
if ($rcol_hash->{'max_width'} > $rcol_hash->{'min_width'})
|
|
6178
|
12 |
38 |
if (not defined $rcol_hash) { }
|
|
6180
|
0 |
12 |
unless $len_equals_symbol
|
|
6196
|
9 |
29 |
if ($len_equals_symbol > $rcol_hash->{'max_width'})
|
|
6199
|
4 |
34 |
if ($len_equals_symbol < $rcol_hash->{'min_width'})
|
|
6213
|
12 |
0 |
if ($rcol_hash->{'max_width'} > $rcol_hash->{'min_width'})
|
|
6290
|
49 |
3540 |
if ($leading_space_count > $group_leader_length)
|
|
6298
|
0 |
3589 |
if (@alignments != $maximum_field_index + 1)
|
|
6317
|
3241 |
348 |
if $j == $maximum_field_index and !defined($rfields->[$j]) || $rfield_lengths->[$j] == 0
|
|
6326
|
0 |
5402 |
if ($do_not_align)
|
|
6327
|
0 |
0 |
$j < $maximum_field_index ? :
|
|
6336
|
9 |
5393 |
if ($rOpts_fixed_position_side_comment and $j == $maximum_field_index)
|
|
6340
|
9 |
0 |
if ($newpad >= 0)
|
|
6344
|
1590 |
3812 |
if ($pad > 0)
|
|
6348
|
5391 |
11 |
if ($rfield_lengths->[$j] > 0) { }
|
|
6394
|
0 |
16 |
unless (defined $imax_align)
|
|
6399
|
0 |
16 |
unless @idel
|
|
6411
|
0 |
16 |
if ($imax_align >= 0)
|
|
6510
|
1 |
2216 |
if ($cached_line_type)
|
|
6553
|
162 |
0 |
if ($rvertical_tightness_flags)
|
|
6560
|
93 |
69 |
if (not $cached_line_valid) { }
|
|
|
32 |
37 |
elsif ($cached_line_type == 1 or $cached_line_type == 3) { }
|
|
6578
|
14 |
18 |
if ($cached_line_opening_flag == 1)
|
|
6579
|
0 |
14 |
if (defined $open_or_close and $open_or_close == 1)
|
|
6592
|
0 |
20 |
if ($gap >= 0 and $maximum_line_length != $cached_line_maximum_length || defined $level_end && $level > $level_end)
|
|
6602
|
0 |
0 |
if ($test_line_length > $cached_line_maximum_length - 2)
|
|
6608
|
20 |
12 |
if ($gap >= 0 and defined $seqno_beg) { }
|
|
6637
|
33 |
4 |
if ($seqno_beg and $open_or_close == $cached_line_type || $cached_line_type == 2 && $open_or_close == 4 || !$open_or_close && $cached_line_type == 2 and $test_line_length <= $cached_line_maximum_length) { }
|
|
6691
|
4 |
29 |
if ($str =~ /^\);/ and $cached_line_text =~ /^[\)\}\]\s]*$/)
|
|
6717
|
3 |
1 |
if ($diff > 0 and length $seqno_string and length $last_nonblank_seqno_string == length $seqno_string)
|
|
6725
|
3 |
0 |
if (@seqno_now and @seqno_last and $seqno_now[-1] == $seqno_last[0] and $seqno_now[0] == $seqno_last[-1])
|
|
6735
|
3 |
0 |
if (length $ws == $diff and $ws =~ /^\s+$/)
|
|
6827
|
371 |
8028 |
if ($outdent_long_lines)
|
|
6833
|
11 |
360 |
if ($excess > 0)
|
|
6841
|
4 |
7 |
unless ($outdented_line_count)
|
|
6854
|
4898 |
3501 |
$leading_space_count > 0 ? :
|
|
6884
|
796 |
7603 |
if ($rvertical_tightness_flags)
|
|
6895
|
796 |
7603 |
defined $seqno_end ? :
|
|
6903
|
162 |
8237 |
if (length $cached_line_text)
|
|
6933
|
163 |
8236 |
if ($open_or_close)
|
|
6934
|
0 |
163 |
if ($open_or_close == 3 and not $line =~ /\{\s*$/ or $open_or_close == 4 and not $line =~ /\}\s*$/)
|
|
6944
|
8236 |
163 |
if (not $open_or_close or $side_comment_length > 0 or $is_outdented_line or not $line_length) { }
|
|
7000
|
2 |
2217 |
if (@valign_buffer)
|
|
7016
|
2 |
1 |
if ($valign_buffer_filling and $diff)
|
|
7022
|
7 |
0 |
if (length $ws == $diff and $ws =~ /^\s+$/)
|
|
7025
|
7 |
0 |
if ($leading_space_count >= $diff)
|
|
7057
|
2 |
8344 |
if $seqno_string and $valign_buffer_filling
|
|
7061
|
7 |
8339 |
if ($valign_buffer_filling) { }
|
|
7069
|
398 |
7948 |
if ($seqno_string)
|
|
7076
|
8 |
35 |
if (index($seqno_string, ":") != -1 and $seqno_string =~ /^\d+(\:+\d+)+$/ and not $args_to_D[0] =~ /^[\}\)\]\:\?]/)
|
|
7137
|
0 |
45 |
if (length $line != length($trimmed_line) + $leading_space_count)
|
|
7141
|
0 |
0 |
if ($leading_space_count <= 0)
|
|
7151
|
0 |
0 |
if ($leading_space_count_test < $leading_space_count)
|
|
7168
|
45 |
0 |
if ($rOpts_entab_leading_whitespace) { }
|
|
|
0 |
0 |
elsif ($rOpts_tabs and $level) { }
|
|
7187
|
0 |
0 |
if ($space_count < 0) { }
|
|
7190
|
0 |
0 |
unless ($line =~ /^\s*#/)
|
|
7226
|
45 |
8301 |
if ($require_tabs and $leading_space_count > 0)
|
|
7243
|
2 |
646 |
unless $logger_object
|
|
7246
|
23 |
623 |
if ($outdented_line_count > 0)
|
|
7253
|
7 |
16 |
if ($outdented_line_count > 1)
|