game-over?>> ( object -- value )


Vocabulary
accessors

Inputs
objectan object


Outputs
valuean object


Definition
IN: accessors

GENERIC: game-over?>> ( object -- value )


Methods
USING: accessors pong slots.private ;

M: pong-gadget game-over?>> 22 slot ; inline


USING: accessors kernel kernel.private slots.private
snake-game.game ;

M: snake-game game-over?>> 9 slot { boolean } declare ; inline