mirror of
https://github.com/openssl/openssl.git
synced 2024-11-21 01:15:20 +08:00
perlasm/x86_64-xlate.pl: handle binary constants early.
Not all assemblers of "gas" flavour handle binary constants, e.g. seasoned MacOS Xcode doesn't, so give them a hand. Reviewed-by: Rich Salz <rsalz@openssl.org> Reviewed-by: Viktor Dukhovni <viktor@openssl.org>
This commit is contained in:
parent
a193388811
commit
6e42e3ff9c
@ -195,6 +195,7 @@ my %globals;
|
||||
sub out {
|
||||
my $self = shift;
|
||||
|
||||
$self->{value} =~ s/\b(0b[0-1]+)/oct($1)/eig;
|
||||
if ($gas) {
|
||||
# Solaris /usr/ccs/bin/as can't handle multiplications
|
||||
# in $self->{value}
|
||||
@ -205,7 +206,6 @@ my %globals;
|
||||
}
|
||||
sprintf "\$%s",$self->{value};
|
||||
} else {
|
||||
$self->{value} =~ s/(0b[0-1]+)/oct($1)/eig;
|
||||
$self->{value} =~ s/0x([0-9a-f]+)/0$1h/ig if ($masm);
|
||||
sprintf "%s",$self->{value};
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user