update ( tetris -- )


Vocabulary
tetris.game

Inputs
tetrisan object


Outputs
None

Definition
USING: accessors kernel math system ;

IN: tetris.game

: update ( tetris -- )
nano-count over last-update>> - over update-interval >
[ dup move-down nano-count >>last-update ] when drop ;