X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Ftypecheck%2FTcSplice.lhs-boot;h=a75ab3507ba33d07db3113ca6907335199459dee;hp=02503f3b1c49b1a7cf29457b7da9bac940a4f326;hb=HEAD;hpb=bebd5de9bc67fa6491cb7dbc06b41f109c8aab0d diff --git a/compiler/typecheck/TcSplice.lhs-boot b/compiler/typecheck/TcSplice.lhs-boot index 02503f3..a75ab35 100644 --- a/compiler/typecheck/TcSplice.lhs-boot +++ b/compiler/typecheck/TcSplice.lhs-boot @@ -1,18 +1,33 @@ \begin{code} module TcSplice where -import HsSyn ( HsSplice, HsBracket, HsExpr, LHsExpr, LHsDecl ) +import HsSyn ( HsSplice, HsBracket, HsQuasiQuote, + HsExpr, HsType, LHsType, LHsExpr, LPat, LHsDecl ) import Name ( Name ) +import NameSet ( FreeVars ) import RdrName ( RdrName ) import TcRnTypes( TcM, TcId ) -import TcType ( BoxyRhoType ) +import TcType ( TcRhoType, TcKind ) +import Annotations ( Annotation, CoreAnnTarget ) +import qualified Language.Haskell.TH as TH tcSpliceExpr :: HsSplice Name - -> BoxyRhoType + -> TcRhoType -> TcM (HsExpr TcId) +kcSpliceType :: HsSplice Name -> FreeVars + -> TcM (HsType Name, TcKind) + tcBracket :: HsBracket Name - -> BoxyRhoType + -> TcRhoType -> TcM (LHsExpr TcId) tcSpliceDecls :: LHsExpr Name -> TcM [LHsDecl RdrName] + +lookupThName_maybe :: TH.Name -> TcM (Maybe Name) + +runQuasiQuoteDecl :: HsQuasiQuote RdrName -> TcM [LHsDecl RdrName] +runQuasiQuoteExpr :: HsQuasiQuote RdrName -> TcM (LHsExpr RdrName) +runQuasiQuoteType :: HsQuasiQuote RdrName -> TcM (LHsType RdrName) +runQuasiQuotePat :: HsQuasiQuote RdrName -> TcM (LPat RdrName) +runAnnotation :: CoreAnnTarget -> LHsExpr Name -> TcM Annotation \end{code}