zone-time ( timestamp time -- timestamp' )

Vocabulary

zoneinfo

Inputs

timestamp	an object
time	an object

Outputs

timestamp'

an object

Definition

USING: ascii calendar kernel sequences splitting.extras ;

IN: zoneinfo

: zone-time ( timestamp time -- timestamp' )
    [ Letter? ] split-tail drop parse-offset first3 set-time ;