Counterpart to time-to-days?

Counterpart to time-to-days?

[Tim Landscheidt]

Hi,

prologue: With GNU Emacs 26.1, I have a list of UTC time-
stamp pairs that I want to transpose to the Europe/Berlin
time zone and group by a calculated "day" to print a shift-
plan.  For example, 2019-05-29T17:45:00Z gets (currently)
transformed to something similar to '(29 19 45), while
2019-05-29T22:30:00Z gets transformed to '(29 24 30) and
2019-05-30T03:30:00Z to '(29 29 30).  This part works just
fine.

Now I want to group and display them by week and day.  So I
applied time-to-days to the transposed timestamps (and then
planned to calculate the preceding Mondays for the minimum
and maximum days and iterate between them), but when I want-
ed to reconvert the day numbers with the fitting-by-name
days-to-time to display it as a date I hit the following id-
iosyncrasy:

| ELISP> (format-time-string "%F" (current-time))
| "2019-05-29"
| ELISP> (format-time-string "%F" (days-to-time (time-to-days (current-time))))
| "3988-05-29"
| ELISP>

So time-to-days seems to count the days from 0001-12-31bce,
while days-to-time (without being explicit about it) seems
to treat days as counting from epoch (1970-01-01).

What is the intended counterpart to time-to-days?  How is
date arithmetic supposed to be done in Emacs Lisp?

TIA,
Tim

Re: Counterpart to time-to-days?

[Bruno Barbier]

Hi,

Tim Landscheidt <tim@tim-landscheidt.de> writes:

> Hi,
>
...

> | ELISP> (format-time-string "%F" (current-time))
> | "2019-05-29"
> | ELISP> (format-time-string "%F" (days-to-time (time-to-days (current-time))))
> | "3988-05-29"
> | ELISP>
>
> So time-to-days seems to count the days from 0001-12-31bce,
> while days-to-time (without being explicit about it) seems
> to treat days as counting from epoch (1970-01-01).
>
> What is the intended counterpart to time-to-days?

Are you looking for `time-to-number-of-days` ?

   (format-time-string "%F" (days-to-time (time-to-number-of-days (current-time))))
   => 2019-05-29
      

Bruno

> How is date arithmetic supposed to be done in Emacs Lisp?

>
> TIA,
> Tim

Re: Counterpart to time-to-days?

[Tim Landscheidt]

Bruno Barbier <brubar.cs@gmail.com> wrote:

>> | ELISP> (format-time-string "%F" (current-time))
>> | "2019-05-29"
>> | ELISP> (format-time-string "%F" (days-to-time (time-to-days (current-time))))
>> | "3988-05-29"
>> | ELISP>

>> So time-to-days seems to count the days from 0001-12-31bce,
>> while days-to-time (without being explicit about it) seems
>> to treat days as counting from epoch (1970-01-01).

>> What is the intended counterpart to time-to-days?

> Are you looking for `time-to-number-of-days` ?

>    (format-time-string "%F" (days-to-time (time-to-number-of-days (current-time))))
>    => 2019-05-29

Thanks, that works.  (Now on for some time zone mangling …)

Tim