--- parser3/www/htdocs/Attic/_bug.html 2004/02/18 12:56:34 1.4
+++ parser3/www/htdocs/Attic/_bug.html 2005/11/22 11:38:44 1.84.4.13
@@ -1,14 +1,13 @@
-@main[]
-$request:charset[UTF-8]
-#$response:charset[UTF-8]
-$response:charset[windows-1251]
-$response:content-type[$.value[text/html]$.charset[$response:charset]]
-$xdoc[^xdoc::create{
-
-
-
-}]
-$xdoc[^xdoc.transform[_bug.xsl]]
-^xdoc.string[]
+^for[i](1;100){
-$request:charset/$response:charset
\ No newline at end of file
+$original[^for[j](1;$i){$j}]
+$original[^file::create[text;original.txt;$original]]
+$original.text
+
+$encoded[^original.base64[]]
+$encoded
+
+$decoded[^file::base64[$encoded]]
+$decoded.text
+^if($decoded.text ne $original.text){^throw[bug;here]}
+}