坚持-如何将一天与UTCTime作比较？(如何转换？)

Question

我有一个表示当前时间的UTCTime类型的值，以及Day类型的其他值，我想知道它是否大于或等于当前时间。

Answer 1

UTCTime由Day (utctDay)和自午夜起的秒数(utctDayTime)组成。下面是一个GHCi会话，展示了如何访问一天：

ghci > import Data.Time
ghci > time <- getCurrentTime
ghci > :t time
time :: UTCTime
ghci > utctDay time
2016-04-30
ghci > :t utctDay time
utctDay time :: Day

访问Day之后，可以使用标准比较函数(>、>= ==、<和<=)：

ghci > t1 <- getCurrentTime
ghci > t2 <- getCurrentTime
ghci > t1
2016-04-30 21:59:06.808488 UTC
ghci > t2
2016-04-30 21:59:11.920389 UTC
ghci > (utctDay t1) >= (utctDay t2)
True

您还可能希望查看UTCTime。