zone-month ( timestamp month -- timestamp' )

Vocabulary

zoneinfo

Inputs

timestamp	an object
month	an object

Outputs

timestamp'

an object

Definition

USING: accessors calendar.english ;

IN: zoneinfo

: zone-month ( timestamp month -- timestamp' )
    month-abbreviation-index >>month ;