Bug with -h and -c together

[Ian Lynagh]

Here's another one, using GHC 5.02

[ian at urchin current]$ cat W.lhs 

> module Main where

> main :: IO()
> main = putStrLn $ show $ last [1..100000]

[ian at urchin current]$ ghc W.lhs -prof -auto-all -o W
[ian at urchin current]$ ./W +RTS -h   
100000
[ian at urchin current]$ ./W +RTS -c
100000
[ian at urchin current]$ ./W +RTS -h -c
Segmentation fault (core dumped)
[ian at urchin current]$ 

In a rather larger piece of code I get

[ian at urchin current]$ ./Project -d +RTS -M350M -h -c < PP.lhs
Project: fatal error: scavenge_mark_stack: unimplemented/strange closure
type 29 @ 0x500c22a0

which is hopefully caused by the same bug.


Thanks
Ian