summaryrefslogtreecommitdiffstats
path: root/crypto/bn/asm/ppc.pl
diff options
context:
space:
mode:
authorAndy Polyakov <appro@openssl.org>2008-01-13 22:01:30 +0000
committerAndy Polyakov <appro@openssl.org>2008-01-13 22:01:30 +0000
commitaddd641f3a5e99ed90e3369914af5b356b725590 (patch)
tree1a6e7498fecce05807ee71d0641823e8422dbb02 /crypto/bn/asm/ppc.pl
parentf63e4be392dfc4d5073653a5688d7240b9eaffb9 (diff)
Unify ppc assembler make rules.
Diffstat (limited to 'crypto/bn/asm/ppc.pl')
-rw-r--r--crypto/bn/asm/ppc.pl11
1 files changed, 5 insertions, 6 deletions
diff --git a/crypto/bn/asm/ppc.pl b/crypto/bn/asm/ppc.pl
index 0c0206b0d7..8da16f92d0 100644
--- a/crypto/bn/asm/ppc.pl
+++ b/crypto/bn/asm/ppc.pl
@@ -100,9 +100,9 @@
# me a note at schari@us.ibm.com
#
-$opf = shift;
+$flavour = shift;
-if ($opf =~ /32\.s/) {
+if ($flavour =~ /32/) {
$BITS= 32;
$BNSZ= $BITS/8;
$ISA= "\"ppc\"";
@@ -125,7 +125,7 @@ if ($opf =~ /32\.s/) {
$INSR= "insrwi"; # insert right
$ROTL= "rotlwi"; # rotate left by immediate
$TR= "tw"; # conditional trap
-} elsif ($opf =~ /64\.s/) {
+} elsif ($flavour =~ /64/) {
$BITS= 64;
$BNSZ= $BITS/8;
$ISA= "\"ppc64\"";
@@ -149,15 +149,14 @@ if ($opf =~ /32\.s/) {
$INSR= "insrdi"; # insert right
$ROTL= "rotldi"; # rotate left by immediate
$TR= "td"; # conditional trap
-} else { die "nonsense $opf"; }
+} else { die "nonsense $flavour"; }
$0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1;
( $xlate="${dir}ppc-xlate.pl" and -f $xlate ) or
( $xlate="${dir}../../perlasm/ppc-xlate.pl" and -f $xlate) or
die "can't locate ppc-xlate.pl";
-( defined shift || open STDOUT,"| $^X $xlate $opf" ) ||
- die "can't call $xlate: $!";
+open STDOUT,"| $^X $xlate $flavour ".shift || die "can't call $xlate: $!";
$data=<<EOF;
#--------------------------------------------------------------------