Return to 254.html CVS log

Up to [parser3project] / parser3 / tests

Annotation of parser3/tests/254.html, revision 1.6

1.1       moko        1: @main[]
                      2: 
                      3: $a[ $.v1[1] $.v2[2] $.v3[3] ]
                      4: $b[^test::create[]]
                      5: 
1.5       moko        6: $c[$b]
                      7: 
1.1       moko        8: ^reflection:copy[$a;$b]
1.5       moko        9: 
1.6     ! moko       10: ^if(^reflection:uid[$b] eq ^reflection:uid[$c]){Same uid}
1.5       moko       11: 
                     12: $str[value] $c[$str]
1.6     ! moko       13: ^if(^reflection:uid[$str] eq  ^reflection:uid[$c]){Same string}
1.1       moko       14: 
                     15: Object b:
                     16: ^print[^hash::create[$b]]
                     17: 
                     18: ^reflection:copy[$b;$a]
                     19: 
                     20: Hash a:
                     21: ^print[$a]
                     22: 
1.3       moko       23: $string[string]
1.1       moko       24: ^try_catch{
                     25:        ^reflection:copy[$string;$a]
                     26: }
                     27: ^try_catch{
1.2       moko       28:        ^reflection:copy[$a;$string]
1.1       moko       29: }
                     30: 
                     31: @print[hash]
                     32: ^hash.foreach[k;v]{$k = $v
                     33: }
                     34: 
                     35: @try_catch[code]
                     36: ^try{
                     37:        $code
                     38: }{
                     39:        $exception.handled(true)
                     40:        $exception.source
                     41:        $exception.comment
                     42: }
                     43: 
                     44: @CLASS
                     45: test
                     46: 
                     47: @create[]
                     48: $v2[3]
                     49: 
                     50: @SET_v3[value]
                     51: $another3[=$value=]