From: sewardj <unknown>
Date: Wed, 13 Sep 2000 09:54:27 +0000 (+0000)
Subject: [project @ 2000-09-13 09:54:27 by sewardj]
X-Git-Tag: Approximately_9120_patches~3751
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=be81c56889e79f6137e69f103ba81c1b113961f2;p=ghc-hetmet.git

[project @ 2000-09-13 09:54:27 by sewardj]
Only import MCI_make_constr if building GHCI.
---

diff --git a/ghc/compiler/stgSyn/StgInterp.lhs b/ghc/compiler/stgSyn/StgInterp.lhs
index 7963c2c..f1a1554 100644
--- a/ghc/compiler/stgSyn/StgInterp.lhs
+++ b/ghc/compiler/stgSyn/StgInterp.lhs
@@ -23,8 +23,10 @@ import TyCon		( TyCon, isDataTyCon, tyConFamilySize, tyConDataCons )
 import ClosureInfo	( mkVirtHeapOffsets )
 import Class		( Class, classTyCon )
 
+#ifdef GHCI
 -- giga-hack
 import {-# SOURCE #-} MCI_make_constr
+#endif
 
 import PrelGHC		--( unsafeCoerce#, dataToTag#,
 			--  indexPtrOffClosure#, indexWordOffClosure# )