<game-state> ( gadget -- gadget game-state )


Vocabulary
gamelib.demos.sokoban.loop

Inputs
gadgetan object


Outputs
gadgetan object
game-statean object


Definition
USING: accessors kernel ;

IN: gamelib.demos.sokoban.loop

:: <game-state> ( gadget -- gadget game-state )
gadget game-state new gadget >>gadget ;