expire-state ( class -- )

Vocabulary

furnace.cache

Inputs

class

an object

Outputs

None

Definition

USING: accessors calendar db.tuples kernel math.intervals ;

IN: furnace.cache

: expire-state ( class -- )
    new -1/0. now timestamp>micros [a,b] >>expires delete-tuples
    ;