diff options
| author | Andy Polyakov <appro@openssl.org> | 2014-06-04 08:34:18 +0200 |
|---|---|---|
| committer | Andy Polyakov <appro@openssl.org> | 2014-06-04 08:34:18 +0200 |
| commit | d86689e1d96a7f55f8266a2b8fee623fbba4b07d (patch) | |
| tree | 456de7a01fb48e203174d1ffddff84da5fd22ba3 /crypto/aes | |
| parent | 53a224bb0ab6c7d0d509141638f7820b859d0ade (diff) | |
aesp8-ppc.pl: fix typos.
Diffstat (limited to 'crypto/aes')
| -rwxr-xr-x | crypto/aes/asm/aesp8-ppc.pl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/crypto/aes/asm/aesp8-ppc.pl b/crypto/aes/asm/aesp8-ppc.pl index 31a260fc3c..f5c2be3d40 100755 --- a/crypto/aes/asm/aesp8-ppc.pl +++ b/crypto/aes/asm/aesp8-ppc.pl @@ -55,7 +55,7 @@ $sp="r1"; $vrsave="r12"; ######################################################################### -{{{ Key setup procedures # +{{{ # Key setup procedures # my ($inp,$bits,$out,$ptr,$cnt,$rounds)=map("r$_",(3..8)); my ($zero,$in0,$in1,$key,$rcon,$mask,$tmp)=map("v$_",(0..6)); my ($stage,$outperm,$outmask,$outhead,$outtail)=map("v$_",(7..11)); @@ -375,7 +375,7 @@ Ldeckey: ___ }}} ######################################################################### -{{{ Single block en- and decrypt procedures # +{{{ # Single block en- and decrypt procedures # sub gen_block () { my $dir = shift; my $n = $dir eq "de" ? "n" : ""; @@ -455,7 +455,7 @@ ___ &gen_block("de"); }}} ######################################################################### -{{{ CBC en- and decrypt procedures # +{{{ # CBC en- and decrypt procedures # my ($inp,$out,$len,$key,$ivp,$enc,$rounds,$idx)=map("r$_",(3..10)); my ($rndkey0,$rndkey1,$inout,$tmp)= map("v$_",(0..3)); my ($ivec,$inptail,$inpperm,$outhead,$outperm,$outmask,$keyperm)= @@ -623,7 +623,7 @@ Lcbc_done: .long 0 ___ ######################################################################### -{{ Optimized CBC decrypt procedure # +{{ # Optimized CBC decrypt procedure # my $key_="r11"; my ($x00,$x10,$x20,$x30,$x40,$x50,$x60,$x70)=map("r$_",(0,8,26..31)); my ($in0, $in1, $in2, $in3, $in4, $in5, $in6, $in7 )=map("v$_",(0..3,10..13)); |