keter/test/process-torun.hs

8 lines
143 B
Haskell
Raw Normal View History

2012-05-06 14:28:18 +04:00
import Control.Concurrent
import Data.Time
main = do
now <- getCurrentTime
writeFile "process.txt" $ show now
threadDelay 1000000