Lines Matching refs:lines
1135 my @lines = split('\n', $text);
1137 foreach my $line (@lines) {
1249 my @lines = split("\n", $output);
1251 return ($id, $desc) if ($#lines < 0);
1253 if ($lines[0] =~ /^error: short SHA1 $commit is ambiguous/) {
1263 …} elsif ($lines[0] =~ /^fatal: ambiguous argument '$commit': unknown revision or path not in the w…
1264 $lines[0] =~ /^fatal: bad object $commit/) {
1267 $id = substr($lines[0], 0, 12);
1268 $desc = substr($lines[0], 41);
1278 my @lines = ();
1299 my $lines = `${git_command} log --no-color --no-merges --pretty=format:'%H %s' $git_range`;
1300 foreach my $line (split(/\n/, $lines)) {
1356 @lines = ();
1712 last if (!defined $lines[$line]);
1713 next if ($lines[$line] =~ /^-/);
1716 $blk .= $lines[$line] . "\n";
1910 if ($lines[$line] =~ /^.\s*#\s*(?:ifndef|ifdef|if)\s/) {
1912 } elsif ($lines[$line] =~ /^.\s*#\s*(?:else|elif)\b/) {
1914 } elsif ($lines[$line] =~ /^.\s*#\s*endif\b/) {
1918 foreach my $c (split(//, $lines[$line])) {
2373 my @lines = split("\n", $output, -1);
2374 splice(@lines, 1, 1);
2375 $output = join("\n", @lines);
2421 my @lines = ();
2439 fixup_current_range(\$lines[$range_last_linenr], $delta_offset--, -1);
2443 push(@lines, ${$inserted}{'LINE'});
2446 fixup_current_range(\$lines[$range_last_linenr], $delta_offset++, 1);
2450 push(@lines, $line);
2457 return @lines;
2779 push(@lines, $line);
2800 foreach my $line (@lines) {
3187 if (!defined $lines[$linenr]) {
3201 if (!defined $lines[$linenr]) {
3388 last if ($#lines < $linenr + $n);
3636 while (defined $lines[$ln]) {
3637 my $f = $lines[$ln++];
3894 …if ($line =~ /^\+/ && defined $lines[$linenr] && $lines[$linenr] =~ /^\\ No newline at end of file…
4187 defined $lines[$linenr] &&
4188 $lines[$linenr] !~ /^[ \+]\t{$tabs,$tabs}return/)) {
4244 (!defined $lines[$realline_next - 1] ||
4245 substr($lines[$realline_next - 1], $off_next) =~ /^\s*$/)) {
4342 defined $lines[$ctx_ln - 1] &&
4343 $lines[$ctx_ln - 1] =~ /^-/)) {
4345 $ctx_skip-- if (!defined $lines[$ctx_ln - 1] || $lines[$ctx_ln - 1] !~ /^-/);
4352 if ($ctx !~ /{\s*/ && defined($lines[$ctx_ln - 1]) && $lines[$ctx_ln - 1] =~ /^\+\s*{/) {
4359 defined $lines[$ctx_ln - 1])
4361 my ($nlength, $nindent) = line_stats($lines[$ctx_ln - 1]);
4611 exists $lines[$realline_next - 1] &&
4613 ($lines[$realline_next - 1] =~ /EXPORT_SYMBOL.*\((.*)\)/)) {
5602 $lines[$linenr - 3] =~ /^[ +]/ &&
5603 $lines[$linenr - 3] !~ /^[ +]\s*$Ident\s*:/) {
6435 if ($lines[$linenr - 2] =~ /^\+(\t*)if\s*\(\s*$tested\s*\)\s*$/) {
6440 if ($lines[$linenr - 1] =~ /^\+(\t+)$func\s*\(\s*$tested\s*\)\s*;\s*$/) {
6462 my $testline = $lines[$linenr - 3];
6920 my $fmt = get_quoted_string($lines[$count - 1], raw_line($count, 0));