Loading crypto/perlasm/ppc-xlate.pl +20 −0 Original line number Diff line number Diff line Loading @@ -151,6 +151,26 @@ my $vmr = sub { " vor $vx,$vy,$vy"; }; # Some ABIs specify vrsave, special-purpose register #256, as reserved # for system use. my $no_vrsave = ($flavour =~ /aix|linux64le/); my $mtspr = sub { my ($f,$idx,$ra) = @_; if ($idx == 256 && $no_vrsave) { " or $ra,$ra,$ra"; } else { " mtspr $idx,$ra"; } }; my $mfspr = sub { my ($f,$rd,$idx) = @_; if ($idx == 256 && $no_vrsave) { " li $rd,-1"; } else { " mfspr $rd,$idx"; } }; # PowerISA 2.06 stuff sub vsxmem_op { my ($f, $vrt, $ra, $rb, $op) = @_; Loading Loading
crypto/perlasm/ppc-xlate.pl +20 −0 Original line number Diff line number Diff line Loading @@ -151,6 +151,26 @@ my $vmr = sub { " vor $vx,$vy,$vy"; }; # Some ABIs specify vrsave, special-purpose register #256, as reserved # for system use. my $no_vrsave = ($flavour =~ /aix|linux64le/); my $mtspr = sub { my ($f,$idx,$ra) = @_; if ($idx == 256 && $no_vrsave) { " or $ra,$ra,$ra"; } else { " mtspr $idx,$ra"; } }; my $mfspr = sub { my ($f,$rd,$idx) = @_; if ($idx == 256 && $no_vrsave) { " li $rd,-1"; } else { " mfspr $rd,$idx"; } }; # PowerISA 2.06 stuff sub vsxmem_op { my ($f, $vrt, $ra, $rb, $op) = @_; Loading