Fix engine/asm/e_padlock-x86.pl for newer semantics

[openssl.git] / engines / asm / e_padlock-x86.pl

diff --git a/engines/asm/e_padlock-x86.pl b/engines/asm/e_padlock-x86.pl
index 4148468c41de695751e8731369a948dff171c1ca..1a22dc88e48cc1d0ec19d8f68f20987792adf903 100644 (file)
--- a/engines/asm/e_padlock-x86.pl
+++ b/engines/asm/e_padlock-x86.pl
@@ -35,6 +35,9 @@ $0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1;
 push(@INC,"${dir}","${dir}../../crypto/perlasm");
 require "x86asm.pl";
 
+$output=pop;
+open STDOUT,">$output";
+
 &asm_init($ARGV[0],$0);
 
 %PADLOCK_PREFETCH=(ecb=>128, cbc=>64); # prefetch errata
@@ -604,3 +607,5 @@ my ($mode,$opcode) = @_;
 &data_word(0);
 
 &asm_finish();
+
+close STDOUT;