diff --git a/tests/FSharpPlus.Tests/Monoid.fs b/tests/FSharpPlus.Tests/Monoid.fs index 512bd84f4..cba0df0a2 100644 --- a/tests/FSharpPlus.Tests/Monoid.fs +++ b/tests/FSharpPlus.Tests/Monoid.fs @@ -74,4 +74,16 @@ module Monoid = let! y = struct ("Ten", 10) return y - x } Assert.AreEqual (str, "FourTen") - Assert.AreEqual (num, 6) \ No newline at end of file + Assert.AreEqual (num, 6) + + #if NET6_0_OR_GREATER + [] + let testDateAndTimes = + let d1 = DateOnly(2020, 1, 1) + let d2 = d1 ++ zero ++ one + Assert.AreEqual (DateOnly(2020, 1, 2), d2) + + let t1 = TimeOnly (2, 10, 30) + let t2 = t1 ++ zero + Assert.AreEqual (t1, t2) + #endif \ No newline at end of file