elapsed-time ( gadget -- n )

Vocabulary

minesweeper

Inputs

gadget

an object

Outputs

n

an object

Definition

USING: accessors calendar kernel ;

IN: minesweeper

:: elapsed-time ( gadget -- n )
    gadget start>>
    [ gadget end>> now or swap time- duration>seconds ] [ 0 ]
    if* ;