Do not silently truncate files on perlasm errors

[thirdparty/openssl.git] / crypto / ec / asm / ecp_nistz256-avx2.pl

diff --git a/crypto/ec/asm/ecp_nistz256-avx2.pl b/crypto/ec/asm/ecp_nistz256-avx2.pl
index 669eb560254fa08442e1aed755e6ba0add7f4036..8c04b0e9246d6f6561b5d42d6033907a5c52eb79 100755 (executable)
--- a/crypto/ec/asm/ecp_nistz256-avx2.pl
+++ b/crypto/ec/asm/ecp_nistz256-avx2.pl
@@ -2079,4 +2079,4 @@ foreach (split("\n",$code)) {
        print $_,"\n";
 }
 
-close STDOUT;
+close STDOUT or die "error closing STDOUT";