File:  [parser3project] / parser3 / tests / 431.html
Revision 1.8: download - view: text, annotated - select for diffs - revision graph
Sun Oct 27 13:51:16 2024 UTC (20 months, 1 week ago) by moko
Branches: MAIN
CVS tags: release_3_5_1, release_3_5_0, HEAD
tests updated after ^a.delete[3] supported

@main[]

0.1 ^try-catch{ ^array::copy[ $.5[v5] $.-7[v7] ] }
0.2 ^try-catch{ ^array::copy[ $.5[v5] $.12x5[v7] ] }

join

$a[data;data1;data2;data3;data4;$void]
$h[ $.k[data] $.k1[data1] $.k2[data2] $.k3[data3] $.k4[data4] $.k5[$void] ]

1.1 negative limit: ^test-join[ $.limit(-1) ]
1.2 negative offset: ^test-join[ $.offset(-1) ]
1.3 normal: ^test-join[ $.limit(1) $.offset(1) ]
1.4 large offset: ^test-join[ $.limit(1) $.offset(10) ]
1.5 large limit : ^test-join[ $.limit(10) $.offset(1) ]
1.6 ^try-catch{ ^a.join[$a] }

delete / remove

$b[^array::copy[$a]]
$c[^array::copy[$a]]
2.1 ^a.delete(2) ^json:string[$a; $.array[object] ]
2.2 ^b.remove(2) ^json:string[$b; $.array[object] ]
2.3 ^if(^a.contains(2)){2 yes}{2 no}
2.4 ^if(^a.contains(5)){5 yes}{5 no}
2.5 ^a.count[] ^a.delete[] ^a.count[]
2.6 $c.10[value] ^c.delete(10) ^json:string[$c; $.array[array] ] ^c.count[all]
2.7 $c.10[value] $c.6[data6] ^c.remove(10) ^json:string[$c; $.array[array] ] ^c.count[all]
2.8 $a[v0;v1;v2;v3] ^a.delete(1+1) ^a.delete[3] ^json:string[$a; $.array[array] ]
2.9 $a[v0;v1;v2;v3;v4] ^a.delete(1+1) ^a.delete[3] ^json:string[$a; $.array[array] ]

key

3.1 $a[^array::copy[ $.5[v5] $.7[v7] $.10[v10]  $.12[v12] ]]
    $b[^array::copy[$a]]

3.2 ^json:string[^a.keys[]]

3.3 ^json:string[^a.keys[column]]

3.4 ^a.foreach[k;v]{ ^if($v eq 'v10'){^break[]}{$k=$v} }

3.5 ^a.foreach[k;v]{ ^if($k eq '10'){^break[]}{$v} }[,]

3.6 ^a.for[k;v]{^if($k eq '10'){^break[]}{$v} }[,]

3.7 ^a.sort[k;](-$k) ^json:string[$a; $.array[object] ]

3.8 ^a.sort[;v]{$v} ^json:string[$a; $.array[object] ]

3.9 $a.6[v6] ^json:string[^a.reverse[]; $.array[object] ]

3.10 $b.10[] $b.15(false) $b.20[^hash::create[]] $b.25[last]
     $c[^array::copy[$b]]
     ^b.compact[] ^b.count[] ^json:string[$b; $.array[object] ]
     ^c.compact[undef] ^c.count[] ^json:string[$c; $.array[object] ]
     ^try-catch{ ^b.compact[bug] }

@test-join[options]
$b[0;1]
^b.join[$a;$options]
^json:string[$b]
$b[0;1]
^b.join[$h;$options]
^json:string[$b]

E-mail: