mirror of
https://github.com/curl/curl.git
synced 2026-05-30 05:47:28 +03:00
tidy-up: miscellaneous
- vms/curlmsg_vms.h: delete unused/commented code. - vtls/schannel_verify: sort includes. - typecheck-gcc.h: fix indent and alignment. - lib/config-win32.h: drop idle `#undef`. - spacecheck: check for stray empty lines before after curly braces. - make literals more readable: 1048576 -> 1024 * 1024 - scope variables. - use ISO date in a comment. - drop redundant parentheses. - drop empty comments. - unfold lines. - duplicate/stray spaces in comments. - fix indent, whitespace, minor typos. Closes #20690
This commit is contained in:
parent
ac46392f44
commit
af78b199b2
89 changed files with 424 additions and 448 deletions
|
|
@ -1230,7 +1230,6 @@ sub scanfile {
|
|||
checksrc_endoffile($file);
|
||||
|
||||
close($R);
|
||||
|
||||
}
|
||||
|
||||
if($errors || $warnings || $verbose) {
|
||||
|
|
|
|||
|
|
@ -529,7 +529,6 @@ sub render {
|
|||
my $qstr = $quote ? "q" : "";
|
||||
push @desc, "[".(1 + $level)."$qstr]$d" if(!$manpage);
|
||||
$header = 0;
|
||||
|
||||
}
|
||||
if($finalblank) {
|
||||
print STDERR "$f:$line:1:ERROR: trailing blank line\n";
|
||||
|
|
|
|||
|
|
@ -180,6 +180,26 @@ while(my $filename = <$git_ls_files>) {
|
|||
$linepos += $line;
|
||||
}
|
||||
|
||||
$search = $content;
|
||||
$linepos = 0;
|
||||
while($search =~ /\n\n *}\n/) {
|
||||
my $part = substr($search, 0, $+[0] - 1);
|
||||
$search = substr($search, $+[0]);
|
||||
my $line = ($part =~ tr/\n//);
|
||||
push @err, sprintf("line %d: '}' preceded by empty line", $linepos + $line);
|
||||
$linepos += $line + 1;
|
||||
}
|
||||
|
||||
$search = $content;
|
||||
$linepos = 0;
|
||||
while($search =~ /\n\{\n\n/) {
|
||||
my $part = substr($search, 0, $+[0]);
|
||||
$search = substr($search, $+[0]);
|
||||
my $line = ($part =~ tr/\n//);
|
||||
push @err, sprintf("line %d: top-level '{' followed by empty line", $linepos + $line);
|
||||
$linepos += $line;
|
||||
}
|
||||
|
||||
if($content =~ /([\x00-\x08\x0b\x0c\x0e-\x1f\x7f])/) {
|
||||
push @err, "content: has binary contents";
|
||||
}
|
||||
|
|
|
|||
|
|
@ -111,7 +111,6 @@ for my $l (@output) {
|
|||
$alllines += $len;
|
||||
$allscore += ($len * $score);
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
my $showncutoff;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue