--- parser3/www/htdocs/Attic/_bug.html	2004/02/25 13:40:23	1.10
+++ parser3/www/htdocs/Attic/_bug.html	2004/12/23 14:40:54	1.73
@@ -1,17 +1,25 @@
-@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{<?xml version="1.0" encoding="$request:charset"?>
-<doc attribute="a
-	 b">
-исходный
-</doc>
-}]
-$xdoc[^xdoc.transform[_bug.xsl]]
-^xdoc.string[]
-#^xdoc.save[_bug-koi.xml;$.encoding[koi8-r]]
-#^xdoc.save[_bug-in-request-charset.xml]
-<hr>
-$request:charset/$response:charset
\ No newline at end of file
+@main[]
+
+$cH[^cH[]]
+
+^if($cH.this is "junction"){
+		$result[^cH.this[$cH.th_par]]
+}{
+		$result[0]
+}
+
+####################################################################################################################
+
+@cH[]
+$result[
+		$.this[$mThis]
+		$.th_par[
+				$.a(2)
+				$.b(3)
+		]
+]
+####################################################################################################################
+
+@mThis[lparams][params]
+$params[^hash::create[$lparams]]
+$result[^eval($params.a * $params.b)]