Do not silently truncate files on perlasm errors

[openssl.git] / crypto / aes / asm / aest4-sparcv9.pl

diff --git a/crypto/aes/asm/aest4-sparcv9.pl b/crypto/aes/asm/aest4-sparcv9.pl
index d34a7ef02a85efc48ae8d60657aed1446f6e4bf6..c9a2ff69d35e96a4db25988c0d280a4431fda456 100644 (file)
--- a/crypto/aes/asm/aest4-sparcv9.pl
+++ b/crypto/aes/asm/aest4-sparcv9.pl
@@ -925,4 +925,4 @@ ___
 
 &emit_assembler();
 
-close STDOUT;
+close STDOUT or die "error closing STDOUT";