diff options
author | Ludovic Courtès <ludo@gnu.org> | 2020-03-22 15:58:49 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2020-03-22 16:49:47 +0100 |
commit | 9acacb71c958218fd69cf0fb9df0b439a980a0f2 (patch) | |
tree | 67324a0405e11b78490faca2773e647bd9c96f5d /guix/cache.scm | |
parent | 99b23eabdbb660b46403649997c3ed41aeab95bb (diff) | |
download | patches-9acacb71c958218fd69cf0fb9df0b439a980a0f2.tar patches-9acacb71c958218fd69cf0fb9df0b439a980a0f2.tar.gz |
Remove workaround for 'time-monotonic' in Guile 2.2.2.
This is a followup to e688c2df3924423b67892cc9939ca099c729d1cb.
* build-aux/hydra/evaluate.scm <top level>: Remove 'time-monotonic'
definition.
* guix/cache.scm: Likewise.
* guix/progress.scm: Likewise.
* guix/scripts/substitute.scm: Likewise.
* guix/scripts/weather.scm: Likewise.
* tests/cache.scm: Likewise.
Diffstat (limited to 'guix/cache.scm')
-rw-r--r-- | guix/cache.scm | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/guix/cache.scm b/guix/cache.scm index 1dc0083f1d..feff131068 100644 --- a/guix/cache.scm +++ b/guix/cache.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2013, 2014, 2015, 2016, 2017 Ludovic Courtès <ludo@gnu.org> +;;; Copyright © 2013, 2014, 2015, 2016, 2017, 2020 Ludovic Courtès <ludo@gnu.org> ;;; ;;; This file is part of GNU Guix. ;;; @@ -33,13 +33,6 @@ ;;; ;;; Code: -(cond-expand - (guile-2.2 - ;; Guile 2.2.2 has a bug whereby 'time-monotonic' objects have seconds and - ;; nanoseconds swapped (fixed in Guile commit 886ac3e). Work around it. - (define time-monotonic time-tai)) - (else #t)) - (define (obsolete? date now ttl) "Return #t if DATE is obsolete compared to NOW + TTL seconds." (time>? (subtract-duration now (make-time time-duration 0 ttl)) |