X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2FbasicTypes%2FBasicTypes.lhs;h=820a3b95754e06ce00d450a374ffe25d4538959a;hb=4d9d0308c951ace938b5a209a8b046260739b3f1;hp=7551596be0d9fe1b34fd99843370392d20897dcd;hpb=6556dee91f2af4e041da8c7a7edc513cf5f109ab;p=ghc-hetmet.git

diff --git a/ghc/compiler/basicTypes/BasicTypes.lhs b/ghc/compiler/basicTypes/BasicTypes.lhs
index 7551596..820a3b9 100644
--- a/ghc/compiler/basicTypes/BasicTypes.lhs
+++ b/ghc/compiler/basicTypes/BasicTypes.lhs
@@ -36,9 +36,7 @@ module BasicTypes(
 	InsideLam, insideLam, notInsideLam,
 	OneBranch, oneBranch, notOneBranch,
 
-        EP(..),
-
-        GhciMode(..)
+        EP(..)
    ) where
 
 #include "HsVersions.h"
@@ -204,17 +202,6 @@ isNonRec NonRecursive = True
 
 %************************************************************************
 %*									*
-\subsection[Interactive/Batch]{Interactive/Batch flag}
-%*									*
-%************************************************************************
-
-\begin{code} 
-data GhciMode = Batch
-              | Interactive
-\end{code}
-
-%************************************************************************
-%*									*
 \subsection[Generic]{Generic flag}
 %*									*
 %************************************************************************