mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2025-03-13 08:35:46 +00:00
NNT: Always create the -sentdata.txt file.
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@91301 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
parent
e2f65ee4b1
commit
1b54d423aa
@ -393,10 +393,8 @@ sub CopyFile { #filename, newfile
|
||||
# to our central server via the post method
|
||||
#
|
||||
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
||||
sub SendData {
|
||||
$host = $_[0];
|
||||
$file = $_[1];
|
||||
$variables = $_[2];
|
||||
sub WriteSentData {
|
||||
$variables = $_[0];
|
||||
|
||||
# Write out the "...-sentdata.txt" file.
|
||||
|
||||
@ -406,6 +404,12 @@ sub SendData {
|
||||
$sentdata.= "$x => $value\n";
|
||||
}
|
||||
WriteFile "$Prefix-sentdata.txt", $sentdata;
|
||||
}
|
||||
|
||||
sub SendData {
|
||||
$host = $_[0];
|
||||
$file = $_[1];
|
||||
$variables = $_[2];
|
||||
|
||||
if (!($SUBMITAUX eq "")) {
|
||||
system "$SUBMITAUX \"$Prefix-sentdata.txt\"";
|
||||
@ -797,6 +801,9 @@ my %hash_of_data = (
|
||||
'a_file_sizes' => ""
|
||||
);
|
||||
|
||||
# Write out the "...-sentdata.txt" file.
|
||||
WriteSentData \%hash_of_data;
|
||||
|
||||
if ($SUBMIT || !($SUBMITAUX eq "")) {
|
||||
my $response = SendData $SUBMITSERVER,$SUBMITSCRIPT,\%hash_of_data;
|
||||
if( $VERBOSE) { print "============================\n$response"; }
|
||||
|
Loading…
x
Reference in New Issue
Block a user