Ticket #7032: haskell-failed-sleep.hs

File haskell-failed-sleep.hs, 110 bytes (added by carl, 22 months ago)
Line 
1import System.Posix
2
3main = loop 10
4
5loop 0 = putStrLn "done"
6
7loop n = do
8  print n
9  sleep 2
10  loop $ n - 1