Invoke tear_down when exiting test_encode_tls_sct() prematurely
[openssl.git] / crypto / rc4 / asm / rc4-c64xplus.pl
index 0167b05e6a861fde3965fdb2ebaf13b476d0d4d5..bd1745f1f32bbc3572e7e17939a69a07c0803d95 100644 (file)
@@ -1,5 +1,5 @@
 #! /usr/bin/env perl
-# Copyright 2014-2018 The OpenSSL Project Authors. All Rights Reserved.
+# Copyright 2014-2020 The OpenSSL Project Authors. All Rights Reserved.
 #
 # Licensed under the Apache License 2.0 (the "License").  You may not use
 # this file except in compliance with the License.  You can obtain a copy
@@ -188,4 +188,4 @@ ___
 
 $output = pop and open STDOUT,">$output";
 print $code;
-close STDOUT;
+close STDOUT or die "error closing STDOUT: $!";