(add-timer) ( word quot -- quot' )

Vocabulary

wordtimer

Inputs

word	an object
quot	an object

Outputs

quot'

an object

Definition

USING: kernel ;

IN: wordtimer

: (add-timer) ( word quot -- quot' )
    [ swap time-unless-recursing ] 2curry ;