[llvm-commits] CVS: llvm/utils/NewNightlyTest.pl
Patrick Jenkins
pjenkins at apple.com
Fri Jul 21 12:51:52 PDT 2006
Changes in directory llvm/utils:
NewNightlyTest.pl updated: 1.20 -> 1.21
---
Log message:
Added code to get .a and .o file sizes and submit them to the server in the nightly report.
---
Diffs of the changes: (+19 -1)
NewNightlyTest.pl | 20 +++++++++++++++++++-
1 files changed, 19 insertions(+), 1 deletion(-)
Index: llvm/utils/NewNightlyTest.pl
diff -u llvm/utils/NewNightlyTest.pl:1.20 llvm/utils/NewNightlyTest.pl:1.21
--- llvm/utils/NewNightlyTest.pl:1.20 Thu Jul 20 20:39:42 2006
+++ llvm/utils/NewNightlyTest.pl Fri Jul 21 14:51:40 2006
@@ -612,6 +612,22 @@
#my $NumLibraries = scalar(grep(!/executable/, @Linked));
#my $NumObjects = `grep ']\: Compiling ' $BuildLog | wc -l` + 0;
+if(!$BuildError){
+ ChangeDir( "$BuildDir", "Build Directory" );
+ $afiles = `find . -iname '*.a' -ls`;
+ $ofiles = `find . -iname '*.o' -ls`;
+ @AFILES = split "\n", $afiles;
+ $a_file_sizes="";
+ foreach $x (@AFILES){
+ $x =~ m/.+\s+.+\s+.+\s+.+\s+.+\s+.+\s+(.+)\s+.+\s+.+\s+.+\s+(.+)/;
+ $a_file_sizes.="$1 $2\n";
+ } @OFILES = split "\n", $ofiles;
+ $o_file_sizes="";
+ foreach $x (@OFILES){
+ $x =~ m/.+\s+.+\s+.+\s+.+\s+.+\s+.+\s+(.+)\s+.+\s+.+\s+.+\s+(.+)/;
+ $o_file_sizes.="$1 $2\n";
+ }
+}
my $ConfigTimeU = GetRegexNum "^user", 0, "([0-9.]+)", "$BuildLog";
my $ConfigTimeS = GetRegexNum "^sys", 0, "([0-9.]+)", "$BuildLog";
@@ -1048,7 +1064,9 @@
'dejagnutests_log' => $dejagnutests_log,
'dejagnutests_sum' => $dejagnutests_sum,
'starttime' => $starttime,
- 'endtime' => $endtime);
+ 'endtime' => $endtime,
+ 'o_file_sizes' => $o_file_sizes,
+ 'a_file_sizes' => $a_file_sizes);
$TESTING = 0;
More information about the llvm-commits
mailing list