diff options
Diffstat (limited to 'src/lib/libcrypto/perlasm')
-rwxr-xr-x | src/lib/libcrypto/perlasm/x86_64-xlate.pl | 13 | ||||
-rw-r--r-- | src/lib/libcrypto/perlasm/x86asm.pl | 8 |
2 files changed, 0 insertions, 21 deletions
diff --git a/src/lib/libcrypto/perlasm/x86_64-xlate.pl b/src/lib/libcrypto/perlasm/x86_64-xlate.pl index 56d9b64b6f..2ad032c4ba 100755 --- a/src/lib/libcrypto/perlasm/x86_64-xlate.pl +++ b/src/lib/libcrypto/perlasm/x86_64-xlate.pl | |||
@@ -759,19 +759,6 @@ my $pclmulqdq = sub { | |||
759 | } | 759 | } |
760 | }; | 760 | }; |
761 | 761 | ||
762 | my $rdrand = sub { | ||
763 | if (shift =~ /%[er](\w+)/) { | ||
764 | my @opcode=(); | ||
765 | my $dst=$1; | ||
766 | if ($dst !~ /[0-9]+/) { $dst = $regrm{"%e$dst"}; } | ||
767 | rex(\@opcode,0,$1,8); | ||
768 | push @opcode,0x0f,0xc7,0xf0|($dst&7); | ||
769 | @opcode; | ||
770 | } else { | ||
771 | (); | ||
772 | } | ||
773 | }; | ||
774 | |||
775 | if ($nasm) { | 762 | if ($nasm) { |
776 | print <<___; | 763 | print <<___; |
777 | default rel | 764 | default rel |
diff --git a/src/lib/libcrypto/perlasm/x86asm.pl b/src/lib/libcrypto/perlasm/x86asm.pl index d74d1992f8..5916ea4f89 100644 --- a/src/lib/libcrypto/perlasm/x86asm.pl +++ b/src/lib/libcrypto/perlasm/x86asm.pl | |||
@@ -130,14 +130,6 @@ sub ::pclmulqdq | |||
130 | { &::generic("pclmulqdq",@_); } | 130 | { &::generic("pclmulqdq",@_); } |
131 | } | 131 | } |
132 | 132 | ||
133 | sub ::rdrand | ||
134 | { my ($dst)=@_; | ||
135 | if ($dst =~ /(e[a-dsd][ixp])/) | ||
136 | { &::data_byte(0x0f,0xc7,0xf0|$regrm{$dst}); } | ||
137 | else | ||
138 | { &::generic("rdrand",@_); } | ||
139 | } | ||
140 | |||
141 | # label management | 133 | # label management |
142 | $lbdecor="L"; # local label decoration, set by package | 134 | $lbdecor="L"; # local label decoration, set by package |
143 | $label="000"; | 135 | $label="000"; |