|
|
| version 1.422, 2001/10/22 16:44:43 | version 1.431, 2001/10/25 09:48:18 |
|---|---|
| Line 1 | Line 1 |
| @main[] | @main[] |
| ^hashfile[] | #^безнадёжна_попытка_поправить_непоправимое[] |
| #^tcache[] | |
| #^thashfileexp[] | |
| ^tcounter[] | |
| #^tablehash[] | |
| #^hashfile[] | |
| #^formclass[] | #^formclass[] |
| #^hren[] | #^hren[] |
| #^domedit[] | #^domedit[] |
| Line 40 | 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[] | |
| #^hashfile:clear[counter] | |
| $counter[^hashfile::open[counter]] | |
| ^counter.transaction{ | |
| # $counter.value(10) | |
| $counter.value($counter.value+1) | |
| # ^counter.delete[value] | |
| $counter.value | |
| } | |
| <hr> | |
| $hash[^counter.hash[]] | |
| =$hash.value= | |
| <hr> | |
| @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<br> | |
| } | |
| @hashfile[] | @hashfile[] |
| $hf[^hashfile::assign[hashfile]] | $hf[^hashfile::assign[hashfile]] |
| $hf.paf[крут] | #$hf.paf[крут5] |
| paf=$hf.paf | paf=$hf.paf |
| @formclass[] | @formclass[] |