import Data.Char ( isDigit, isUpper )
import System.IO ( hPutStrLn, stderr )
+#ifdef GHCI
import Breakpoints ( BkptHandler )
import Module ( ModuleName )
-
+#endif
-- -----------------------------------------------------------------------------
-- DynFlags
| Opt_SplitObjs
| Opt_StgStats
| Opt_HideAllPackages
+#if defined(GHCI) && defined(DEBUGGER)
| Opt_Debugging
+#endif
| Opt_PrintBindResult
| Opt_Haddock
-- message output
log_action :: Severity -> SrcSpan -> PprStyle -> Message -> IO ()
+#ifdef GHCI
-- breakpoint handling
,bkptHandler :: Maybe (BkptHandler Module)
+#endif
}
data HscTarget
packageFlags = [],
pkgDatabase = Nothing,
pkgState = panic "no package state yet: call GHC.setSessionDynFlags",
-
+#ifdef GHCI
bkptHandler = Nothing,
+#endif
flags = [
Opt_ReadUserPackageConf,