[project @ 2000-10-16 13:13:41 by sewardj]

[ghc-hetmet.git] / ghc / compiler / DEPEND-NOTES

diff --git a/ghc/compiler/DEPEND-NOTES b/ghc/compiler/DEPEND-NOTES
index c67fa97..6610879 100644 (file)
--- a/ghc/compiler/DEPEND-NOTES
+++ b/ghc/compiler/DEPEND-NOTES
@@ -7,14 +7,16 @@ A 'loop' indicates a use from a module compiled later
 
        Name, PrimRep, FieldLabel (loop Type.Type)
 then
 
        Name, PrimRep, FieldLabel (loop Type.Type)
 then

-       Var (loop CoreSyn.CoreExpr, loop IdInfo.IdInfo, 
+       PrelNames
+then
+       Var (Name, loop CoreSyn.CoreExpr, loop IdInfo.IdInfo, 

             loop Type.GenType, loop Type.Kind)
 then
        VarEnv, VarSet, ThinAir
 then
        Class (loop TyCon.TyCon, loop Type.Type)
 then
             loop Type.GenType, loop Type.Kind)
 then
        VarEnv, VarSet, ThinAir
 then
        Class (loop TyCon.TyCon, loop Type.Type)
 then

-       TyCon (loop Type.Type, loop Type.Kind, loop DataCon.DataCon)
+       TyCon (loop Type.Type, loop Type.Kind, loop DataCon.DataCon, loop Generics.GenInfo)

 then
        Type (loop DataCon.DataCon, loop Subst.substTy)
 then
 then
        Type (loop DataCon.DataCon, loop Subst.substTy)
 then

@@ -24,7 +26,7 @@ then
 then
        Literal (TysPrim, PprType), DataCon
 then
 then
        Literal (TysPrim, PprType), DataCon
 then

-       TysWiredIn (DataCon.mkDataCon, loop MkId.mkDataConId)
+       TysWiredIn (DataCon.mkDataCon, loop MkId.mkDataConId, loop Generics.mkGenInfo)

 then
        PrimOp (PprType, TysWiredIn)
 then
 then
        PrimOp (PprType, TysWiredIn)
 then

@@ -43,8 +45,9 @@ then
 then
        CoreUnfold (OccurAnal.occurAnalyseGlobalExpr)
 then
 then
        CoreUnfold (OccurAnal.occurAnalyseGlobalExpr)
 then

-       Rules (Unfolding), Subst (Unfolding, CoreFVs), CoreTidy (noUnfolding)
+       Rules (Unfolding), Subst (Unfolding, CoreFVs), CoreTidy (noUnfolding), Generics (mkTopUnfolding)

 then
        MkId (CoreUnfold.mkUnfolding, Subst)
 then
        MkId (CoreUnfold.mkUnfolding, Subst)

-
+then
+       PrelInfo (MkId)