Commit 6e42e3ff authored by Andy Polyakov's avatar Andy Polyakov
Browse files

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: default avatarRich Salz <rsalz@openssl.org>
Reviewed-by: default avatarViktor Dukhovni <viktor@openssl.org>
parent a1933888

crypto/perlasm/x86_64-xlate.pl

+1 −1
Original line number Diff line number Diff line
@@ -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};

	}