OSchip
/
llvm-project
mirror of https://github.com/THU-DSP-LAB/llvm-project.git
13
0
Fork 6
Code Issues Packages Projects Releases Wiki Activity

Fixed an issue of variable scope that prevented file size from being submitted to the server. 

llvm-svn: 29251
This commit is contained in:
Patrick Jenkins 2006-07-21 21:43:09 +00:00
parent 4b49c23571
commit 7ef934f6ab
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
llvm/utils/NewNightlyTest.pl
View File

@ -1,5 +1,4 @@
#!/usr/bin/perl #!/usr/bin/perl
use POSIX qw(strftime); use POSIX qw(strftime);
use File::Copy; use File::Copy;
use Socket; use Socket;
@ -455,7 +454,7 @@ sub SendData{
# Getting Start timestamp # Getting Start timestamp
# #
############################################################## ##############################################################
$starttime = `date`; $starttime = `date "+20%y-%m-%d %H:%M:%S"`;
############################################################## ##############################################################
# #
@ -612,6 +611,8 @@ if (!$NOCHECKOUT && !$NOBUILD) {
#my $NumLibraries = scalar(grep(!/executable/, @Linked)); #my $NumLibraries = scalar(grep(!/executable/, @Linked));
#my $NumObjects = `grep ']\: Compiling ' $BuildLog | wc -l` + 0; #my $NumObjects = `grep ']\: Compiling ' $BuildLog | wc -l` + 0;
my $a_file_sizes="";
my $o_file_sizes="";
if(!$BuildError){ if(!$BuildError){
ChangeDir( "$BuildDir", "Build Directory" ); ChangeDir( "$BuildDir", "Build Directory" );
$afiles = `find . -iname '*.a' -ls`; $afiles = `find . -iname '*.a' -ls`;
@ -621,7 +622,8 @@ if(!$BuildError){
foreach $x (@AFILES){ foreach $x (@AFILES){
$x =~ m/.+\s+.+\s+.+\s+.+\s+.+\s+.+\s+(.+)\s+.+\s+.+\s+.+\s+(.+)/; $x =~ m/.+\s+.+\s+.+\s+.+\s+.+\s+.+\s+(.+)\s+.+\s+.+\s+.+\s+(.+)/;
$a_file_sizes.="$1 $2\n"; $a_file_sizes.="$1 $2\n";
} @OFILES = split "\n", $ofiles; }
@OFILES = split "\n", $ofiles;
$o_file_sizes=""; $o_file_sizes="";
foreach $x (@OFILES){ foreach $x (@OFILES){
$x =~ m/.+\s+.+\s+.+\s+.+\s+.+\s+.+\s+(.+)\s+.+\s+.+\s+.+\s+(.+)/; $x =~ m/.+\s+.+\s+.+\s+.+\s+.+\s+.+\s+(.+)\s+.+\s+.+\s+.+\s+(.+)/;
@ -960,7 +962,7 @@ if (!$BuildError) {
# Getting end timestamp # Getting end timestamp
# #
############################################################## ##############################################################
$endtime = `date`; $endtime = `date "+20%y-%m-%d %H:%M:%S"`;
############################################################## ##############################################################