Commit 88be429f authored by Andy Polyakov's avatar Andy Polyakov
Browse files

perlasm/x86_64-xlate.pl: fix pair of typo-bugs in the new cfi_directive. 



.cfi_{start|end}proc and .cfi_def_cfa were not tracked.
Reviewed-by: default avatarRichard Levitte <levitte@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/2585)
parent fa3f8355

crypto/perlasm/x86_64-xlate.pl

+2 −2
Original line number Diff line number Diff line
@@ -633,7 +633,7 @@ my %globals; 
	my	$self = {};

	my	$ret;



	if ($$line =~ s/^\s*\.cfi_(\w+)\s+//) {

	if ($$line =~ s/^\s*\.cfi_(\w+)\s*//) {

	    bless $self,$class;

	    $ret = $self;

	    undef $self->{value};
@@ -656,7 +656,7 @@ my %globals; 
			&& do {	$cfa_rsp -= 1*eval($$line) if ($cfa_reg eq "%rsp");

				last;

			      };

	    /def_cfa/	&& do {	if ($$line =~ /(%r\w+)\s*,\s*(\.+)/) {

	    /def_cfa/	&& do {	if ($$line =~ /(%r\w+)\s*,\s*(.+)/) {

				    $cfa_reg = $1;

				    $cfa_rsp = -1*eval($2) if ($cfa_reg eq "%rsp");

				}