running?>> ( object -- value )


Vocabulary
accessors

Inputs
objectan object


Outputs
valuean object


Definition
IN: accessors

GENERIC: running?>> ( object -- value )


Methods
USING: accessors game.loop kernel kernel.private slots.private ;

M: game-loop running?>> 5 slot { boolean } declare ; inline


USING: accessors slots.private tetris.game ;

M: tetris running?>> 8 slot ; inline