1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
2 interface TcConDecls where
4 import CmdLineOpts(GlobalSwitch)
5 import HsDecls(ConDecl)
9 import Pretty(PprStyle, PrettyRep)
10 import SplitUniq(SplitUniqSupply)
12 import TcMonad(Baby_TcResult)
14 import TyVar(TyVarTemplate)
15 import UniType(UniType)
17 tcConDecls :: UniqFM TyCon -> UniqFM UniType -> TyCon -> [TyVarTemplate] -> SpecEnv -> [ConDecl Name] -> (GlobalSwitch -> Bool) -> SplitUniqSupply -> Bag (PprStyle -> Int -> Bool -> PrettyRep) -> SrcLoc -> Baby_TcResult [(Name, Id)]
18 {-# GHC_PRAGMA _A_ 10 _U_ 2222212122 _N_ _S_ "LLLLLSLLLL" _N_ _N_ #-}