From: Andy Polyakov <appro@openssl.org>
Date: Mon, 5 Jun 2006 09:42:31 +0000 (+0000)
Subject: Minor ppc-xlate.pl update.
X-Git-Tag: OpenSSL_0_9_8k^2~1269
X-Git-Url: https://git.librecmc.org/?a=commitdiff_plain;h=d3a6461d71545f6658da041b186a05d8fa7d7c83;p=oweals%2Fopenssl.git

Minor ppc-xlate.pl update.
---

diff --git a/crypto/perlasm/ppc-xlate.pl b/crypto/perlasm/ppc-xlate.pl
index a3b5b0e37b..bedaa99cb4 100755
--- a/crypto/perlasm/ppc-xlate.pl
+++ b/crypto/perlasm/ppc-xlate.pl
@@ -106,7 +106,7 @@ while($line=<>) {
 	my $mnemonic = $2;
 	my $f = $3;
 	my $opcode = eval("\$$mnemonic");
-	$line =~ s|\br([0-9]+)\b|$1|g if ($c ne "." and $flavour !~ /osx/);
+	$line =~ s|\bc?r([0-9]+)\b|$1|g if ($c ne "." and $flavour !~ /osx/);
 	if (ref($opcode) eq 'CODE') { $line = &$opcode($f,split(',',$line)); }
 	elsif ($mnemonic)           { $line = $c.$mnemonic.$f."\t".$line; }
     }