--- parser3/src/www/htdocs/Attic/index.html 2001/10/30 07:41:29 1.445 +++ parser3/src/www/htdocs/Attic/index.html 2001/11/01 15:11:36 1.459 @@ -1,14 +1,23 @@ @main[] +#^thashforeach[] +#^thashdelete[] +#^connect[mysql://user:pass@cd.rinet.ru/db]{^void:sql{z} } +#^tappend[] +#^sappend[] +#^eval(10\3)
+#^tform[] +#^formattest[] +#^filelist[] #^connect[mysql://user:pass@host]{ } #^безнадёжна_попытка_поправить_непоправимое[] #^tcache[] -#^thashfileexp[] +^thashfileexp[] #^tcounter[] #^tablehash[] #j^hashfile[] #^formclass[] #^hren[] -^domedit[] +#^domedit[] #^domxslt[] #^lsplit2[] #^faceesize[] @@ -46,6 +55,60 @@ #^header[] OK +@thashforeach[] +$h[ + $.a[1] + $.b[2] +] +^h.foreach[key;value]{ + $key=$value
+} + +@thashdelete[] +$h[$.a[1] $.b[2]] +was:
+count=^h._count[]
+b='$h.b'
+ +^h.delete[b] + +now:
+count=^h._count[]
+b='$h.b' + +@sappend[] +$test[123] +^test.save[test] +^test.save[append;test] + +@tappend[] +$test[^table::set{a b +a1 b1}] +^test.save[test] +$test[^table::set{a b +a2 b2}] +^test.save[append;test] + + +@tform[] +^if(def $form:new_file){y}{n} +
+ + + + +@formattest[] +$size(15.124) + +^size.format{%.2f} + +@filelist[] +$html[^file:list[.;\.html^$]] +^html.menu{ + $html.name
+} +
+ @безнадёжна_попытка_поправить_непоправимое[] $dom_from_disk[^xdoc::load[input.xml]] $dom_created_in_air[^xdoc::create[doc]] @@ -55,7 +118,7 @@ $dom_created_in_air[^xdoc::create[doc]] @tcache[] #^hashfile:clear[cache] -$code[^hashfile::open[cache]] +$code[^hashfile::open[$DB_HOME;cache]] ^code.cache[key](2){ ^math:random(100) # ^code.delete[] @@ -63,10 +126,14 @@ $code[^hashfile::open[cache]] @thashfileexp[] -$hf[^hashfile::open[hashfile]] +$hf[^hashfile::open[$DB_HOME;hashfile]] $hf.paf[$.value[крут] $.expires(3)] paf=$hf.paf
+^hf.foreach[key;value]{ + $key=$value
+} +
$hash[^hf.hash[]] =$hash.paf=