Do not silently truncate files on perlasm errors

[oweals/openssl.git] / crypto / bn / asm / rsaz-avx2.pl

diff --git a/crypto/bn/asm/rsaz-avx2.pl b/crypto/bn/asm/rsaz-avx2.pl
index b68a8d61c7611de4cd9b3625b6ef18941065fa09..e0332426a96f0a2065a004fb0b46481d387f80d6 100755 (executable)
--- a/crypto/bn/asm/rsaz-avx2.pl
+++ b/crypto/bn/asm/rsaz-avx2.pl
@@ -1981,4 +1981,4 @@ rsaz_1024_gather5_avx2:
 ___
 }}}
 
-close STDOUT;
+close STDOUT or die "error closing STDOUT";