|
|
1.1 moko 1: @main[]
2: $t[^table::create{c1 c2 c3}]
3: ^for[i](1;4){
4: ^t.insert{a$i b c d e}
5: }
6:
1.2 ! moko 7: ^t.offset(2)
! 8:
1.1 moko 9: code coverage:
10:
11: ^t.menu{
12: ^t.line[] : $t.c1
13: ^if(^t.line[]==2){ ^break[] }
14: }
15:
16: ^t.menu{
17: ^t.line[] : $t.c1
18: ^if(^t.line[]==2){ ^break[] }
19: }[,]
20:
21: insert/delete during menu:
22:
23: ^t.menu{
24: ^t.line[] : $t.c1
25: ^if(^t.line[]==1){
26: ^t.insert{more}
27: ^t.insert{more and more}
28: }
29: }
30:
31: ^show[1]
32:
33: ^t.menu{
34: ^t.line[] : $t.c1
35: ^if(^t.line[]==1){ ^t.delete[] }
36: }
37:
38:
39: foreach exceptions test:
40:
41: ^try-catch{^t.foreach{1}[2]{code}}
42: ^try-catch{^t.foreach[1]{2}{code}}
43: ^try-catch{^t.foreach[1;2;3]}
44:
45: ^t.foreach[n;v]{
46: $n : $v.c1
47: ^if($n==1){
48: ^v.insert{ups}
49: ^t.insert{another ups}
50: }
51: }
52:
53: ^show[2]
54:
55: ^t.foreach[n;v]{
56: $n : $v.c1
57: ^if($n==1){ ^v.delete[] }
58: }[,]
59:
60: ^show[3]
61:
62: ^t.foreach[n;v]{
63: $n : $v.c1
64: ^if($n==1){ ^break[] }
65: }
66:
67: ^t.foreach[n;v]{
68: $n : $v.c1
69: ^if($n==1){ ^break[] }
70: }[,]
71:
1.2 ! moko 72: # more coverage tests
! 73:
! 74: count: ^t.count[rows]
! 75: ^try-catch{^t.count[error]}
! 76:
! 77: ^t.offset[cur](1)
! 78: offset: ^t.offset[]
! 79: ^try-catch{^t.offset[error](1)}
! 80:
1.1 moko 81:
82: @show[n]
83: $n : ^json:string[$t; $.table[array] $.indent(true) ]
1.2 ! moko 84: offset: ^t.offset[]