[project @ 2000-11-14 10:46:39 by simonpj]

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

diff --git a/ghc/compiler/DEPEND-NOTES b/ghc/compiler/DEPEND-NOTES
index 8f63938..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
-       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, loop InstEnv.InstEnv)
+       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
@@ -24,9 +26,7 @@ then
 then
        Literal (TysPrim, PprType), DataCon
 then
-       InstEnv (Unify)
-then
-       TysWiredIn (DataCon.mkDataCon, loop MkId.mkDataConId)
+       TysWiredIn (DataCon.mkDataCon, loop MkId.mkDataConId, loop Generics.mkGenInfo)
 then
        PrimOp (PprType, TysWiredIn)
 then
@@ -45,8 +45,9 @@ 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
+       PrelInfo (MkId)