diff options
Diffstat (limited to 'lib/libssl/src/crypto/perlasm/ppc-xlate.pl')
| -rwxr-xr-x | lib/libssl/src/crypto/perlasm/ppc-xlate.pl | 13 |
1 files changed, 3 insertions, 10 deletions
diff --git a/lib/libssl/src/crypto/perlasm/ppc-xlate.pl b/lib/libssl/src/crypto/perlasm/ppc-xlate.pl index a3edd982b66..4579671c970 100755 --- a/lib/libssl/src/crypto/perlasm/ppc-xlate.pl +++ b/lib/libssl/src/crypto/perlasm/ppc-xlate.pl @@ -31,9 +31,10 @@ my $globl = sub { $ret .= ".type $name,\@function"; last; }; - /linux.*64/ && do { $ret .= ".globl $name\n"; - $ret .= ".type $name,\@function\n"; + /linux.*64/ && do { $ret .= ".globl .$name\n"; + $ret .= ".type .$name,\@function\n"; $ret .= ".section \".opd\",\"aw\"\n"; + $ret .= ".globl $name\n"; $ret .= ".align 3\n"; $ret .= "$name:\n"; $ret .= ".quad .$name,.TOC.\@tocbase,0\n"; @@ -61,14 +62,6 @@ my $machine = sub { } ".machine $arch"; }; -my $size = sub { - if ($flavour =~ /linux.*32/) - { shift; - ".size " . join(",",@_); - } - else - { ""; } -}; my $asciz = sub { shift; my $line = join(",",@_); |