--- parser3/www/htdocs/Attic/_bug.html 2004/03/19 12:23:04 1.32
+++ parser3/www/htdocs/Attic/_bug.html 2005/11/22 11:31:58 1.104
@@ -1,34 +1,13 @@
-@main[]
-$soft(1)
-^cache[/cache/soft-$soft.id](86400){
-^math:random(1000);
+^for[i](1;100){
+
+$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]}
}
-#^xdoc::load[a.xml]
-
-@main2[]
-^connect[odbc://DSN=test_dbf]{
-^int:sql{select count(*) from test}
-}
-
-@mainx[]
-$request:charset[windows-1251]
-$response:charset[windows-1251]
-$response:content-type[text/html]
-
-$xdoc[^xdoc::load[_bug.xml]]
-#^xdoc.string[]
-$xdoc.search-namespaces.x[http://pif.design.ru/]
-$nodes[^xdoc.select[//x:second]]
-^nodes._count[]
-
-@main[]
-^bug.bug[]
-
-@main[]
-$d[^date::unix-timestamp(1079695550.808)]
-#$d[^date::unix-timestamp(1079695983.321)]
-
-^d.sql-string[]
-
-@main[]
-^date::now[]
\ No newline at end of file