#1791: -M option does not work
-----------------------+----------------------------------------------------
Reporter: guest | Owner:
Type: bug | Status: new
Priority: normal | Milestone:
Component: Compiler | Version: 6.8
Severity: blocker | Keywords:
Difficulty: Unknown | Os: Unknown
Testcase: | Architecture: Unknown
-----------------------+----------------------------------------------------
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.
--
Ticket URL: <http://hackage.haskell.org/trac/ghc/ticket/1791>
GHC <http://www.haskell.org/ghc/>
The Glasgow Haskell Compiler_______________________________________________
Glasgow-haskell-bugs mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/glasgow-haskell-bugs
