1 USING: kernel ui.gadgets ui.gadgets.tracks tools.test
2 math.rectangles accessors sequences namespaces ;
3 IN: ui.gadgets.tracks.tests
7 <gadget> { 100 100 } >>dim 1 track-add
13 <gadget> { 10 10 } >>dim f track-add
14 <gadget> { 100 100 } >>dim 1 track-add
20 <gadget> { 10 10 } >>dim 1 track-add
21 <gadget> { 10 10 } >>dim 0 track-add
27 <gadget> { 10 10 } >>dim f track-add
28 <gadget> { 10 10 } >>dim f track-add
29 <gadget> { 10 10 } >>dim f track-add
36 <gadget> { 10 10 } >>dim f track-add
37 <gadget> { 10 10 } >>dim f track-add
38 <gadget> { 10 10 } >>dim f track-add
42 { V{ { 10 10 } { 10 80 } { 10 10 } } } [
45 <gadget> { 10 10 } >>dim f track-add
46 <gadget> { 10 10 } >>dim 1 track-add
47 <gadget> { 10 10 } >>dim f track-add
49 [ layout ] [ children>> [ dim>> ] map ] bi
55 <gadget> { 10 10 } >>dim f track-add
56 <gadget> { 10 10 } >>dim dup "g1" set 1/2 track-add
57 <gadget> { 10 10 } >>dim dup "g2" set f track-add
58 <gadget> { 10 10 } >>dim 1/2 track-add
59 <gadget> { 10 10 } >>dim f track-add
64 { V{ { 10 10 } { 10 35 } { 10 10 } { 10 35 } { 10 10 } } }
65 [ "track" get [ layout ] [ children>> [ dim>> ] map ] bi ] unit-test
67 { V{ { 10 10 } { 10 80 } { 10 10 } } } [
70 "track" get [ layout ] [ children>> [ dim>> ] map ] bi
73 { 3 } [ "track" get sizes>> length ] unit-test