change-player-speed ( inc player -- )

Vocabulary

jamshred.player

Inputs

inc	an object
player	an object

Outputs

None

Definition

USING: accessors kernel math math.order ;

IN: jamshred.player

: change-player-speed ( inc player -- )
    [ + 0 max-speed clamp ] change-speed drop ;