Fork bomb should throw an exception
When fork bombing (example code below, just run 'f'), a failed forkIO should raise an exception, but on 6.7.20070206 it just brings my system to its knees for a while then sometimes crashes and sometimes I just have to kill it. (printouts included just for the heck of it)
import Control.Concurrent
f = do a <- forkIO g
b <- forkIO g
putStrLn $ "f(): Forked a: " ++ (show a) ++ " and b: " ++ (show b)
return ()
g = do a <- forkIO f
b <- forkIO f
putStrLn $ "g(): Forked a: " ++ (show a) ++ " and b: " ++ (show b)
return ()
Trac metadata
Trac field | Value |
---|---|
Version | 6.7 |
Type | Bug |
TypeOfFailure | OtherFailure |
Priority | normal |
Resolution | Unresolved |
Component | Runtime System |
Test case | |
Differential revisions | |
BlockedBy | |
Related | |
Blocking | |
CC | |
Operating system | |
Architecture | Unknown |