diff options
author | Andy Polyakov <appro@openssl.org> | 2008-01-13 22:01:30 +0000 |
---|---|---|
committer | Andy Polyakov <appro@openssl.org> | 2008-01-13 22:01:30 +0000 |
commit | addd641f3a5e99ed90e3369914af5b356b725590 (patch) | |
tree | 1a6e7498fecce05807ee71d0641823e8422dbb02 /crypto/bn/asm/ppc.pl | |
parent | f63e4be392dfc4d5073653a5688d7240b9eaffb9 (diff) |
Unify ppc assembler make rules.
Diffstat (limited to 'crypto/bn/asm/ppc.pl')
-rw-r--r-- | crypto/bn/asm/ppc.pl | 11 |
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; #-------------------------------------------------------------------- |