diff options
author | Andy Polyakov <appro@openssl.org> | 2006-08-31 21:12:17 +0000 |
---|---|---|
committer | Andy Polyakov <appro@openssl.org> | 2006-08-31 21:12:17 +0000 |
commit | 2f35ae90fe6a7320c495a9f54ce0744f2a6928b7 (patch) | |
tree | 6c7f4bec74e72e1752f04d355da853e414576f19 /crypto/perlasm | |
parent | 0fca32a7aa796534dff681af8dafefcd416c8e11 (diff) | |
download | openssl-2f35ae90fe6a7320c495a9f54ce0744f2a6928b7.tar.gz |
Fix bug in x86unix.pl introduced in latest update.
PR: 1380
Diffstat (limited to 'crypto/perlasm')
-rw-r--r-- | crypto/perlasm/x86unix.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/crypto/perlasm/x86unix.pl b/crypto/perlasm/x86unix.pl index 6b90848497..72b2c7b1a8 100644 --- a/crypto/perlasm/x86unix.pl +++ b/crypto/perlasm/x86unix.pl @@ -699,7 +699,7 @@ sub popvars sub main'picmeup { - local($dst,$sym,$base,$label)=@_; + local($dst,$sym,$base,$reflabel)=@_; if ($main'cpp) { @@ -720,7 +720,7 @@ ___ else { $tmp=<<___; #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} #else leal $sym,$regs{$dst} @@ -741,7 +741,7 @@ ___ } else { &main'lea($dst,&main'DWP( - "${under}_GLOBAL_OFFSET_TABLE_+[.-$label]", + "${under}_GLOBAL_OFFSET_TABLE_+[.-$reflabel]", $base)); } &main'mov($dst,&main'DWP($under.$sym."\@GOT",$dst)); |