current-rule-map ( -- assoc )

Vocabulary

zoneinfo

Inputs

None

Outputs

assoc

an object

Definition

USING: accessors assocs kernel sequences ;

IN: zoneinfo

: current-rule-map ( -- assoc )
    raw-rule-map [ [ to>> "max" = ] filter ] assoc-map
    harvest-values ;