mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2025-07-04 02:24:29 +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:
@ -393,10 +393,8 @@ sub CopyFile { #filename, newfile
|
|||||||
# to our central server via the post method
|
# to our central server via the post method
|
||||||
#
|
#
|
||||||
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
||||||
sub SendData {
|
sub WriteSentData {
|
||||||
$host = $_[0];
|
$variables = $_[0];
|
||||||
$file = $_[1];
|
|
||||||
$variables = $_[2];
|
|
||||||
|
|
||||||
# Write out the "...-sentdata.txt" file.
|
# Write out the "...-sentdata.txt" file.
|
||||||
|
|
||||||
@ -406,6 +404,12 @@ sub SendData {
|
|||||||
$sentdata.= "$x => $value\n";
|
$sentdata.= "$x => $value\n";
|
||||||
}
|
}
|
||||||
WriteFile "$Prefix-sentdata.txt", $sentdata;
|
WriteFile "$Prefix-sentdata.txt", $sentdata;
|
||||||
|
}
|
||||||
|
|
||||||
|
sub SendData {
|
||||||
|
$host = $_[0];
|
||||||
|
$file = $_[1];
|
||||||
|
$variables = $_[2];
|
||||||
|
|
||||||
if (!($SUBMITAUX eq "")) {
|
if (!($SUBMITAUX eq "")) {
|
||||||
system "$SUBMITAUX \"$Prefix-sentdata.txt\"";
|
system "$SUBMITAUX \"$Prefix-sentdata.txt\"";
|
||||||
@ -797,6 +801,9 @@ my %hash_of_data = (
|
|||||||
'a_file_sizes' => ""
|
'a_file_sizes' => ""
|
||||||
);
|
);
|
||||||
|
|
||||||
|
# Write out the "...-sentdata.txt" file.
|
||||||
|
WriteSentData \%hash_of_data;
|
||||||
|
|
||||||
if ($SUBMIT || !($SUBMITAUX eq "")) {
|
if ($SUBMIT || !($SUBMITAUX eq "")) {
|
||||||
my $response = SendData $SUBMITSERVER,$SUBMITSCRIPT,\%hash_of_data;
|
my $response = SendData $SUBMITSERVER,$SUBMITSCRIPT,\%hash_of_data;
|
||||||
if( $VERBOSE) { print "============================\n$response"; }
|
if( $VERBOSE) { print "============================\n$response"; }
|
||||||
|
Reference in New Issue
Block a user