From: Andy Polyakov <appro@openssl.org>
Date: Sat, 19 May 2007 17:32:06 +0000 (+0000)
Subject: ppc-xlate.pl update.
X-Git-Tag: OpenSSL_0_9_8k^2~826
X-Git-Url: https://git.librecmc.org/?a=commitdiff_plain;h=c6149e2f02dde61b6fd16c6ec9962f65d7eb37d8;p=oweals%2Fopenssl.git

ppc-xlate.pl update.
---

diff --git a/crypto/perlasm/ppc-xlate.pl b/crypto/perlasm/ppc-xlate.pl
index e36b5aedb2..c2a4621f86 100755
--- a/crypto/perlasm/ppc-xlate.pl
+++ b/crypto/perlasm/ppc-xlate.pl
@@ -7,7 +7,7 @@ open STDOUT,">$output" || die "can't open $output: $!";
 
 my $flavour = $output;
 my %GLOBALS;
-my $dotinlocallabels=0;
+my $dotinlocallabels=($flavour=~/linux/)?1:0;
 
 ################################################################
 # directives which need special treatment on different platforms
@@ -29,7 +29,6 @@ my $globl = sub {
 			      };
 	/linux.*32/	&& do {	$ret .= ".globl	$name\n";
 				$ret .= ".type	$name,\@function";
-				$dotinlocallabels = 1;
 				last;
 			      };
 	/linux.*64/	&& do {	$ret .= ".globl	.$name\n";
@@ -43,7 +42,6 @@ my $globl = sub {
 				$ret .= ".previous\n";
 
 				$name = ".$name";
-				$dotinlocallabels = 1;
 				last;
 			      };
     }