fork download
  1. import Data.Time.Clock
  2. import Control.Concurrent
  3.  
  4. main = do
  5. now <- getCurrentTime
  6. threadDelay 100000
  7. thn <- getCurrentTime
  8. print $ diffUTCTime thn now
Success #stdin #stdout 0s 4384KB
stdin
Standard input is empty
stdout
0.100174364s