USING: kernel sequences assocs sets locals combinators
- accessors system math math.functions unicode.case prettyprint
+ accessors system math math.functions unicode prettyprint
combinators.smart dns ;
IN: dns.cache.rr
{
{ [ ENT f = ] [ T{ <entry> f TIME V{ RDATA } } RR cache-set-at ] }
{ [ ENT expired? ] [ RR cache-delete RR cache-add ] }
- { [ t ] [ TIME ENT (>>time) RDATA ENT data>> adjoin ] }
+ { [ t ] [ TIME ENT time<< RDATA ENT data>> adjoin ] }
}
cond
- ] ;
\ No newline at end of file
+ ] ;