Lines Matching refs:line_nums
778 my @line_nums = sort {$a <=> $b} keys %$src_file_CCs;
796 shift(@line_nums) if (0 == $line_nums[0]);
800 my $n = @line_nums;
803 push(@pairs, $line_nums[$i] - $context); # lower marker
805 $line_nums[$i] + 2*$context >= $line_nums[$i+1]) {
808 push(@pairs, $line_nums[$i] + $context); # upper marker
824 if (defined $line_nums[0] && $. == $line_nums[0]) {
828 shift(@line_nums);
845 if (@line_nums) {
846 foreach my $line_num (@line_nums) {
852 $src_file, \@line_nums);