diff options
Diffstat (limited to 'stdlib/source/test/lux/time/date.lux')
| -rw-r--r-- | stdlib/source/test/lux/time/date.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/test/lux/time/date.lux b/stdlib/source/test/lux/time/date.lux index 0aa6674b6..8e77300da 100644 --- a/stdlib/source/test/lux/time/date.lux +++ b/stdlib/source/test/lux/time/date.lux @@ -60,14 +60,14 @@ false))) (do random.monad [expected random.date] - (_.cover [/.to_days /.of_days] + (_.cover [/.days /.of_days] (|> expected - /.to_days + /.days /.of_days (\ /.equivalence = expected)))) (_.cover [/.epoch] (|> /.epoch - /.to_days + /.days (i.= +0))) (do random.monad [expected random.date] @@ -83,7 +83,7 @@ random.nat) day (\ ! map (|>> (n.% 10) (n.+ 10)) random.nat) - #let [input (format (%.nat year) + .let [input (format (%.nat year) "-" (%.nat month) "-" (%.nat day))]] (_.cover [/.invalid_month] |