X-Git-Url: https://git.openssl.org/?a=blobdiff_plain;f=crypto%2Fsha%2Fasm%2Fsha512p8-ppc.pl;fp=crypto%2Fsha%2Fasm%2Fsha512p8-ppc.pl;h=82610e2cd2cf196e811ff7876fcc18307bae73fe;hb=a21314dbbc56cd30580123d74b3106a628540965;hp=ea3d308373722a8698ae4a6956cbf42d02fb848c;hpb=0eb154663478968137112441d16b593fdf2ebcf8;p=openssl.git

diff --git a/crypto/sha/asm/sha512p8-ppc.pl b/crypto/sha/asm/sha512p8-ppc.pl
index ea3d308373..82610e2cd2 100755
--- a/crypto/sha/asm/sha512p8-ppc.pl
+++ b/crypto/sha/asm/sha512p8-ppc.pl
@@ -420,4 +420,4 @@ ___
 
 $code =~ s/\`([^\`]*)\`/eval $1/gem;
 print $code;
-close STDOUT or die "error closing STDOUT";
+close STDOUT or die "error closing STDOUT: $!";