From: Sylvestre Ledru <sylvestre@debian.org>
Date: Fri, 13 Sep 2019 09:31:19 +0000 (+0000)
Subject: Fix a perl warning: Scalar value @ArgParts[0] better written as $ArgParts[0] at ... 
X-Git-Tag: llvmorg-11-init~9271
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=ea27b932b58cb6cf9d2f1ad1eddd187ee34b9a90;p=platform%2Fupstream%2Fllvm.git

Fix a perl warning: Scalar value @ArgParts[0] better written as $ArgParts[0] at /usr/share/clang/scan-build-10/libexec/ccc-analyzer line 502.

llvm-svn: 371832
---

diff --git a/clang/tools/scan-build/libexec/ccc-analyzer b/clang/tools/scan-build/libexec/ccc-analyzer
index 6d24a1a..800f38b 100755
--- a/clang/tools/scan-build/libexec/ccc-analyzer
+++ b/clang/tools/scan-build/libexec/ccc-analyzer
@@ -499,7 +499,7 @@ my $HasSDK = 0;
 foreach (my $i = 0; $i < scalar(@ARGV); ++$i) {
   my $Arg = $ARGV[$i];
   my @ArgParts = split /=/,$Arg,2;
-  my $ArgKey = @ArgParts[0];
+  my $ArgKey = $ArgParts[0];
 
   # Be friendly to "" in the argument list.
   if (!defined($ArgKey)) {