[project @ 2000-09-13 09:54:27 by sewardj]
authorsewardj <unknown>
Wed, 13 Sep 2000 09:54:27 +0000 (09:54 +0000)
committersewardj <unknown>
Wed, 13 Sep 2000 09:54:27 +0000 (09:54 +0000)
Only import MCI_make_constr if building GHCI.

ghc/compiler/stgSyn/StgInterp.lhs

index 7963c2c..f1a1554 100644 (file)
@@ -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# )