?interrupt ( thread timer -- )

Vocabulary

timers.private

Inputs

thread	an object
timer	an object

Outputs

None

Definition

USING: accessors kernel threads ;

IN: timers.private

: ?interrupt ( thread timer -- )
    quotation-running?>> [ drop ] [ [ interrupt ] when* ] if ;