--- parser3/src/www/htdocs/Attic/index.html 2001/12/24 10:00:05 1.511
+++ parser3/src/www/htdocs/Attic/index.html 2002/01/24 15:33:13 1.536
@@ -1,9 +1,14 @@
@auto[]
$request:charset[windows-1251]
$response:charset[windows-1251]
+$response:content-type[$.value[text/html]$.charset[$response:charset]]
@main[]
-^mail3[]
+^xmloutattrwithoutvalue[]
+#^precisionProblem[]
+#^xpath[]
+#^ttablesetlang[]
+#^mail3[]
#^ttime[]
#^tupper[]
#^treplace[]
@@ -84,16 +89,74 @@ $response:charset[windows-1251]
OK
+@xmloutattrwithoutvalue[]
+#$ORIGINS(1)
+$doc[^xdoc::set{zz}]
+$doc[^doc.transform[global.xsl]]
+=^taint[html][^doc.string[$.method[html]]]=
+
+
+
+@precisionProblem[]
+$a[123456789012345678901234567890]
+$b(^a.double[])
+^b.format{%.20E}
+
+^eval(2*2)
+
+@xpath[]
+$xdoc[^xdoc::set{
+привет
+}]
+#^show-xdoc2[$xdoc]
+$node[^xdoc.selectSingle[/document/block/p]]
+^if(def $node){
+ ^if($node is string){
+ $node
+ }{
+ ^if($node is hash){
+ ^node._count[]
+ }{
+ $node.nodeType
+ }
+ }
+#$node.firstChild.nodeValue
+}{
+ node not found
+}
+
+
+@ttablesetlang[]
+$a-tab-b[a b
+1 2]
+
+$t[^table::set{$a-tab-b}]
+=$t.a=
+
+
+$t[^table::set[nameless]{^taint[$a-tab-b]}]
+=$t.0=
+
+
+$t[^table::set{^untaint{^taint[$a-tab-b]}}]
+=$t.a=
+
+#^t.append{1 2}
+
@mail3[]
^mail:send[
$.from[Александр Петросян ]
$.to[Александр Петросян ]
- $.subject[проверка2]
+ $.subject[проверка4]
$.body[
$.text[
$.content-type[$.value[text/plain] $.charset[windows-1251]]
$.body[проверка]
]
+ $.attachment[
+ $.value[^file::load[text;index.html]]
+ $.file-name[привет всем.html]
+ ]
]
]
@@ -128,9 +191,9 @@ $cache[^file:list[.;\.cache^$]]
@xslt2[]
$xdoc[^xdoc::set{
-hi
+привет
}]
-#^show-xdoc2[$xdoc]
+^show-xdoc2[$xdoc]
^show-xdoc2[^xdoc.transform[templates/_document.xslt]]
@@ -195,6 +258,7 @@ $bred[^int::int[]]
@xloadwrongtable[]
$constr[^xdoc::load[wrongtable.xml]]
+^show-xdoc2[$constr]
@xsetwrongtable[]
$constr[^xdoc::set{
@@ -755,24 +819,23 @@ by id:
@show-xdoc2[xdoc]
^xdoc.save[out/save.xml;
-# $.encoding[windows-1251]
+# $.encoding[utf-8]
$.method[xml]
]
$file[^xdoc.file[
-# $.encoding[windows-1251]
+ $.encoding[utf-8]
$.method[html]
]]
^file.save[text;out/save_file.html]
#$response:body[^xdoc.file[ $.media-type[text/paf] ]]
^taint[html][^xdoc.string[
$.method[html]
-# $.version[1.0]
-# $.encoding[utf-8]
+# $.encoding[utF-8]
# $.omit-xml-declaration[yes]
-# $.standalone[yes]
-# $.doctype-public[-//W3C//DTD XHTML]
-# $.doctype-system[/a/b/c/]
-# $.indent[no]
- $.media-type[text/paf]
+# $.standalone[no]
+# -$.doctype-public[-//W3C//DTD XHTML]
+# -$.doctype-system[/a/b/c/]
+# $.indent[yes]
+# $.media-type[text/paf]
]]