[project @ 1996-03-19 08:58:34 by partain]
[ghc-hetmet.git] / ghc / compiler / rename / RnLoop.lhi
1 Breaks the RnPass4/RnExpr4/RnBind4 loops.
2
3 \begin{code}
4 interface RnLoop where
5
6 import Name             ( Name )
7 import RdrHsSyn         ( ProtoNameHsBinds(..), ProtoNamePolyType(..), ProtoNameGenPragmas(..) )
8 import RnHsSyn          ( RenamedHsBinds(..), RenamedPolyType(..), RenamedGenPragmas(..) )
9 import RnBinds4         ( rnBinds, FreeVars(..) )
10 import RnMonad4         ( TyVarNamesEnv(..), Rn4M(..) )
11 import RnPass4          ( rnPolyType, rnGenPragmas )
12 import UniqSet          ( UniqSet(..) )
13
14 rnBinds :: ProtoNameHsBinds -> Rn4M (RenamedHsBinds, FreeVars, [Name])
15 rnGenPragmas :: ProtoNameGenPragmas -> Rn4M RenamedGenPragmas
16 rnPolyType :: Bool
17             -> TyVarNamesEnv
18             -> ProtoNamePolyType
19             -> Rn4M RenamedPolyType
20
21 type FreeVars = UniqSet Name
22 \end{code}