From 670b00ee40aee7d0fb130819469c320cfc494c5c Mon Sep 17 00:00:00 2001 From: simonmar Date: Thu, 14 Sep 2000 09:10:35 +0000 Subject: [PATCH] [project @ 2000-09-14 09:10:35 by simonmar] extend the scope of #ifdef GHCI so we can compile this with pre-4.08 compilers. --- ghc/compiler/stgSyn/StgInterp.lhs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ghc/compiler/stgSyn/StgInterp.lhs b/ghc/compiler/stgSyn/StgInterp.lhs index f1a1554..0e68c10 100644 --- a/ghc/compiler/stgSyn/StgInterp.lhs +++ b/ghc/compiler/stgSyn/StgInterp.lhs @@ -26,7 +26,6 @@ import Class ( Class, classTyCon ) #ifdef GHCI -- giga-hack import {-# SOURCE #-} MCI_make_constr -#endif import PrelGHC --( unsafeCoerce#, dataToTag#, -- indexPtrOffClosure#, indexWordOffClosure# ) @@ -37,6 +36,7 @@ import Storable import Addr -- again ... import Word import Bits +#endif runStgI :: [TyCon] -> [Class] -> [StgBinding] -> IO Int -- 1.7.10.4