generic-library/openssl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix bug in x86unix.pl introduced in latest update.

Browse Source 
PR: 1380
This commit is contained in:
Andy Polyakov 2006-08-31 21:12:17 +00:00
parent 0fca32a7aa
commit 2f35ae90fe
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
crypto/perlasm/x86unix.pl
View File

@ -699,7 +699,7 @@ sub popvars
sub main'picmeup sub main'picmeup
{ {
local($dst,$sym,$base,$label)=@_; local($dst,$sym,$base,$reflabel)=@_;
if ($main'cpp) if ($main'cpp)
{ {
@ -720,7 +720,7 @@ ___
else { else {
$tmp=<<___; $tmp=<<___;
#if (defined(ELF) || defined(SOL)) && defined(PIC) #if (defined(ELF) || defined(SOL)) && defined(PIC)
leal _GLOBAL_OFFSET_TABLE_+[.-$label]($regs{$base}),$regs{$dst} leal _GLOBAL_OFFSET_TABLE_+[.-$reflabel]($regs{$base}),$regs{$dst}
movl $sym\@GOT($regs{$dst}),$regs{$dst} movl $sym\@GOT($regs{$dst}),$regs{$dst}
#else #else
leal $sym,$regs{$dst} leal $sym,$regs{$dst}
@ -741,7 +741,7 @@ ___
} }
else { else {
&main'lea($dst,&main'DWP( &main'lea($dst,&main'DWP(
"${under}_GLOBAL_OFFSET_TABLE_+[.-$label]", "${under}_GLOBAL_OFFSET_TABLE_+[.-$reflabel]",
$base)); $base));
} }
&main'mov($dst,&main'DWP($under.$sym."\@GOT",$dst)); &main'mov($dst,&main'DWP($under.$sym."\@GOT",$dst));