factor/basis/game/input/input-tests.factor

21 lines
732 B
Factor
Raw Normal View History

USING: ui game.input tools.test kernel system threads calendar
combinators.short-circuit ;
IN: game.input.tests
2009-03-07 02:22:21 -05:00
os { [ windows? ] [ macosx? ] } 1|| [
2009-03-07 02:22:21 -05:00
[ ] [ open-game-input ] unit-test
[ ] [ 1 seconds sleep ] unit-test
2009-03-07 02:22:21 -05:00
[ ] [ close-game-input ] unit-test
] when
[ f ] [ t t button-delta ] unit-test
[ pressed ] [ f t button-delta ] unit-test
[ released ] [ t f button-delta ] unit-test
[ f ] [ 0.5 1.0 button-delta ] unit-test
[ pressed ] [ f 0.7 button-delta ] unit-test
[ released ] [ 0.2 f button-delta ] unit-test
[ { pressed f f released } ] [ { f t f t } { t t f f } buttons-delta ] unit-test
[ V{ pressed f f released } ] [ { f t f t } { t t f f } V{ } buttons-delta-as ] unit-test