GHCi crashes with unboxed values on 32-bit platforms
The following program causes GHCi to crash, on x86 Linux and x86 Windows.
{-# LANGUAGE MagicHash #-}
import System.Mem
import GHC.Base
main = do
let list = concatMap buildThunk [0..10000]
length list `seq` performGC
print $ last list
buildThunk :: Int -> [Int]
buildThunk (I# k) = [f k]
f :: Int# -> Int
f x = I# x
Trac metadata
Trac field | Value |
---|---|
Version | 7.7 |
Type | Bug |
TypeOfFailure | OtherFailure |
Priority | normal |
Resolution | Unresolved |
Component | GHCi |
Test case | |
Differential revisions | |
BlockedBy | |
Related | |
Blocking | |
CC | hvr |
Operating system | |
Architecture |