Also check for errors in x86_64-xlate.pl.
[openssl.git] / crypto / ppccpuid.pl
index ea705e3e92b60775b35e25da2ebc3640b0847531..3dbd6dab74c67cb58085c4a1a03bb70f9448cb26 100755 (executable)
@@ -383,4 +383,4 @@ ___
 
 $code =~ s/\`([^\`]*)\`/eval $1/gem;
 print $code;
-close STDOUT or die "error closing STDOUT";
+close STDOUT or die "error closing STDOUT: $!";