Yesod Persistent - 如何将日期与UTCTime进行比较? (如何转换它们?)

时间:2016-04-30 21:40:10

标签: haskell yesod persistent

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

1 个答案:

答案 0 :(得分:3)

UTCTimeDayutctDay)和自午夜(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

您可能还想查看the Haddocks for UTCTime