summaryrefslogtreecommitdiff
path: root/tests/cache.scm
diff options
context:
space:
mode:
Diffstat (limited to 'tests/cache.scm')
-rw-r--r--tests/cache.scm7
1 files changed, 7 insertions, 0 deletions
diff --git a/tests/cache.scm b/tests/cache.scm
index 0e1e08b693..e46cdd816d 100644
--- a/tests/cache.scm
+++ b/tests/cache.scm
@@ -24,6 +24,13 @@
#:use-module ((guix utils) #:select (call-with-temporary-directory))
#:use-module (ice-9 match))
+(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))
+
(test-begin "cache")
(test-equal "remove-expired-cache-entries"