将当前时间转换为Int(Haskell)

Question

我一直在寻找年龄来尝试找到一种简单的方法来获取当前时间(可能是从午夜,或小时,分钟,秒的秒数)到int.有人能指出我正确的方向吗？我查看了图书馆并没有成功.

Answer 1

为了获得从午夜开始的时间Int非常简单:

import Data.Time.Clock
main = do
  currTime <- getCurrentTime
  let timed = floor $ utctDayTime currTime :: Int
  print timed

对于踢球和咯咯笑,这里有一个快速的功能

integralTime :: (Integral a) => IO a
integralTime = getCurrentTime >>= return.floor.utctDayTime

这是有效的,因为TimeDiff(它是一个RealFrac实例)可以floor编辑成一个整数.