coverity 1462556 Resource leak
[openssl.git] / crypto / pariscid.pl
index 8d21c30dbbc61170cf0802eb1f7924ff51fbe585..bad337545740a4f0273149f4b5ebb85818401e0d 100644 (file)
@@ -1,5 +1,5 @@
 #! /usr/bin/env perl
-# Copyright 2009-2018 The OpenSSL Project Authors. All Rights Reserved.
+# Copyright 2009-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
@@ -275,5 +275,5 @@ foreach(split("\n",$code)) {
 
        print $_,"\n";
 }
-close STDOUT or die "error closing STDOUT";
+close STDOUT or die "error closing STDOUT: $!";