diff options
| author | Kyungwook Tak <k.tak@samsung.com> | 2016-07-28 11:32:16 +0900 |
|---|---|---|
| committer | Kyungwook Tak <k.tak@samsung.com> | 2016-07-28 11:32:31 +0900 |
| commit | e541e124ee3ee2657cc49f107c74f6882029f74c (patch) | |
| tree | e9f5a5ee915f137f2a4f188b0a047ad5354d47c2 /crypto/perlasm/x86_64-xlate.pl | |
| parent | f7c7a1e422ab564e8edea168476eb83f867c1c49 (diff) | |
| download | openssl-e541e124ee3ee2657cc49f107c74f6882029f74c.tar.gz openssl-e541e124ee3ee2657cc49f107c74f6882029f74c.tar.bz2 openssl-e541e124ee3ee2657cc49f107c74f6882029f74c.zip | |
Imported Upstream version 1.0.2hupstream/1.0.2h
Change-Id: Ica9a30d71f52395a402accf32110b52f46851c11
Signed-off-by: Kyungwook Tak <k.tak@samsung.com>
Diffstat (limited to 'crypto/perlasm/x86_64-xlate.pl')
| -rwxr-xr-x | crypto/perlasm/x86_64-xlate.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/crypto/perlasm/x86_64-xlate.pl b/crypto/perlasm/x86_64-xlate.pl index ee04221..7a3dd04 100755 --- a/crypto/perlasm/x86_64-xlate.pl +++ b/crypto/perlasm/x86_64-xlate.pl @@ -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}; } |