Ste*_*nce 5 mysql haskell hdbc
我正在尝试将时间戳加载到mysql中.我所有的时间都是UTCTime对象.HDBC mysql实现似乎不喜欢UTCTime对象,尽管内部文档说它将所有时间都视为UTC时间.我相信我需要将UTCTime转换为EpochTime,因为它看起来像HDBC mysql实现支持绑定SqlEpochTime.我无法弄清楚如何获取我的UTCTime并从中获取EpochTime.
现在有一个解决方法:
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
Run Code Online (Sandbox Code Playgroud)
三周前我向 Chris Waterson(HDBC-mysql 的维护者)发送了一个修复程序,他说他会将其合并到下一个版本中。