ghc/compiler/typecheck/TcPragmas.hi

   1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
   2 interface TcPragmas where
   3 import Bag(Bag)
   4 import CmdLineOpts(GlobalSwitch)
   5 import E(E)
   6 import HsDecls(ConDecl)
   7 import HsPragmas(ClassOpPragmas, DataPragmas, GenPragmas, InstancePragmas, TypePragmas)
   8 import Id(Id)
   9 import IdInfo(IdInfo, SpecEnv, SpecInfo)
  10 import Maybes(Labda)
  11 import Name(Name)
  12 import Pretty(PprStyle, PrettyRep)
  13 import SplitUniq(SplitUniqSupply)
  14 import SrcLoc(SrcLoc)
  15 import TcMonad(Baby_TcResult)
  16 import TyCon(TyCon)
  17 import TyVar(TyVarTemplate)
  18 import UniType(UniType)
  19 import UniqFM(UniqFM)
  20 tcClassOpPragmas :: E -> UniType -> Id -> Id -> SpecEnv -> ClassOpPragmas Name -> (GlobalSwitch -> Bool) -> SplitUniqSupply -> Bag (PprStyle -> Int -> Bool -> PrettyRep) -> SrcLoc -> Baby_TcResult (IdInfo, IdInfo)
  21 tcDataPragmas :: UniqFM TyCon -> UniqFM UniType -> TyCon -> [TyVarTemplate] -> DataPragmas Name -> (GlobalSwitch -> Bool) -> SplitUniqSupply -> Bag (PprStyle -> Int -> Bool -> PrettyRep) -> SrcLoc -> Baby_TcResult ([ConDecl Name], [SpecInfo])
  22 tcDictFunPragmas :: E -> UniType -> Id -> InstancePragmas Name -> (GlobalSwitch -> Bool) -> SplitUniqSupply -> Bag (PprStyle -> Int -> Bool -> PrettyRep) -> SrcLoc -> Baby_TcResult IdInfo
  23 tcGenPragmas :: E -> Labda UniType -> Id -> GenPragmas Name -> (GlobalSwitch -> Bool) -> SplitUniqSupply -> Bag (PprStyle -> Int -> Bool -> PrettyRep) -> SrcLoc -> Baby_TcResult IdInfo
  24 tcTypePragmas :: TypePragmas -> Bool
  25