From: Simon Marlow <simonmar@microsoft.com>
Date: Tue, 19 Feb 2008 09:34:07 +0000 (+0000)
Subject: fix unregisterised stage 2 build
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=acd5ff194744289f7245303920b5c56f1bf9e038

fix unregisterised stage 2 build
---

diff --git a/compiler/ghci/RtClosureInspect.hs b/compiler/ghci/RtClosureInspect.hs
index 9e2ef17..269a7bb 100644
--- a/compiler/ghci/RtClosureInspect.hs
+++ b/compiler/ghci/RtClosureInspect.hs
@@ -70,6 +70,10 @@ import TysWiredIn
 import Outputable
 import Panic
 
+#ifndef GHCI_TABLES_NEXT_TO_CODE
+import Constants        ( wORD_SIZE )
+#endif
+
 import GHC.Arr          ( Array(..) )
 import GHC.Exts
 import GHC.IOBase ( IO(IO) )