Annotation of parser3/tests/memcached/001.html, revision 1.1

1.1     ! moko        1: # values: set, get, add, delete, mget
        !             2: @main[]
        !             3: $m[^open_memcached[]]
        !             4: ^cleanup[]
        !             5: $m.pa_s[hello]
        !             6: 1. get: $m.pa_s
        !             7: $v[$m.pa_missing]
        !             8: 2. missing: ^if($v is void){void}
        !             9: $m.pa_e[]
        !            10: $v[$m.pa_e]
        !            11: 3. empty string: "$v" $v.CLASS_NAME
        !            12: $m.pa_t[ $.value[with expires] $.expires(60) ]
        !            13: 4. value hash: $m.pa_t
        !            14: 5. add new: ^show(^m.add[pa_a;first])
        !            15: 6. add existing: ^show(^m.add[pa_a;second]) $m.pa_a
        !            16: ^m.delete[pa_a]
        !            17: $v[$m.pa_a]
        !            18: 7. deleted: ^if($v is void){void}
        !            19: 8. delete missing: ^m.delete[pa_a]ok
        !            20: $m.pa_k1[one]
        !            21: $m.pa_k2[two]
        !            22: 9. mget: ^show[^m.mget[pa_k1;pa_k2;pa_missing]]
        !            23: $keys[^table::create{key^#0Apa_k2^#0Apa_missing}]
        !            24: 10. mget table: ^show[^m.mget[$keys]]
        !            25: $m.pa_tainted[^taint[<b>] <i>]
        !            26: 11. languages are kept: ^untaint[html]{$m.pa_tainted}
        !            27: 12. number: ^failed{$m.pa_n(5)}
        !            28: 13. invalid option: ^failed{$m.pa_x[ $.value[v] $.ttl(1) ]}
        !            29: 14. no value: ^failed{$m.pa_x[ $.expires(1) ]}
        !            30: 15. empty key: ^failed{^m.add[;v]}
        !            31: ^cleanup[]
        !            32: 
        !            33: @cleanup[]
        !            34: ^m.delete[pa_s]^m.delete[pa_e]^m.delete[pa_t]^m.delete[pa_a]^m.delete[pa_k1]^m.delete[pa_k2]^m.delete[pa_tainted]

E-mail: