Module Time

[Wojciech Moczydlowski, Jr]

The following:

module Main where

import Time

main = do
        ct <- getClockTime
        print $ diffClockTimes (addToClockTime noTimeDiff ct) ct

returns 5-hour time difference, which is rather strange.

Wojciech Moczydlowski, Jr