我正在尝试将时间戳加载到mysql中。我所有的时间都是UTCTime对象。 HDBC mysql实现似乎不喜欢UTCTime对象,尽管内部文档说它将所有时间都视为UTC时间。我相信我需要将UTCTime转换为EpochTime,因为它看起来像HDBC mysql实现支持绑定SqlEpochTime。我无法弄清楚如何使用我的UTCTime并从中获取EpochTime。
答案 0 :(得分:4)
现在这是一个解决方法:
import Data.Time.Clock (UTCTime)
import Data.Time.Clock.POSIX (utcTimeToPOSIXSeconds)
import Database.HDBC (SqlValue (SqlEpochTime))
-- until HDBC-mysql fixes it. use instead of SqlUTCTime (data constructor)
sqlUTCTime :: UTCTime -> SqlValue
sqlUTCTime = SqlEpochTime . floor . utcTimeToPOSIXSeconds
3周前我给Chris Waterson(HDBC-mysql的mainainer)发了一个修复程序,他说他会将它合并到下一个版本中。