current-piece ( tetris -- piece )


Vocabulary
tetris.game

Inputs
tetrisan object


Outputs
piecean object


Definition
USING: accessors lists ;

IN: tetris.game

: current-piece ( tetris -- piece ) pieces>> car ;