Lines Matching refs:lines
607 my @lines = split('\n', $text);
609 foreach my $line (@lines) {
686 my @lines = split("\n", $output);
688 return ($id, $desc) if ($#lines < 0);
690 if ($lines[0] =~ /^error: short SHA1 $commit is ambiguous\./) {
700 …} elsif ($lines[0] =~ /^fatal: ambiguous argument '$commit': unknown revision or path not in the w…
702 $id = substr($lines[0], 0, 12);
703 $desc = substr($lines[0], 41);
712 my @lines = ();
744 @lines = ();
1034 last if (!defined $lines[$line]);
1035 next if ($lines[$line] =~ /^-/);
1038 $blk .= $lines[$line] . "\n";
1232 if ($lines[$line] =~ /^.\s*#\s*(?:ifndef|ifdef|if)\s/) {
1234 } elsif ($lines[$line] =~ /^.\s*#\s*(?:else|elif)\b/) {
1236 } elsif ($lines[$line] =~ /^.\s*#\s*endif\b/) {
1240 foreach my $c (split(//, $lines[$line])) {
1685 my @lines = ();
1703 fixup_current_range(\$lines[$range_last_linenr], $delta_offset--, -1);
1707 push(@lines, ${$inserted}{'LINE'});
1710 fixup_current_range(\$lines[$range_last_linenr], $delta_offset++, 1);
1714 push(@lines, $line);
1721 return @lines;
2005 push(@lines, $line);
2026 foreach my $line (@lines) {
2420 for (; $cnt > 0 && defined $lines[$ln - 1]; $ln++) {
2421 $f = $lines[$ln - 1];
2422 $cnt-- if ($lines[$ln - 1] !~ /^-/);
2423 $is_end = $lines[$ln - 1] =~ /^\+/;
2428 if ($lines[$ln - 1] =~ /^\+\s*(?:bool|tristate)\s*\"/) {
2430 } elsif ($lines[$ln - 1] =~ /^\+\s*(?:---)?help(?:---)?$/) {
2526 …if ($line =~ /^\+/ && defined $lines[$linenr] && $lines[$linenr] =~ /^\\ No newline at end of file…
2750 defined $lines[$linenr] &&
2751 $lines[$linenr] !~ /^[ \+]\t{$tabs,$tabs}return/)) {
2821 (!defined $lines[$realline_next - 1] ||
2822 substr($lines[$realline_next - 1], $off_next) =~ /^\s*$/)) {
2919 defined $lines[$ctx_ln - 1] &&
2920 $lines[$ctx_ln - 1] =~ /^-/)) {
2922 $ctx_skip-- if (!defined $lines[$ctx_ln - 1] || $lines[$ctx_ln - 1] !~ /^-/);
2929 if ($ctx !~ /{\s*/ && defined($lines[$ctx_ln - 1]) && $lines[$ctx_ln - 1] =~ /^\+\s*{/) {
2936 defined $lines[$ctx_ln - 1])
2938 my ($nlength, $nindent) = line_stats($lines[$ctx_ln - 1]);
3130 exists $lines[$realline_next - 1] &&
3132 ($lines[$realline_next - 1] =~ /EXPORT_SYMBOL.*\((.*)\)/ ||
3133 $lines[$realline_next - 1] =~ /EXPORT_UNUSED_SYMBOL.*\((.*)\)/)) {
3358 if ($lines[$ln - 1] =~ m{\bprintk\(}) {
4049 $lines[$linenr - 3] =~ /^[ +]/ &&
4050 $lines[$linenr - 3] !~ /^[ +]\s*$Ident\s*:/) {
4719 my $testline = $lines[$linenr - 3];
5247 my $fline = $lines[$prevline - 1];