Return to 253.html CVS log

Up to [parser3project] / parser3 / tests

Annotation of parser3/tests/253.html, revision 1.1

1.1     ! moko        1: @main[]
        !             2: 
        !             3: $f[^file::load[text;253_json.txt]]
        !             4: 
        !             5: $o[^json:parse[^taint[as-is][$f.text]][ $.double(false) ]]
        !             6: ^print[$o]
        !             7: 
        !             8: $o[^json:parse[^taint[as-is][$f.text]][ $.object[$hook] ]]
        !             9: ^print[$o]
        !            10: 
        !            11: @print[hash]
        !            12: ^hash.foreach[k;v]{
        !            13:    $k = ^if($v is 'hash'){{^print[$v] 
        !            14:    }}{
        !            15:      $v.CLASS_NAME ^if($v is 'bool'){ ^if($v){true}{false} }($v is 'class1' || $v is 'class2'){^v.print[]}{$v}
        !            16:    }
        !            17: }
        !            18: 
        !            19: @hook[key;value]
        !            20: $result[^if(def $value.type){^reflection:create[$value.type;create;$value]}{$value}]
        !            21: 
        !            22: @CLASS
        !            23: class1
        !            24: 
        !            25: @create[h]
        !            26: $value[$h.value]
        !            27: 
        !            28: @print[]
        !            29: value "$value"
        !            30: 
        !            31: @CLASS
        !            32: class2
        !            33: 
        !            34: @create[h]
        !            35: $value[$h.value]
        !            36: 
        !            37: @print[]
        !            38: value "$value"