parse-zone ( seq -- zone )

Vocabulary

zoneinfo

Inputs

seq

an object

Outputs

zone

an object

Definition

USING: combinators kernel sequences ;

IN: zoneinfo

: parse-zone ( seq -- zone )
    {
        [ second ]
        [ third ]
        [ fourth ]
        [ 4 swap nth ]
        [ 5 tail harvest ]
    } cleave raw-zone boa ;