X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Frename%2FRnSource.hi-boot-5;h=1ec4d52522c6ac3676382fbbbaadaca0e5928b97;hb=041ca5cc15c08cd9c69d0f8401b11d38d4013184;hp=f2a15df1abf2c52d11a27560960b5e24fba0ad1f;hpb=3df40b7b78044206bbcffe3e2c0a57d901baf5e8;p=ghc-hetmet.git diff --git a/ghc/compiler/rename/RnSource.hi-boot-5 b/ghc/compiler/rename/RnSource.hi-boot-5 index f2a15df..1ec4d52 100644 --- a/ghc/compiler/rename/RnSource.hi-boot-5 +++ b/ghc/compiler/rename/RnSource.hi-boot-5 @@ -1,8 +1,13 @@ __interface RnSource 1 0 where -__export RnSource rnHsType rnHsSigType rnHsPolyType; -1 rnHsType :: Outputable.SDoc -> RdrHsSyn.RdrNameHsType - -> RnMonad.RnMS (RnHsSyn.RenamedHsType, RnEnv.FreeVars) ; -1 rnHsSigType :: Outputable.SDoc -> RdrHsSyn.RdrNameHsType - -> RnMonad.RnMS (RnHsSyn.RenamedHsType, RnEnv.FreeVars) ; -1 rnHsPolyType :: Outputable.SDoc -> RdrHsSyn.RdrNameHsType - -> RnMonad.RnMS (RnHsSyn.RenamedHsType, RnEnv.FreeVars) ; +__export RnSource rnBindsAndThen rnBinds rnSrcDecls; + +1 rnBindsAndThen :: __forall [b] => [HsBinds.HsBindGroup RdrName.RdrName] + -> ([HsBinds.HsBindGroup Name.Name] + -> TcRnTypes.RnM (b, NameSet.FreeVars)) + -> TcRnTypes.RnM (b, NameSet.FreeVars) ; + +1 rnBinds :: [HsBinds.HsBindGroup RdrName.RdrName] + -> TcRnTypes.RnM ([HsBinds.HsBindGroup Name.Name], NameSet.DefUses) ; + +1 rnSrcDecls :: HsDecls.HsGroup RdrName.RdrName + -> TcRnTypes.RnM (TcRnTypes.TcGblEnv, HsDecls.HsGroup Name.Name)