--- parser3/tests/141.html 2013/07/15 22:50:40 1.6
+++ parser3/tests/141.html 2013/09/30 19:58:24 1.8
@@ -19,3 +19,14 @@ $long[very-long-long-long-long-long-long
^math:digest[sha512;123]
^math:digest[sha512;123; $.hmac[pwd] ]
^math:digest[sha512;123; $.hmac[$long$long] $.format[base64] ]
+
+$paf[^file::load[binary;019paf2001.gif]]
+
+^math:digest[md5;$paf]
+^math:digest[sha256;$paf]
+
+$s[{ "name": "^taint[json;va"lue]" }]
+$f[^file::create[$s]]
+
+^math:md5[$s] = ^math:md5[$f.text]
+^math:digest[sha1;$s] = ^math:digest[sha1;$f.text]