|
|
| version 1.423, 2001/10/23 12:41:05 | version 1.436, 2001/10/26 16:27:17 |
|---|---|
| Line 1 | Line 1 |
| @main[] | @main[] |
| #^безнадёжна_попытка_поправить_непоправимое[] | |
| #^tcache[] | |
| #^thashfileexp[] | |
| ^tcounter[] | ^tcounter[] |
| #^tablehash[] | #^tablehash[] |
| #^hashfile[] | #^hashfile[] |
| #^hashfile[] | |
| #^formclass[] | #^formclass[] |
| #^hren[] | #^hren[] |
| #^domedit[] | #^domedit[] |
| Line 43 | Line 45 |
| #^header[] | #^header[] |
| OK | 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 | |
| <hr> | |
| $hash[^hf.hash[]] | |
| =$hash.paf= | |
| <hr> | |
| @tcounter[] | @tcounter[] |
| #^hashfile:clear[counter] | ^tcounterone[$DB_HOME] |
| $counter[^hashfile::open[counter]] | other root: |
| ^tcounterone[${DB_HOME}2] | |
| again, first: | |
| ^tcounterone[$DB_HOME] | |
| @tcounterone[DB_HOME] | |
| #^hashfile:clear[$DB_HOME;counter] | |
| $counter[^hashfile::open[$DB_HOME;counter]] | |
| ^counter.transaction{ | ^counter.transaction{ |
| # $counter.value(10) | # $counter.value(10) |
| $counter.value($counter.value+1) | $counter.value($counter.value+1) |
| # ^counter.delete[value] | # ^counter.delete[value] |
| $counter.value | $counter.value |
| } | } |
| <hr> | |
| ^rem{ | |
| $hash[^counter.hash[]] | |
| =$hash.value= | |
| <hr> | |
| } | |
| @tablehash[] | @tablehash[] |
| $productList[^table::set{id name | $productList[^table::set{id name |
| Line 88 paf=$hf.paf | Line 128 paf=$hf.paf |
| $a | $a |
| $xdoc[^xdoc::create[doc]] | $xdoc[^xdoc::create[doc]] |
| $doc[$xdoc.documentElement] | $doc[$xdoc.documentElement] |
| $name[^doc.appendChild[^xdoc.createElement[name]]] | $name[^doc.appendChild[^xdoc.createElement{name}]] |
| $text[^name.appendChild[^xdoc.createTextNode[петросян petrosian]]] | $text[^name.appendChild[^xdoc.createTextNode{петросян ^;co}]] |
| ^untaint[as-is]{=$text.nodeValue=} | |
| @domedit[] | @domedit[] |
| ^domdata[] | ^domdata[] |
| Line 419 $file[^xdoc.file[ | Line 460 $file[^xdoc.file[ |
| $.method[html] | $.method[html] |
| ]] | ]] |
| ^file.save[text;save_file.html] | ^file.save[text;save_file.html] |
| <pre>^taint[^xdoc.string[]] | <pre>taint[^xdoc.string[]] |
| # $.encoding[windows-1251] | # $.encoding[windows-1251] |
| # $.method[html] | # $.method[html] |
| #]] | #]] |
| </pre> | </pre> |