{-# GHC_PRAGMA INTERFACE VERSION 5 #-} interface TcDefaults where import Bag(Bag) import CmdLineOpts(GlobalSwitch) import E(E) import HsDecls(DefaultDecl) import Name(Name) import Pretty(PprStyle, PrettyRep) import SplitUniq(SplitUniqSupply) import SrcLoc(SrcLoc) import Subst(Subst) import TcMonad(TcResult) import UniType(UniType) tcDefaults :: E -> [DefaultDecl Name] -> (GlobalSwitch -> Bool) -> [UniType] -> Subst -> SplitUniqSupply -> Bag (PprStyle -> Int -> Bool -> PrettyRep) -> SrcLoc -> TcResult [UniType] {-# GHC_PRAGMA _A_ 2 _U_ 21222222 _N_ _S_ "LS" _N_ _N_ #-}