summaryrefslogtreecommitdiffstats
path: root/crypto/perlasm/x86nasm.pl
diff options
context:
space:
mode:
authorAndy Polyakov <appro@openssl.org>2005-11-28 20:09:58 +0000
committerAndy Polyakov <appro@openssl.org>2005-11-28 20:09:58 +0000
commitd1593e6b15a6cb39a306b41669cda170c1d0da99 (patch)
tree9f2028e4c86be081a28a3915ac99c454b4755fc2 /crypto/perlasm/x86nasm.pl
parenta53cb070e34d645ccc1b63c6c2e82658ca7cda37 (diff)
Whirlpool hash implementation. The fact that subdirectory and .h file are
called whrlpool is not a typo, but a way to keep the names shorter than 8 characters. Remaining TODO list comprises adding OID, EVP, corresponding flag to apps/openssl dgst, benchmark, engage assembler...
Diffstat (limited to 'crypto/perlasm/x86nasm.pl')
-rw-r--r--crypto/perlasm/x86nasm.pl5
1 files changed, 5 insertions, 0 deletions
diff --git a/crypto/perlasm/x86nasm.pl b/crypto/perlasm/x86nasm.pl
index 331f18bb22..78b1f94c07 100644
--- a/crypto/perlasm/x86nasm.pl
+++ b/crypto/perlasm/x86nasm.pl
@@ -401,6 +401,11 @@ sub main'set_label
push(@out,"$label{$_[0]}:\n");
}
+sub main'data_byte
+ {
+ push(@out,(($main'mwerks)?".byte\t":"DB\t").join(',',@_)."\n");
+ }
+
sub main'data_word
{
push(@out,(($main'mwerks)?".long\t":"DD\t").join(',',@_)."\n");