USING: kernel ui.gadgets ui.gadgets.tracks tools.test math.geometry.rect accessors ; IN: ui.gadgets.tracks.tests [ { 100 100 } ] [ { 0 1 } { 100 100 } >>dim 1 track-add pref-dim ] unit-test [ { 100 110 } ] [ { 0 1 } { 10 10 } >>dim f track-add { 100 100 } >>dim 1 track-add pref-dim ] unit-test [ { 10 10 } ] [ { 0 1 } { 10 10 } >>dim 1 track-add { 10 10 } >>dim 0 track-add pref-dim ] unit-test [ { 10 30 } ] [ { 0 1 } { 10 10 } >>dim f track-add { 10 10 } >>dim f track-add { 10 10 } >>dim f track-add pref-dim ] unit-test [ { 10 40 } ] [ { 0 1 } { 5 5 } >>gap { 10 10 } >>dim f track-add { 10 10 } >>dim f track-add { 10 10 } >>dim f track-add pref-dim ] unit-test