calendar: M\ timestamp clone should clone gmt-offset.

db4
John Benediktsson 2014-04-20 19:34:22 -07:00
parent a3ba2c3b7c
commit d1b1eabf1e
1 changed files with 2 additions and 0 deletions

View File

@ -33,6 +33,8 @@ TUPLE: timestamp
C: <timestamp> timestamp C: <timestamp> timestamp
M: timestamp clone (clone) [ clone ] change-gmt-offset ;
: gmt-offset-duration ( -- duration ) : gmt-offset-duration ( -- duration )
0 0 0 gmt-offset <duration> ; inline 0 0 0 gmt-offset <duration> ; inline