Return to 431.html CVS log

Up to [parser3project] / parser3 / tests

Annotation of parser3/tests/431.html, revision 1.2

1.1       moko        1: @main[]
                      2: 
                      3: 0.1 ^try-catch{ ^array::create[ $.5[v5] $.-7[v7] ] }
                      4: 0.2 ^try-catch{ ^array::create[ $.5[v5] $.12x5[v7] ] }
                      5: 
                      6: join
                      7: 
                      8: $a[data;data1;data2;data3;data4;$void]
                      9: $h[ $.k[data] $.k1[data1] $.k2[data2] $.k3[data3] $.k4[data4] $.k5[$void] ]
                     10: 
                     11: 1.1 negative limit: ^test-join[ $.limit(-1) ]
                     12: 1.2 negative offset: ^test-join[ $.offset(-1) ]
                     13: 1.3 normal: ^test-join[ $.limit(1) $.offset(1) ]
                     14: 1.4 large offset: ^test-join[ $.limit(1) $.offset(10) ]
                     15: 1.5 large limit : ^test-join[ $.limit(10) $.offset(1) ]
                     16: 1.6 ^try-catch{ ^a.join[$a] }
                     17: 
                     18: delete / remove
                     19: 
                     20: $b[^array::create[$a]]
                     21: 2.1 ^a.delete(2) ^json:string[$a; $.array[object] ]
                     22: 2.2 ^b.remove(2) ^json:string[$b; $.array[object] ]
                     23: 2.3 ^if(^a.contains(2)){2 yes}{2 no}
                     24: 2.4 ^if(^a.contains(5)){5 yes}{5 no}
                     25: 2.5 ^a.count[] ^a.delete[] ^a.count[]
                     26: 
                     27: key
                     28: 
                     29: 3.1 $a[^array::create[ $.5[v5] $.7[v7] $.10[v10]  $.12[v12] ]]
                     30: 
                     31: 3.2 ^json:string[^a.keys[]]
1.2     ! moko       32: 
1.1       moko       33: 3.3 ^json:string[^a.keys[column]]
                     34: 
1.2     ! moko       35: 3.4 ^a.foreach[k;v]{ ^if($v eq 'v10'){^break[]}{$k=$v} }
        !            36: 
1.1       moko       37: 3.5 ^a.foreach[k;v]{ ^if($k eq '10'){^break[]}{$v} }[,]
1.2     ! moko       38: 
1.1       moko       39: 3.6 ^a.for[k;v]{^if($k eq '10'){^break[]}{$v} }[,]
                     40: 
                     41: 3.7 ^a.sort[k;](-$k) ^json:string[$a; $.array[object] ]
1.2     ! moko       42: 
1.1       moko       43: 3.8 ^a.sort[;v]{$v}[desc] ^json:string[$a; $.array[object] ]
                     44: 
1.2     ! moko       45: 3.9 ^json:string[^a.reverse[]; $.array[object] ]
        !            46: 
1.1       moko       47: @test-join[options]
                     48: $b[0;1]
                     49: ^b.join[$a;$options]
                     50: ^json:string[$b]
                     51: $b[0;1]
                     52: ^b.join[$h;$options]
                     53: ^json:string[$b]