Ghc panics on tiny example, naive try to overload compose
{-# LANGUAGE MultiParamTypeClasses #-}
class Compose a b c e f where
(<.>)::(b -> c)->(a -> e)->(a -> f)
instance Compose a b c b c where
(<.>) = (.)
instance Monad m -> Compose a b c (m b) (m c) where
(<.>) f g a = g a >>= (return . f)
Trac metadata
Trac field | Value |
---|---|
Version | 7.4.1 |
Type | Bug |
TypeOfFailure | OtherFailure |
Priority | normal |
Resolution | Unresolved |
Component | Compiler |
Test case | |
Differential revisions | |
BlockedBy | |
Related | |
Blocking | |
CC | |
Operating system | |
Architecture |