From c46d3b74baf50b23a69683c996d810e1d7639eef Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Thu, 30 Jul 2020 20:32:41 +0200 Subject: Resolve TODO's in test dir. --- tests/datetime.scm | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'tests/datetime.scm') diff --git a/tests/datetime.scm b/tests/datetime.scm index ee25ca9d..0cbb130d 100644 --- a/tests/datetime.scm +++ b/tests/datetime.scm @@ -120,11 +120,12 @@ ;; #2018-01-17T08:00:00))) -;; TODO +;; NOTE ;; at the time of writing this returns #2020-02-00 ;; The general question is, how is the last in a month handled? -;; (test-equal -;; (date+ #2019-12-31 (date month: 1))) +(test-equal + #2020-01-31 + (date+ #2019-12-31 (date month: 1))) (test-assert (leap-year? 2020)) -- cgit v1.2.3