[ ghc-Bugs-1227963 ] Segfault when using -xc to smoke out a <<loop>>

Bugs item #1227963, was opened at 2005-06-27 00:10
Message generated for change (Comment added) made by simonmar
You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=108032&aid=1227963&group_id=8032

Please note that this message will contain a full copy of the comment thread,
including the initial issue submission, for this request,
not just the latest update.
Category: Runtime System
Group: 6.4
>Status: Closed
>Resolution: Fixed
Priority: 5
Submitted By: Mario Bla?ević (blamario)
>Assigned to: Simon Marlow (simonmar)
Summary: Segfault when using -xc to smoke out a <<loop>>

Initial Comment:
The following program illustrates the problem:

module Main where

data T k = T | S k deriving Show

test :: T k
test = test

main :: IO ()
main = putStrLn $ show (test :: T Int)

When compiled with
   ghc --make Main.hs
and run, the program outputs "<<loop>>". Which is fine.
However, when compiled with
   ghc --make Main.hs -prof -auto-all
and run with
   ./a.out +RTS -xc -RTS
the result is a segmentation fault. There is no stack
trace.

The test was done on Gentoo Linux, the CPU is Athlon XP. 


----------------------------------------------------------------------

>Comment By: Simon Marlow (simonmar)
Date: 2005-06-27 12:11

Message:
Logged In: YES 
user_id=48280

+RTS -xc was broken in 6.4, a fix has been committed. 
Please try out a STABLE snapshot, or wait for 6.4.1.

----------------------------------------------------------------------

You can respond by visiting: 
https://sourceforge.net/tracker/?func=detail&atid=108032&aid=1227963&group_id=8032