X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Frename%2FRnSource.hi-boot-5;h=1ec4d52522c6ac3676382fbbbaadaca0e5928b97;hb=5ca2f4dd447e8961e2ae09c0a45f4bd45d015411;hp=aeca07e363d259d726d2750b5c56634d48bac3ad;hpb=982006447ff7b8aa264bc018568e891313916d4d;p=ghc-hetmet.git diff --git a/ghc/compiler/rename/RnSource.hi-boot-5 b/ghc/compiler/rename/RnSource.hi-boot-5 index aeca07e..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 rnHsSigType rnHsType; -1 rnHsSigType :: __forall [_a] => Outputable.SDoc - -> RdrHsSyn.RdrNameHsType - -> RnMonad.RnMS _a (RnHsSyn.RenamedHsType, RnEnv.FreeVars) ; -1 rnHsType :: __forall [_a] => Outputable.SDoc - -> RdrHsSyn.RdrNameHsType - -> RnMonad.RnMS _a (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)