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