Do not silently truncate files on perlasm errors

[openssl.git] / crypto / chacha / asm / chacha-armv8.pl

diff --git a/crypto/chacha/asm/chacha-armv8.pl b/crypto/chacha/asm/chacha-armv8.pl
index 7868389f7166f23bee710dc57404a6cc8999c6ca..466de51867f08eddd5bec60efe12efe145357248 100755 (executable)
--- a/crypto/chacha/asm/chacha-armv8.pl
+++ b/crypto/chacha/asm/chacha-armv8.pl
@@ -1289,4 +1289,4 @@ foreach (split("\n",$code)) {
 
        print $_,"\n";
 }
-close STDOUT;  # flush
+close STDOUT or die "error closing STDOUT";    # flush