diff options
author | John Crispin <john@openwrt.org> | 2015-11-02 10:17:03 +0000 |
---|---|---|
committer | John Crispin <john@openwrt.org> | 2015-11-02 10:17:03 +0000 |
commit | 0aeb0ae938ee10e238d0898bf0560e6586f9b9f7 (patch) | |
tree | 9de6e6deb8a0b4afcb5ee361dde68911e5851c27 /scripts | |
parent | ed30ca8e39910a7f2036f84f9e5c4254ea703b96 (diff) | |
download | upstream-0aeb0ae938ee10e238d0898bf0560e6586f9b9f7.tar.gz upstream-0aeb0ae938ee10e238d0898bf0560e6586f9b9f7.tar.bz2 upstream-0aeb0ae938ee10e238d0898bf0560e6586f9b9f7.zip |
scripts/checkpatch.pl: Fix deprecation warnings
In perl version v5.22, use of unescaped opening braces is deprecated
Signed-off-by: Javier Domingo Cansino <javierdo1@gmail.com>
SVN-Revision: 47342
Diffstat (limited to 'scripts')
-rwxr-xr-x | scripts/checkpatch.pl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/scripts/checkpatch.pl b/scripts/checkpatch.pl index 5e2c0b9f1c..78053338c0 100755 --- a/scripts/checkpatch.pl +++ b/scripts/checkpatch.pl @@ -2354,8 +2354,8 @@ sub process { # function brace can't be on same line, except for #defines of do while, # or if closed on same line - if (($line=~/$Type\s*$Ident\(.*\).*\s{/) and - !($line=~/\#\s*define.*do\s{/) and !($line=~/}/)) { + if (($line=~/$Type\s*$Ident\(.*\).*\s\{/) and + !($line=~/\#\s*define.*do\s\{/) and !($line=~/}/)) { ERROR("OPEN_BRACE", "open brace '{' following function declarations go on the next line\n" . $herecurr); } @@ -2623,8 +2623,8 @@ sub process { ## } #need space before brace following if, while, etc - if (($line =~ /\(.*\){/ && $line !~ /\($Type\){/) || - $line =~ /do{/) { + if (($line =~ /\(.*\)\{/ && $line !~ /\($Type\)\{/) || + $line =~ /do\{/) { ERROR("SPACING", "space required before the open brace '{'\n" . $herecurr); } @@ -2914,7 +2914,7 @@ sub process { $dstat !~ /^for\s*$Constant$/ && # for (...) $dstat !~ /^for\s*$Constant\s+(?:$Ident|-?$Constant)$/ && # for (...) bar() $dstat !~ /^do\s*{/ && # do {... - $dstat !~ /^\({/) # ({... + $dstat !~ /^\(\{/) # ({... { $ctx =~ s/\n*$//; my $herectx = $here . "\n"; |