6502/llvm-6502
1
0
Fork 0
mirror of https://github.com/c64scene-ar/llvm-6502.git synced 2025-08-14 15:28:20 +00:00
Code Issues Projects Releases Wiki Activity

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

Browse Source 
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@29251 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
Patrick Jenkins
2006-07-21 21:43:09 +00:00
parent cd4317efcf
commit b67e118545
1 changed files with 6 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
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"`;
############################################################## ##############################################################