mirror of https://gitee.com/openkylin/qemu.git
checkpatch: fix incompatibility with old perl
Do not use '/r' modifier which was introduced in perl 5.14. Signed-off-by: Vladimir Sementsov-Ogievskiy <vsementsov@virtuozzo.com> Reviewed-by: Daniel P. Berrange <berrange@redhat.com> Fixes: 3e5875afc0f ("checkpatch: check trace-events code style") Tested-by: Alex Williamson <alex.williamson@redhat.com> Message-id: 20171004154420.34596-1-vsementsov@virtuozzo.com Signed-off-by: Stefan Hajnoczi <stefanha@redhat.com>
This commit is contained in:
parent
5456c6a4ec
commit
45042732f3
|
@ -1432,7 +1432,8 @@ sub process {
|
|||
qr/%[-+ *.0-9]*([hljztL]|ll|hh)?(x|X|"\s*PRI[xX][^"]*"?)/;
|
||||
|
||||
# don't consider groups splitted by [.:/ ], like 2A.20:12ab
|
||||
my $tmpline = $rawline =~ s/($hex[.:\/ ])+$hex//gr;
|
||||
my $tmpline = $rawline;
|
||||
$tmpline =~ s/($hex[.:\/ ])+$hex//g;
|
||||
|
||||
if ($tmpline =~ /(?<!0x)$hex/) {
|
||||
ERROR("Hex numbers must be prefixed with '0x'\n" .
|
||||
|
|
Loading…
Reference in New Issue