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 -> [Name] -> [Sig Name] -> (GlobalSwitch -> Bool) -> SplitUniqSupply -> Bag (PprStyle -> Int -> Bool -> PrettyRep) -> SrcLoc -> Baby_TcResult ([ClassOp], [(Name, Id)], [Id], [Id])