--- parser3/tests/141.html	2003/04/15 15:10:04	1.1.2.1
+++ parser3/tests/141.html	2013/09/30 19:58:24	1.8
@@ -1,3 +1,32 @@
-$uuid[^math:uuid[]] ^uuid.length[]
-$uid64[^math:uid64[]] ^uid64.length[]
-^math:md5[123]
+$uuid[^math:uuid[]]^uuid.length[]<br />
+$uid64[^math:uid64[]]^uid64.length[]<br />
+
+$long[very-long-long-long-long-long-long-long-long-long-long-long-long-long-long-long-long-key]
+
+^math:md5[123]<br />
+^math:digest[md5;123]<br />
+^math:digest[md5;123; $.hmac[pwd] ]<br />
+^math:digest[md5;123; $.hmac[$long] $.format[base64] ]<br />
+
+^math:sha1[123]<br />
+^math:digest[sha1;123]<br />
+^math:digest[sha1;123; $.hmac[pwd] ]<br />
+^math:digest[sha1;123; $.hmac[$long] $.format[base64] ]<br />
+
+^math:digest[sha256;123; $.hmac[pwd] ]<br />
+^math:digest[sha256;123; $.hmac[$long] $.format[base64] ]<br />
+
+^math:digest[sha512;123]<br />
+^math:digest[sha512;123; $.hmac[pwd] ]<br />
+^math:digest[sha512;123; $.hmac[$long$long] $.format[base64] ]<br />
+
+$paf[^file::load[binary;019paf2001.gif]]
+
+^math:digest[md5;$paf]<br />
+^math:digest[sha256;$paf]<br />
+
+$s[{ "name": "^taint[json;va"lue]" }]
+$f[^file::create[$s]]
+
+^math:md5[$s] = ^math:md5[$f.text]<br />
+^math:digest[sha1;$s] = ^math:digest[sha1;$f.text]<br />