--- parser3/src/www/htdocs/Attic/index.html 2001/10/19 13:43:59 1.415
+++ parser3/src/www/htdocs/Attic/index.html 2001/10/28 15:31:35 1.441
@@ -1,4 +1,12 @@
@main[]
+#^connect[mysql://user:pass@host]{ }
+#^безнадёжна_попытка_поправить_непоправимое[]
+#^tcache[]
+#^thashfileexp[]
+^tcounter[]
+#^tablehash[]
+#^hashfile[]
+#^formclass[]
#^hren[]
#^domedit[]
#^domxslt[]
@@ -11,7 +19,7 @@
#^ifpasshash[]
#^movedir[]
#^replace[]
-^set[]
+#^set[]
#^hash[]
#$t[^methresult[]] ->$t
#^terror[]
@@ -38,11 +46,92 @@
#^header[]
OK
+@безнадёжна_попытка_поправить_непоправимое[]
+$dom_from_disk[^xdoc::load[input.xml]]
+$dom_created_in_air[^xdoc::create[doc]]
+^dom_created_in_air.documentElement.appendChild[^dom_from_disk.documentElement.cloneNode(1)]
+^show-xdoc2[$dom_created_in_air]
+
+
+@tcache[]
+#^hashfile:clear[cache]
+$code[^hashfile::open[cache]]
+^code.cache[key](2){
+ ^math:random(100)
+# ^code.delete[]
+}
+
+
+@thashfileexp[]
+$hf[^hashfile::open[hashfile]]
+$hf.paf[$.value[крут] $.expires(3)]
+paf=$hf.paf
+
+$hash[^hf.hash[]]
+=$hash.paf=
+
+
+@tcounter[]
+^tcounterone[$DB_HOME]
+#other root:
+#^tcounterone[${DB_HOME}2]
+#again, first:
+#^tcounterone[$DB_HOME]
+
+@tcounterone[DB_HOME]
+$counter[^hashfile::open[$DB_HOME;counter]]
+#^counter.clear[]
+^counter.transaction{
+# $counter.value(10)
+ $counter.value($counter.value+1)
+# ^counter.delete[value]
+ $counter.value
+}
+
+^rem{
+$hash[^counter.hash[]]
+=$hash.value=
+
+}
+
+@tablehash[]
+$productList[^table::set{id name
+1 носки
+2 валенки
+3 ушанка
+}]
+
+#скажем, у первого дилера
+$firstPriceList[^table::set{id price
+1 0.3
+3 1000
+}]
+
+$firstPriceHash[^firstPriceList.hash[id]]
+
+^productList.menu{
+ продукт "$productList.name" | цена у first: $firstPriceHash.[$productList.id].price
+}
+
+
+@hashfile[]
+$hf[^hashfile::assign[hashfile]]
+#$hf.paf[крут5]
+paf=$hf.paf
+
+@formclass[]
+^$form:CLASS.a=$form:CLASS.a
+
@domdata[]
+^if(1){
+# $a{^hren[]}
+}
+$a
$xdoc[^xdoc::create[doc]]
$doc[$xdoc.documentElement]
-$name[^doc.appendChild[^xdoc.createElement[name]]]
-$text[^name.appendChild[^xdoc.createTextNode[петросян petrosian]]]
+$name[^doc.appendChild[^xdoc.createElement{name}]]
+$text[^name.appendChild[^xdoc.createTextNode{петросян ^;co}]]
+^untaint[as-is]{=$text.nodeValue=}
@domedit[]
^domdata[]
@@ -372,8 +461,9 @@ $file[^xdoc.file[
$.method[html]
]]
^file.save[text;save_file.html]
-^taint[^xdoc.string[]]
+taint[^xdoc.string[]]
# $.encoding[windows-1251]
# $.method[html]
#]]
+