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

[ghc-hetmet.git] / ghc / compiler / ghci / CmCompile.lhs

diff --git a/ghc/compiler/ghci/CmCompile.lhs b/ghc/compiler/ghci/CmCompile.lhs
index f06b793..4081c53 100644 (file)
--- a/ghc/compiler/ghci/CmCompile.lhs
+++ b/ghc/compiler/ghci/CmCompile.lhs
@@ -135,7 +135,7 @@ type Avails   = [AvailInfo]
 \begin{code}
 data PersistentCompilerState 
    = PCS {
-        pcsPST    :: PackageSymbolTable,       -- Domain = non-home-package modules
+        pcs_PST    :: PackageSymbolTable,      -- Domain = non-home-package modules
         pcsHP     :: RnMonad.HoldingPen,       -- Pre-slurped interface bits and pieces
        pcsNS     :: NameSupply                 -- Allocate uniques for names
      }