[GHC] #6093: Kind polymorphism fails with recursive type definition using different kind

[GHC]

#6093: Kind polymorphism fails with recursive type definition using different kind
----------------------------------------+-----------------------------------
    Reporter:  Ashley Yakeley           |       Owner:                           
        Type:  bug                      |      Status:  new                      
    Priority:  normal                   |   Milestone:                           
   Component:  Compiler (Type checker)  |     Version:  7.4.1                    
    Keywords:                           |          Os:  Unknown/Multiple         
Architecture:  Unknown/Multiple         |     Failure:  GHC rejects valid program
  Difficulty:  Unknown                  |    Testcase:                           
   Blockedby:                           |    Blocking:                           
     Related:                           |  
----------------------------------------+-----------------------------------

Comment(by Ashley Yakeley):

 I also noticed I couldn't get around it with

 {{{
 data R1 t = MkR1 (R2 t)

 data R2 t where
         MkR2 :: R1 f -> R2 (f ())
 }}}

 ...but perhaps that's to be expected?

-- 
Ticket URL: <http://hackage.haskell.org/trac/ghc/ticket/6093#comment:3>
GHC <http://www.haskell.org/ghc/>
The Glasgow Haskell Compiler