1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
2 interface TcClassSig where
4 import Class(Class, ClassOp)
5 import CmdLineOpts(GlobalSwitch)
11 import Pretty(PprStyle, PrettyRep)
12 import SplitUniq(SplitUniqSupply)
14 import TcMonad(Baby_TcResult)
15 import TyVar(TyVarTemplate)
16 import UniType(UniType)
18 tcClassSigs :: E -> UniqFM UniType -> Class -> (ClassOp -> SpecEnv) -> TyVarTemplate -> [Sig Name] -> (GlobalSwitch -> Bool) -> SplitUniqSupply -> Bag (PprStyle -> Int -> Bool -> PrettyRep) -> SrcLoc -> Baby_TcResult ([ClassOp], [(Name, Id)], [Id], [Id])
19 {-# GHC_PRAGMA _A_ 6 _U_ 2222212122 _N_ _S_ "LLLLLS" _N_ _N_ #-}