Also check for errors in x86_64-xlate.pl.

[openssl.git] / crypto / perlasm / arm-xlate.pl

diff --git a/crypto/perlasm/arm-xlate.pl b/crypto/perlasm/arm-xlate.pl
index bee0523fefb21c3876ea49c6d9523a8e4998264c..b7ee99ee94bed930d601cdb5ca7160bd4d4f5c30 100755 (executable)
--- a/crypto/perlasm/arm-xlate.pl
+++ b/crypto/perlasm/arm-xlate.pl
@@ -191,4 +191,4 @@ while(my $line=<>) {
     print "\n";
 }
 
-close STDOUT or die "error closing STDOUT";
+close STDOUT or die "error closing STDOUT: $!";