diff options
author | Ian Lynagh <igloo@earth.li> | 2012-08-07 14:48:13 +0100 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2012-08-07 14:48:13 +0100 |
commit | bcc20b6bf309df26bd8b9f0d80b598eaf6cfcf42 (patch) | |
tree | c5662eee3ca3c2cc885e24ee8697d7242f63f529 /src | |
parent | 26742dface2c2144c86447d760875582cc962f4f (diff) |
Follow changes in GHC
Diffstat (limited to 'src')
-rw-r--r-- | src/Haddock/Interface.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Haddock/Interface.hs b/src/Haddock/Interface.hs index dcd794af..9b676964 100644 --- a/src/Haddock/Interface.hs +++ b/src/Haddock/Interface.hs @@ -133,7 +133,8 @@ createIfaces0 verbosity modules flags instIfaceMap = enableCompilation :: ModuleGraph -> Ghc ModuleGraph enableCompilation modGraph = do - let enableComp d = d { hscTarget = defaultObjectTarget } + let enableComp d = let platform = targetPlatform d + in d { hscTarget = defaultObjectTarget platform } modifySessionDynFlags enableComp -- We need to update the DynFlags of the ModSummaries as well. let upd m = m { ms_hspp_opts = enableComp (ms_hspp_opts m) } |