summaryrefslogtreecommitdiff
path: root/libraries/ghci/GHCi/BreakArray.hs
diff options
context:
space:
mode:
Diffstat (limited to 'libraries/ghci/GHCi/BreakArray.hs')
-rw-r--r--libraries/ghci/GHCi/BreakArray.hs6
1 files changed, 0 insertions, 6 deletions
diff --git a/libraries/ghci/GHCi/BreakArray.hs b/libraries/ghci/GHCi/BreakArray.hs
index 41a2ab498f..8ab813a5a7 100644
--- a/libraries/ghci/GHCi/BreakArray.hs
+++ b/libraries/ghci/GHCi/BreakArray.hs
@@ -19,17 +19,14 @@
module GHCi.BreakArray
(
BreakArray
-#if defined(HAVE_INTERPRETER)
(BA) -- constructor is exported only for ByteCodeGen
, newBreakArray
, getBreak
, setBreakOn
, setBreakOff
, showBreakArray
-#endif
) where
-#if defined(HAVE_INTERPRETER)
import Prelude -- See note [Why do we import Prelude here?]
import Control.Monad
import Data.Word
@@ -116,6 +113,3 @@ readBA# array i = IO $ \s ->
readBreakArray :: BreakArray -> Int -> IO Word8
readBreakArray (BA array) (I# i) = readBA# array i
-#else
-data BreakArray
-#endif