SRFI-19: Minor refactor of leap second table lookups.
authorMark H Weaver <mhw@netris.org>
Tue, 23 Oct 2018 00:19:39 +0000 (20:19 -0400)
committerMark H Weaver <mhw@netris.org>
Wed, 24 Oct 2018 05:14:26 +0000 (01:14 -0400)
commit9f285187fe228563abaf44774c61b461cc12559a
treed8570e75702267db2996bbf0ea7363d6768de6de
parentac1fa8dba4791feb545744a89192e0d368c5f5a6
SRFI-19: Minor refactor of leap second table lookups.

* module/srfi/srfi-19.scm (leap-second-delta): Replace with ...
(utc->tai): ... this.
(leap-second-neg-delta): Replace with ...
(tai->utc): ... this.
(current-time-tai, priv:time-tai->time-utc!, priv:time-utc->time-tai!)
(time-tai->julian-day, time-monotonic->julian-day): Adapt accordingly.
module/srfi/srfi-19.scm