From: Max Bolingbroke <batterseapower@hotmail.com>
Date: Sun, 3 Apr 2011 17:45:02 +0000 (+0100)
Subject: Make compilation of hscRnImportDecls conditional: fixes stage1 build
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=731afdc81fb55e4cc0989443bbc6aa2770d4a26b

Make compilation of hscRnImportDecls conditional: fixes stage1 build
---

diff --git a/compiler/main/HscMain.lhs b/compiler/main/HscMain.lhs
index 09f5130..37c65bb 100644
--- a/compiler/main/HscMain.lhs
+++ b/compiler/main/HscMain.lhs
@@ -58,8 +58,8 @@ module HscMain
     , hscParseIdentifier
     , hscTcRcLookupName
     , hscTcRnGetInfo
-    , hscRnImportDecls
 #ifdef GHCI
+    , hscRnImportDecls
     , hscGetModuleExports
     , hscTcRnLookupRdrName
     , hscStmt, hscStmtWithLocation
@@ -294,7 +294,6 @@ hscTcRnGetInfo hsc_env name =
 hscGetModuleExports :: HscEnv -> Module -> IO (Maybe [AvailInfo])
 hscGetModuleExports hsc_env mdl =
   runHsc hsc_env $ ioMsgMaybe' $ getModuleExports hsc_env mdl
-#endif
 
 -- -----------------------------------------------------------------------------
 -- | Rename some import declarations
@@ -312,6 +311,8 @@ hscRnImportDecls hsc_env this_mod import_decls
   = runHsc hsc_env $ ioMsgMaybe $ initTc hsc_env HsSrcFile False this_mod $
           fmap tcg_rdr_env $ tcRnImports hsc_env this_mod import_decls
 
+#endif
+
 -- -----------------------------------------------------------------------------
 -- | parse a file, returning the abstract syntax