update-snake-loc ( snake-game -- snake-game )


Vocabulary
snake-game.game

Inputs
snake-gamean object


Outputs
snake-gamean object


Definition
USING: accessors kernel ;

IN: snake-game.game

: update-snake-loc ( snake-game -- snake-game )
dup snake-dir>> [ move-loc ] curry change-snake-loc ;