[project @ 2000-12-20 10:38:18 by simonmar]

[ghc-hetmet.git] / ghc / compiler / main / HscMain.lhs

diff --git a/ghc/compiler/main/HscMain.lhs b/ghc/compiler/main/HscMain.lhs
index a20ad02..6b96122 100644 (file)
--- a/ghc/compiler/main/HscMain.lhs
+++ b/ghc/compiler/main/HscMain.lhs
@@ -515,9 +515,10 @@ initPersistentRenamerState :: IO PersistentRenamerState
         PRS { prsOrig  = NameSupply { nsUniqs = us,
                                      nsNames = initOrigNames,
                                      nsIPs   = emptyFM },
-             prsDecls = (emptyNameEnv, 0),
-             prsInsts = (emptyBag, 0),
-             prsRules = (emptyBag, 0)
+             prsDecls   = (emptyNameEnv, 0),
+             prsInsts   = (emptyBag, 0),
+             prsRules   = (emptyBag, 0),
+             prsImpMods = emptyFM
             }
         )