X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Fghci%2FCmCompile.lhs;h=4081c539a93270e0cea215b88390ffc8bacf6e6b;hb=348639a37fdc4da2b12fb07c5819176bb1d5f098;hp=f06b7934c081b1902ad3570e87c25acf2e3a7de2;hpb=bc28a1484c81da67373aa3b724f236e059b944a2;p=ghc-hetmet.git

diff --git a/ghc/compiler/ghci/CmCompile.lhs b/ghc/compiler/ghci/CmCompile.lhs
index f06b793..4081c53 100644
--- 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
      }