Lines Matching full:lines

444 my @lines = ();
497 		@lines = ();
527 		@lines = ();
725 				last if (!defined $lines[$line]);
726 				next if ($lines[$line] =~ /^-/);
729 				$blk .= $lines[$line] . "\n";
825 	# Strip the diff line prefixes and rip blank lines at start and end.
912 		if ($lines[$line] =~ /^.\s*#\s*(?:ifndef|ifdef|if)\s/) {
914 		} elsif ($lines[$line] =~ /^.\s*#\s*(?:else|elif)\b/) {
916 		} elsif ($lines[$line] =~ /^.\s*#\s*endif\b/) {
920 		foreach my $c (split(//, $lines[$line])) {
1540 	my $in_commit_log = 0;		#Scanning lines before patch
1572 	# Pre-scan the patch sanitizing the lines.
1625 			# simplify matching -- only bother with positive lines.
1628 		push(@lines, $line);
1644 	foreach my $line (@lines) {
1669 # blank context lines so we need to count that too.
1735 			# lines, so trigger actions now
1896 # ignore non-hunk lines and lines being removed
1935 			      "empty lines with exactly 4 columns of " .
1985 # check for adding lines without a newline.
1986 …if ($line =~ /^\+/ && defined $lines[$linenr] && $lines[$linenr] =~ /^\\ No newline at end of file…
2020 # Block comments use * on subsequent lines
2026 			WARN("Block comments use * on subsequent lines\n" . $hereprev);
2029 # Block comments use */ on trailing lines
2072 			    (!defined $lines[$realline_next - 1] ||
2073 			     substr($lines[$realline_next - 1], $off_next) =~ /^\s*$/)) {
2163 					defined $lines[$ctx_ln - 1] &&
2164 					$lines[$ctx_ln - 1] =~ /^-/)) {
2166 				$ctx_skip-- if (!defined $lines[$ctx_ln - 1] || $lines[$ctx_ln - 1] !~ /^-/);
2171 			#print "pre<$pre_ctx>\nline<$line>\nctx<$ctx>\nnext<$lines[$ctx_ln - 1]>\n";
2178 			    defined($lines[$ctx_ln - 1]) && $lines[$ctx_ln - 1] =~ /^\+\s*\{/ &&
2179 			    defined($lines[$ctx_ln - 2]) && length($lines[$ctx_ln - 2]) < 80) {
2185 			    defined $lines[$ctx_ln - 1])
2187 				my ($nlength, $nindent) = line_stats($lines[$ctx_ln - 1]);
2256 				#  1) blank lines, they should be at 0,
2257 				#  2) preprocessor lines, and
2273 			# Check if either of these lines are modified, else
2291 		# Track the 'values' across context and added lines.
2304 #ignore lines not being added
2838 			ERROR("Whitespace after \\ makes next lines useless\n" . $herecurr);
2855 			while ($cnt > 0 && defined $lines[$ln - 1] &&
2856 				$lines[$ln - 1] =~ /^(?:-|..*\\$)/)
2859 				$cnt-- if ($lines[$ln - 1] !~ /^-/);
2867 			#print "LINE<$lines[$ln-1]> len<" . length($lines[$ln-1]) . "\n";
2873 				#print "ADDING cnt<$cnt> $off <" . substr($lines[$ln - 1], $off) . "> rest<$rest>\n";
2874 				if ($off != 0 || $lines[$ln - 1] !~ /^-/) {
2875 					$rest .= substr($lines[$ln - 1], $off) . "\n";
2996                                             print "APW: ALLOWED: lines block<$block>\n"
3044                             print "APW: ALLOWED: lines block<$block>\n"
3283 		# over multiple lines.
3392 			"$cnt_lines lines checked\n";