unless-paused ( tetris quot -- )

Vocabulary

tetris

Inputs

tetris	an object
quot	an object

Outputs

None

Definition

USING: accessors kernel ;

IN: tetris

: unless-paused ( tetris quot -- )
    over tetris>> paused?>> [ 2drop ] [ call ] if ; inline