From 79c03a2f72210f3388c7715fe3b7025bd422cc13 Mon Sep 17 00:00:00 2001 From: simonmar Date: Fri, 1 Apr 2005 11:35:17 +0000 Subject: [PATCH] [project @ 2005-04-01 11:34:20 by simonmar] build fix when !GHCI --- ghc/compiler/main/GHC.hs | 3 ++- ghc/compiler/main/HscMain.lhs | 2 +- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/ghc/compiler/main/GHC.hs b/ghc/compiler/main/GHC.hs index 89b600b..4cb1037 100644 --- a/ghc/compiler/main/GHC.hs +++ b/ghc/compiler/main/GHC.hs @@ -89,7 +89,7 @@ import qualified Linker import Linker ( HValue, extendLinkEnv ) import NameEnv ( lookupNameEnv ) import TcRnDriver ( mkExportEnv, getModuleContents ) -import RdrName ( GlobalRdrEnv, plusGlobalRdrEnv ) +import RdrName ( plusGlobalRdrEnv ) import HscMain ( hscGetInfo, GetInfoResult, hscStmt, hscTcExpr, hscKcType ) import Type ( tidyType ) @@ -98,6 +98,7 @@ import GHC.Exts ( unsafeCoerce# ) import IfaceSyn ( IfaceDecl ) #endif +import RdrName ( GlobalRdrEnv ) import HsSyn ( HsModule, LHsBinds ) import Type ( Kind, Type, dropForAlls ) import Id ( Id, idType ) diff --git a/ghc/compiler/main/HscMain.lhs b/ghc/compiler/main/HscMain.lhs index 3ec5978..f10788a 100644 --- a/ghc/compiler/main/HscMain.lhs +++ b/ghc/compiler/main/HscMain.lhs @@ -35,13 +35,13 @@ import Type ( Type ) import PrelNames ( iNTERACTIVE ) import StringBuffer ( stringToStringBuffer ) import Kind ( Kind ) -import Var ( Id ) import CoreLint ( lintUnfolding ) import DsMeta ( templateHaskellNames ) import BasicTypes ( Fixity ) import SrcLoc ( SrcLoc, noSrcLoc ) #endif +import Var ( Id ) import Module ( emptyModuleEnv ) import RdrName ( RdrName ) import HsSyn ( HsModule, LHsBinds ) -- 1.7.10.4