RTS -K/-M options not honored

[j.waldmann]

I have this program

main = print $ do x <- [ 0 .. 5 ] ; let { y = 5 - y } ; return y

I compile with ghc-6.10.1 --make

and I execute with +RTS -M10m -K10m

but still the executable quickly eats up all my memory.

(I know the program is silly but still it should crash gracefully.)

When I do the same thing with ghc-6.8.3, I get "Heap exhausted", as it should be.

[simonmar]

Fixed:

Mon Nov 17 06:45:15 PST 2008  Simon Marlow <marlowsd@gmail.com>
  * Fix #2783: detect black-hole loops properly
  At some point we regressed on detecting simple black-hole loops.  This
  happened due to the introduction of duplicate-work detection for
  parallelism: a black-hole loop looks very much like duplicate work,
  except it's duplicate work being performed by the very same thread.
  So we have to detect and handle this case.

[igloo]

Merged