mirror of
https://github.com/RPCS3/llvm.git
synced 2024-11-29 14:40:39 +00:00
Fixed some output issues where newlines were not being printed after error messages
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@29082 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
parent
7b4bb60e9a
commit
7267bd6c1a
@ -281,7 +281,7 @@ sub ReadFile {
|
||||
$/ = '\n';
|
||||
return $Ret;
|
||||
} else {
|
||||
print "Could not open file '$_[0]' for reading!";
|
||||
print "Could not open file '$_[0]' for reading!\n";
|
||||
return "";
|
||||
}
|
||||
}
|
||||
@ -289,7 +289,7 @@ sub ReadFile {
|
||||
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
||||
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
||||
sub WriteFile { # (filename, contents)
|
||||
open (FILE, ">$_[0]") or die "Could not open file '$_[0]' for writing!";
|
||||
open (FILE, ">$_[0]") or die "Could not open file '$_[0]' for writing!\n";
|
||||
print FILE $_[1];
|
||||
close FILE;
|
||||
}
|
||||
@ -429,7 +429,8 @@ sub SendData{
|
||||
|
||||
my $sentdata="";
|
||||
foreach $x (keys (%$variables)){
|
||||
$sentdata.= "$x => $hash_of_data{$x}\n";
|
||||
$value = $variables->{$x};
|
||||
$sentdata.= "$x => $value\n";
|
||||
}
|
||||
WriteFile "$Prefix-sentdata.txt", $sentdata;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user