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...

crypto/perlasm/x86ms.pl

@@ -416,6 +416,11 @@ sub main'set_label
 		}
 	}
 
+sub main'data_byte
+	{
+	push(@out,"\tDB\t".join(',',@_)."\n");
+	}
+
 sub main'data_word
 	{
 	push(@out,"\tDD\t".join(',',@_)."\n");

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");

crypto/perlasm/x86unix.pl

@@ -594,6 +594,11 @@ ___
 		}
 	}
 
+sub main'data_byte
+	{
+	push(@out,"\t.byte\t".join(',',@_)."\n");
+	}
+
 sub main'data_word
 	{
 	push(@out,"\t.long\t".join(',',@_)."\n");