set-board ( board cell-pos cell -- )

Vocabulary

gamelib.demos.tic-tac-toe

Inputs

board	an object
cell-pos	an object
cell	an object

Outputs

None

Definition

USING: gamelib.board kernel ;

IN: gamelib.demos.tic-tac-toe

:: set-board ( board cell-pos cell -- )
    board cell-pos is-cell-empty?
    [ board cell-pos cell add-to-cell drop set-player ] when ;