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