snake-occupied-indices ( snake head-loc -- points )


Vocabulary
snake-game.game

Inputs
snakean object
head-locan object


Outputs
pointsan object


Definition
USING: sequences sorting ;

IN: snake-game.game

: snake-occupied-indices ( snake head-loc -- points )
snake-occupied-locs [ game-loc>index ] map sort ;