--- parser3/www/htdocs/Attic/_bug.html 2004/03/19 12:23:04 1.32
+++ parser3/www/htdocs/Attic/_bug.html 2005/01/20 14:10:29 1.80
@@ -1,34 +1,29 @@
@main[]
-$soft(1)
-^cache[/cache/soft-$soft.id](86400){
-^math:random(1000);
+^first[]
+^if(def $error){
+ ^if(^error.pos[koshmar]>=0){
+ $error, TODO:recover
+ }{
+ $error, TODO:die
+ }
}
-#^xdoc::load[a.xml]
-
-@main2[]
-^connect[odbc://DSN=test_dbf]{
-^int:sql{select count(*) from test}
+@first[]
+^second[]
+^if(!def $error){
+ working1
}
+@second[]
+^if(^math:random(2)){
+ $error[koshmar,test1]
+}
+^if(!def $error){
+ working2
-@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[]
+ ^if(^math:random(2)){
+ $error[uzhas,test2]
+ }
+ ^if(!def $error){
+ working3
+ }
+}
-@main[]
-^date::now[]
\ No newline at end of file