зеркало из https://github.com/microsoft/clang.git
Use the same 'cc' for generated preprocessed crash files as we do for compilation.
git-svn-id: https://llvm.org/svn/llvm-project/cfe/trunk@55326 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
Родитель
5a4ddaf39a
Коммит
2ec5cd5535
|
@ -17,6 +17,9 @@ use warnings;
|
||||||
use Cwd;
|
use Cwd;
|
||||||
use File::Temp qw/ tempfile /;
|
use File::Temp qw/ tempfile /;
|
||||||
use File::Path qw / mkpath /;
|
use File::Path qw / mkpath /;
|
||||||
|
|
||||||
|
my $CC = $ENV{'CCC_CC'};
|
||||||
|
if (!defined $CC) { $CC = "gcc"; }
|
||||||
|
|
||||||
##----------------------------------------------------------------------------##
|
##----------------------------------------------------------------------------##
|
||||||
# Process Clang Crashes.
|
# Process Clang Crashes.
|
||||||
|
@ -36,7 +39,7 @@ sub ProcessClangFailure {
|
||||||
SUFFIX => GetPPExt($Lang),
|
SUFFIX => GetPPExt($Lang),
|
||||||
DIR => $Dir);
|
DIR => $Dir);
|
||||||
|
|
||||||
system "gcc", @$Args, "-E", "-o", $PPFile;
|
system $CC, @$Args, "-E", "-o", $PPFile;
|
||||||
close ($PPH);
|
close ($PPH);
|
||||||
open (OUT, ">", "$PPFile.info") or die "Cannot open $PPFile.info\n";
|
open (OUT, ">", "$PPFile.info") or die "Cannot open $PPFile.info\n";
|
||||||
print OUT "$file\n";
|
print OUT "$file\n";
|
||||||
|
@ -184,8 +187,6 @@ my $Lang;
|
||||||
my $Output;
|
my $Output;
|
||||||
|
|
||||||
# Forward arguments to gcc.
|
# Forward arguments to gcc.
|
||||||
my $CC = $ENV{'CCC_CC'};
|
|
||||||
if (!defined $CC) { $CC = "gcc"; }
|
|
||||||
my $Status = system($CC,@ARGV);
|
my $Status = system($CC,@ARGV);
|
||||||
if ($Status) { exit($Status >> 8); }
|
if ($Status) { exit($Status >> 8); }
|
||||||
|
|
||||||
|
|
Загрузка…
Ссылка в новой задаче