X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Ftypecheck%2FTcSplice.lhs-boot;h=d8cd81bc114c09da05da9f702d16cbc6754e2063;hb=e9f9ec1e57d53b9302a395ce0d02c0fa59e28341;hp=32d3e5ad39c4af3d840f363ac8b55bfa8f908f0d;hpb=6f8ff0bbad3b9fa389c960ad1b5a267a1ae502f1;p=ghc-hetmet.git

diff --git a/compiler/typecheck/TcSplice.lhs-boot b/compiler/typecheck/TcSplice.lhs-boot
index 32d3e5a..d8cd81b 100644
--- a/compiler/typecheck/TcSplice.lhs-boot
+++ b/compiler/typecheck/TcSplice.lhs-boot
@@ -3,6 +3,7 @@ module TcSplice where
 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, TcKind )
@@ -13,7 +14,7 @@ tcSpliceExpr :: HsSplice Name
 	     -> BoxyRhoType
 	     -> TcM (HsExpr TcId)
 
-kcSpliceType :: HsSplice Name
+kcSpliceType :: HsSplice Name -> FreeVars
 	     -> TcM (HsType Name, TcKind)
 
 tcBracket :: HsBracket Name