--- parser3/www/htdocs/Attic/_bug.html 2004/03/19 12:23:04 1.32
+++ parser3/www/htdocs/Attic/_bug.html 2004/12/23 14:40:54 1.73
@@ -1,34 +1,25 @@
@main[]
-$soft(1)
-^cache[/cache/soft-$soft.id](86400){
-^math:random(1000);
-}
-#^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]
+$cH[^cH[]]
-$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)]
+^if($cH.this is "junction"){
+ $result[^cH.this[$cH.th_par]]
+}{
+ $result[0]
+}
-^d.sql-string[]
+####################################################################################################################
-@main[]
-^date::now[]
\ No newline at end of file
+@cH[]
+$result[
+ $.this[$mThis]
+ $.th_par[
+ $.a(2)
+ $.b(3)
+ ]
+]
+####################################################################################################################
+
+@mThis[lparams][params]
+$params[^hash::create[$lparams]]
+$result[^eval($params.a * $params.b)]