Lines Matching refs:lines
1123 my @lines = split('\n', $text);
1125 foreach my $line (@lines) {
1237 my @lines = split("\n", $output);
1239 return ($id, $desc) if ($#lines < 0);
1241 if ($lines[0] =~ /^error: short SHA1 $commit is ambiguous/) {
1251 …} elsif ($lines[0] =~ /^fatal: ambiguous argument '$commit': unknown revision or path not in the w…
1252 $lines[0] =~ /^fatal: bad object $commit/) {
1255 $id = substr($lines[0], 0, 12);
1256 $desc = substr($lines[0], 41);
1266 my @lines = ();
1287 my $lines = `${git_command} log --no-color --no-merges --pretty=format:'%H %s' $git_range`;
1288 foreach my $line (split(/\n/, $lines)) {
1344 @lines = ();
1700 last if (!defined $lines[$line]);
1701 next if ($lines[$line] =~ /^-/);
1704 $blk .= $lines[$line] . "\n";
1898 if ($lines[$line] =~ /^.\s*#\s*(?:ifndef|ifdef|if)\s/) {
1900 } elsif ($lines[$line] =~ /^.\s*#\s*(?:else|elif)\b/) {
1902 } elsif ($lines[$line] =~ /^.\s*#\s*endif\b/) {
1906 foreach my $c (split(//, $lines[$line])) {
2361 my @lines = split("\n", $output, -1);
2362 splice(@lines, 1, 1);
2363 $output = join("\n", @lines);
2409 my @lines = ();
2427 fixup_current_range(\$lines[$range_last_linenr], $delta_offset--, -1);
2431 push(@lines, ${$inserted}{'LINE'});
2434 fixup_current_range(\$lines[$range_last_linenr], $delta_offset++, 1);
2438 push(@lines, $line);
2445 return @lines;
2767 push(@lines, $line);
2788 foreach my $line (@lines) {
3175 if (!defined $lines[$linenr]) {
3189 if (!defined $lines[$linenr]) {
3376 last if ($#lines < $linenr + $n);
3623 while (defined $lines[$ln]) {
3624 my $f = $lines[$ln++];
3883 …if ($line =~ /^\+/ && defined $lines[$linenr] && $lines[$linenr] =~ /^\\ No newline at end of file…
4176 defined $lines[$linenr] &&
4177 $lines[$linenr] !~ /^[ \+]\t{$tabs,$tabs}return/)) {
4233 (!defined $lines[$realline_next - 1] ||
4234 substr($lines[$realline_next - 1], $off_next) =~ /^\s*$/)) {
4331 defined $lines[$ctx_ln - 1] &&
4332 $lines[$ctx_ln - 1] =~ /^-/)) {
4334 $ctx_skip-- if (!defined $lines[$ctx_ln - 1] || $lines[$ctx_ln - 1] !~ /^-/);
4341 if ($ctx !~ /{\s*/ && defined($lines[$ctx_ln - 1]) && $lines[$ctx_ln - 1] =~ /^\+\s*{/) {
4348 defined $lines[$ctx_ln - 1])
4350 my ($nlength, $nindent) = line_stats($lines[$ctx_ln - 1]);
4600 exists $lines[$realline_next - 1] &&
4602 ($lines[$realline_next - 1] =~ /EXPORT_SYMBOL.*\((.*)\)/)) {
5591 $lines[$linenr - 3] =~ /^[ +]/ &&
5592 $lines[$linenr - 3] !~ /^[ +]\s*$Ident\s*:/) {
6419 if ($lines[$linenr - 2] =~ /^\+(\t*)if\s*\(\s*$tested\s*\)\s*$/) {
6424 if ($lines[$linenr - 1] =~ /^\+(\t+)$func\s*\(\s*$tested\s*\)\s*;\s*$/) {
6446 my $testline = $lines[$linenr - 3];
6904 my $fmt = get_quoted_string($lines[$count - 1], raw_line($count, 0));