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

2014-04-20 19:34:22 -07:00 · 2014-04-20 19:34:22 -07:00 · d1b1eabf1e
parent a3ba2c3b7c
commit d1b1eabf1e
1 changed files with 2 additions and 0 deletions
--- a/basis/calendar/calendar.factor
+++ b/basis/calendar/calendar.factor
@ -33,6 +33,8 @@ TUPLE: timestamp

 C: <timestamp> timestamp

+M: timestamp clone (clone) [ clone ] change-gmt-offset ;
+
 : gmt-offset-duration ( -- duration )
    0 0 0 gmt-offset <duration> ; inline