next-nanos ( timer -- timer n/f )

Vocabulary

timers.private

Inputs

timer

an object

Outputs

timer	an object
n/f	an object

Definition

USING: accessors kernel threads ;

IN: timers.private

: next-nanos ( timer -- timer n/f )
    dup thread>> self eq? [ dup next-nanos>> ] [ f ] if ;