From: Anton Yartsev <anton.yartsev@gmail.com>
Date: Thu, 23 Jan 2014 14:12:48 +0000 (+0000)
Subject: [analyzer] Strip trailing whitespace characters from input.
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=7950014000af728b6dbd0c0be2668b926fe86c0b;p=clang

[analyzer] Strip trailing whitespace characters from input.

More universal way of removing trailing whitespace characters then 'chomp' does. Chomp "removes any trailing string that corresponds to the current value of $/" (quote from perldoc). In my case an input ended with '\r\r\n', chomp left '\r' at the end of input and the script ended up with an error "Use of uninitialized value in concatenation (.) or string"

git-svn-id: https://llvm.org/svn/llvm-project/cfe/trunk@199892 91177308-0d34-0410-b5e6-96231b3b80d8
---

diff --git a/tools/scan-build/ccc-analyzer b/tools/scan-build/ccc-analyzer
index 220452f0d0..1522af824d 100755
--- a/tools/scan-build/ccc-analyzer
+++ b/tools/scan-build/ccc-analyzer
@@ -158,9 +158,8 @@ sub GetCCArgs {
   close(FROM_CHILD);
   
   die "could not find clang line\n" if (!defined $line);
-  # Strip the newline and initial whitspace
-  chomp $line;
-  $line =~ s/^\s+//;
+  # Strip leading and trailing whitespace characters.
+  $line =~ s/^\s+|\s+$//g;
   my @items = quotewords('\s+', 0, $line);
   my $cmd = shift @items;
   die "cannot find 'clang' in 'clang' command\n" if (!($cmd =~ /clang/));