Ticket #7032: haskell-failed-sleep.hs
|
File haskell-failed-sleep.hs, 110 bytes
(added by carl, 11 months ago)
|
|
|
| Line | |
|---|
| 1 | import System.Posix |
|---|
| 2 | |
|---|
| 3 | main = loop 10 |
|---|
| 4 | |
|---|
| 5 | loop 0 = putStrLn "done" |
|---|
| 6 | |
|---|
| 7 | loop n = do |
|---|
| 8 | print n |
|---|
| 9 | sleep 2 |
|---|
| 10 | loop $ n - 1 |
|---|
Download in other formats:
