From: Simon Marlow <simonmar@microsoft.com>
Date: Tue, 6 Nov 2007 14:20:57 +0000 (+0000)
Subject: fix stage 1 compilation
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;ds=sidebyside;h=e019188e5851492d74c386010825926396470be3;p=ghc-hetmet.git

fix stage 1 compilation
---

diff --git a/compiler/main/GHC.hs b/compiler/main/GHC.hs
index 85ecf58..8b8ab84 100644
--- a/compiler/main/GHC.hs
+++ b/compiler/main/GHC.hs
@@ -92,7 +92,7 @@ module GHC (
         InteractiveEval.forward,
 	showModule,
         isModuleInterpreted,
-	compileExpr, HValue, dynCompileExpr,
+	InteractiveEval.compileExpr, HValue, dynCompileExpr,
 	lookupName,
         GHC.obtainTerm, GHC.obtainTerm1, GHC.obtainTermB, reconstructType,
         modInfoModBreaks,
@@ -235,7 +235,7 @@ import DriverPipeline
 import DriverPhases	( HscSource(..), Phase(..), isHaskellSrcFilename, startPhase )
 import HeaderInfo	( getImports, getOptions )
 import Finder
-import HscMain          hiding (compileExpr)
+import HscMain
 import HscTypes
 import DynFlags
 import StaticFlags