Do not silently truncate files on perlasm errors

[thirdparty/openssl.git] / crypto / modes / asm / ghashv8-armx.pl

diff --git a/crypto/modes/asm/ghashv8-armx.pl b/crypto/modes/asm/ghashv8-armx.pl
index 47e8820080693f614d63ef777e776cedba02d0e2..bfcd67df35bebdaa447088a3cedf5faad334de27 100644 (file)
--- a/crypto/modes/asm/ghashv8-armx.pl
+++ b/crypto/modes/asm/ghashv8-armx.pl
@@ -778,4 +778,4 @@ if ($flavour =~ /64/) {                     ######## 64-bit code
     }
 }
 
-close STDOUT; # enforce flush
+close STDOUT or die "error closing STDOUT: $!"; # enforce flush