#4399: Infinite loop when compiling Haskell '98 code
---------------------------------+------------------------------------------
    Reporter:  sjoerd_visscher   |       Owner:                    
        Type:  bug               |      Status:  new               
    Priority:  normal            |   Component:  Compiler          
     Version:  6.12.3            |    Keywords:                    
    Testcase:                    |   Blockedby:                    
          Os:  Unknown/Multiple  |    Blocking:                    
Architecture:  Unknown/Multiple  |     Failure:  Compile-time crash
---------------------------------+------------------------------------------
 Ghci (6.12.3 and 7.0.0) loops when it tries to compile this code:

 {{{
 data Loop = CLoop (Loop -> ())

 loop_step :: Loop -> ()
 loop_step b@(CLoop f) = f b

 loop :: ()
 loop = loop_step (CLoop loop_step)
 }}}

 It works fine when I change Loop into a newtype.

-- 
Ticket URL: <http://hackage.haskell.org/trac/ghc/ticket/4399>
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

Reply via email to