id,summary,reporter,owner,description,type,status,priority,milestone,component,version,resolution,keywords,cc,os,architecture,failure,difficulty,testcase,blockedby,blocking,related
1791,heap overflow should generate an exception,guest,,"I want to use the -M option for the goals that are stated in the manual. 

{{{
./TestProgram +RTS -M5m -RTS 
}}}
Expected output:
{{{
Something like ""out of heap space""
}}}
Actual result:
{{{
Machine going into a state where it swaps memory 
}}}

This is the code for TestProgram: 
{{{
import Control.Monad.ST 
import Data.Array.ST
import Data.Array.MArray
import Data.Array.Base(unsafeNewArray_)
main = print (runST (do make_empty_table >> return ()))

make_empty_table::  ST s (STArray s (Int, Int) (Maybe ep))
make_empty_table = 
       unsafeNewArray_ ((1, 1), (16384, 16384))
}}}

This was tested with 6.9.20071018 on an athlon-xp, and confirmed by dcoutts also on x86-64 with ghc-6.8.0.20071015. 

",feature request,new,normal,_|_,Runtime System,6.8,,,iampure@…,Unknown/Multiple,Unknown/Multiple,None/Unknown,Unknown,outofmem2,,,