gmt-offset<< ( value object -- )

Vocabulary

accessors

Inputs

value	an object
object	an object

Outputs

None

Definition

IN: accessors

GENERIC: gmt-offset<< ( value object -- )

Methods

USING: accessors slots.private usa-cities ;

M: city gmt-offset<< 7 set-slot ; inline


USING: accessors slots.private tzinfo.private ;

M: local-time gmt-offset<< 2 set-slot ; inline


USING: accessors slots.private zoneinfo ;

M: raw-zone gmt-offset<< 3 set-slot ; inline


USING: accessors calendar kernel slots slots.private ;

M: timestamp gmt-offset<<
    [ dup duration? [ \ duration bad-slot-value ] unless ] dip
    8 set-slot ; inline