Do not silently truncate files on perlasm errors

[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 aa5251df9fcd51538159a18f8f63b362d0545c95..5618410a3d6736269e2f88ef6fb5b09f1c28522b 100644 (file)
--- a/crypto/modes/asm/ghashv8-armx.pl
+++ b/crypto/modes/asm/ghashv8-armx.pl
@@ -794,4 +794,4 @@ if ($flavour =~ /64/) {                     ######## 64-bit code
     }
 }
 
-close STDOUT; # enforce flush
+close STDOUT or die "error closing STDOUT"; # enforce flush