--- parser3/tests/141.html	2003/07/24 06:19:19	1.1.2.2
+++ parser3/tests/141.html	2019/11/13 22:48:30	1.9
@@ -1,3 +1,32 @@
-$uuid[^math:uuid[]] '$uuid' ^uuid.length[]
-$uid64[^math:uid64[]] ^uid64.length[]
-^math:md5[123]
+1   $uuid[^math:uuid[]]^uuid.length[]<br />
+1.1 $uid64[^math:uid64[]]^uid64.length[]<br />
+
+2   $long[very-long-long-long-long-long-long-long-long-long-long-long-long-long-long-long-long-key]
+
+3   ^math:md5[123]<br />
+3.1 ^math:digest[md5;123]<br />
+3.2 ^math:digest[md5;123; $.hmac[pwd] ]<br />
+3.3 ^math:digest[md5;123; $.hmac[$long] $.format[base64] ]<br />
+
+4   ^math:sha1[123]<br />
+4.1 ^math:digest[sha1;123]<br />
+4.2 ^math:digest[sha1;123; $.hmac[pwd] ]<br />
+4.3 ^math:digest[sha1;123; $.hmac[$long] $.format[base64] ]<br />
+
+5   ^math:digest[sha256;123; $.hmac[pwd] ]<br />
+5.1 ^math:digest[sha256;123; $.hmac[$long] $.format[base64] ]<br />
+
+6   ^math:digest[sha512;123]<br />
+6.1 ^math:digest[sha512;123; $.hmac[pwd] ]<br />
+6.2 ^math:digest[sha512;123; $.hmac[$long$long] $.format[base64] ]<br />
+
+$paf[^file::load[binary;019paf2001.gif]]
+
+7   ^math:digest[md5;$paf]<br />
+7.1 ^math:digest[sha256;$paf]<br />
+
+$s[{ "name": "^taint[json;va"lue]" }]
+$f[^file::create[$s]]
+
+8   ^math:md5[$s] = ^math:md5[$f.text]<br />
+8.1 ^math:digest[sha1;$s] = ^math:digest[sha1;$f.text]<br />