Data growth issue in System.Timeout
(This bug is lhs)
The following seemingly simple code causes infinite data growth and resource exhaustion when the code for System.Timeout does not immediately appear to have a bug with respect to resource utilization.
module Main where
import System.Timeout import Control.Monad
timeoutval :: Int timeoutval = 12 * 10 ^ 6 -- 12 seconds
doit :: IO (Maybe ()) doit = timeout (-1) $ return ()
main :: IO () main = forever $ return ()
Trac metadata
Trac field | Value |
---|---|
Version | 6.12.1 |
Type | Bug |
TypeOfFailure | OtherFailure |
Priority | normal |
Resolution | Unresolved |
Component | libraries (other) |
Test case | |
Differential revisions | |
BlockedBy | |
Related | |
Blocking | |
CC | |
Operating system | |
Architecture |