update-player ( player -- )

Vocabulary

jamshred.player

Inputs

player

an object

Outputs

None

Definition

USING: accessors colors kernel ;

IN: jamshred.player

: update-player ( player -- )
    [ move-player ]
    [ nearest-segment>> COLOR: white swap color<< ] bi ;