mirror/openssl
2
0
Fork 0
mirror of https://github.com/openssl/openssl.git synced 2025-04-06 20:20:50 +08:00
Code Issues Packages Projects Releases Wiki Activity

x86gas.pl update.

Browse Source
This commit is contained in:
Andy Polyakov 2008-01-04 22:58:50 +00:00
parent db01bad30f
commit 26e71a1850
1 changed files with 4 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
crypto/perlasm/x86gas.pl
View File

@ -160,9 +160,7 @@ sub ::comment
}
sub ::external_label
{ foreach(@_)
{ push(@out,".extern\t".&::LABEL($_,$nmdecor.$_)."\n"); }
}
{ foreach(@_) { &::LABEL($_,$nmdecor.$_); } }
sub ::public_label
{ push(@out,".globl\t".&::LABEL($_[0],$nmdecor.$_[0])."\n"); }
@ -174,8 +172,7 @@ sub ::file_end
else { push (@out,"$tmp\n"); }
}
if ($::macosx)
{ grep {s/^\.extern\s+.*$//} @out;
if (%non_lazy_ptr)
{ if (%non_lazy_ptr)
{ push(@out,".section __IMPORT,__pointers,non_lazy_symbol_pointers\n");
foreach $i (keys %non_lazy_ptr)
{ push(@out,"$non_lazy_ptr{$i}:\n.indirect_symbol\t$i\n.long\t0\n"); }
@ -214,9 +211,9 @@ sub ::picmeup
$non_lazy_ptr{"$nmdecor$sym"}=$indirect;
}
else
{ &::lea($dst,&::DWP("${nmdecor}_GLOBAL_OFFSET_TABLE_+[.-$reflabel]",
{ &::lea($dst,&::DWP("_GLOBAL_OFFSET_TABLE_+[.-$reflabel]",
$base));
&::mov($dst,&::DWP("$nmdecor$sym\@GOT",$dst));
&::mov($dst,&::DWP("$sym\@GOT",$dst));
}
}
else