diff options
Diffstat (limited to 'src/Haddock/GHC.hs')
| -rw-r--r-- | src/Haddock/GHC.hs | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/src/Haddock/GHC.hs b/src/Haddock/GHC.hs index f0157f29..8ec4be82 100644 --- a/src/Haddock/GHC.hs +++ b/src/Haddock/GHC.hs @@ -13,16 +13,12 @@ module Haddock.GHC ( import Haddock.GHC.Utils import Haddock.Exception -import Haddock.Options -import Data.Foldable (foldlM) import Data.Maybe import Control.Monad -import GHC -import DynFlags hiding (Option) -import Packages hiding (package) -import StaticFlags +import GHC hiding (flags) +import DynFlags hiding (Option, flags) import SrcLoc @@ -105,6 +101,8 @@ loadPackages session pkgStrs = do -} -- | Try to parse dynamic GHC flags +parseGhcFlags :: Monad m => DynFlags -> [Located String] + -> [String] -> m DynFlags parseGhcFlags dynflags flags origFlags = do -- TODO: handle warnings? #if __GLASGOW_HASKELL__ >= 609 |