21 lines
		
	
	
		
			732 B
		
	
	
	
		
			Factor
		
	
	
			
		
		
	
	
			21 lines
		
	
	
		
			732 B
		
	
	
	
		
			Factor
		
	
	
USING: ui game.input tools.test kernel system threads calendar
 | 
						|
combinators.short-circuit ;
 | 
						|
IN: game.input.tests
 | 
						|
 | 
						|
os { [ windows? ] [ macosx? ] } 1|| [
 | 
						|
    [ ] [ open-game-input ] unit-test
 | 
						|
    [ ] [ 1 seconds sleep ] unit-test
 | 
						|
    [ ] [ 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
 |