From 029c2233e35a81e50154a1caedfe0041af9fb8b9 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@hornquist.se>
Date: Fri, 14 Feb 2020 00:01:25 +0100
Subject: Fix event-length/day.

---
 tests/srfi-19-alt-compare.scm | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'tests')

diff --git a/tests/srfi-19-alt-compare.scm b/tests/srfi-19-alt-compare.scm
index 7cf99bcd..5ee7e63d 100644
--- a/tests/srfi-19-alt-compare.scm
+++ b/tests/srfi-19-alt-compare.scm
@@ -63,3 +63,5 @@
 
 (test-assert "date/-time< other dt, same date"
   (date/-time< #2020-01-01 #2020-01-01T10:00:00))
+
+(test-assert (not (date/-time< #2018-11-30T08:10:00 #2014-04-13T16:00:00)))
-- 
cgit v1.2.3