aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorHécate Moonlight <Kleidukos@users.noreply.github.com>2021-02-23 12:37:54 +0100
committerGitHub <noreply@github.com>2021-02-23 12:37:54 +0100
commitf7a9c5a5080e4eb61d2aa89cd0ca0fd300bd6c23 (patch)
treeb0c661e9759b8dc5e44a139a90f887b7061f7fd9
parent7f4bd04962bccf0aaf278722ebe787e61dabf194 (diff)
parent5a6b3811fe50d0b257e4baa183c9f4ad8e701081 (diff)
Merge pull request #1349 from Kleidukos/fix-interface-guesstarget-call
Fix the call-site of guessTarget in Interface.hs
-rw-r--r--haddock-api/src/Haddock/Interface.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/haddock-api/src/Haddock/Interface.hs b/haddock-api/src/Haddock/Interface.hs
index fd44e58b..b42ae1a3 100644
--- a/haddock-api/src/Haddock/Interface.hs
+++ b/haddock-api/src/Haddock/Interface.hs
@@ -59,7 +59,7 @@ import GHC.Data.Graph.Directed (flattenSCCs)
import GHC.Driver.Env (hsc_dflags, hsc_home_unit, hsc_logger, hsc_static_plugins, hsc_units)
import GHC.Driver.Monad (modifySession, withTimingM)
import GHC.Driver.Session hiding (verbosity)
-import GHC.HsToCore.Docs
+import GHC.HsToCore.Docs (getMainDeclBinder)
import GHC.Plugins (Outputable, Plugin (..), PluginWithArgs (..), StaticPlugin (..), defaultPlugin, keepRenamedSource)
import GHC.Tc.Types (TcGblEnv (..), TcM)
import GHC.Tc.Utils.Env (tcLookupGlobal)
@@ -158,7 +158,7 @@ createIfaces verbosity modules flags instIfaceMap = do
-- alive to be able to find all the instances.
modifySession installHaddockPlugin
- targets <- mapM (\filePath -> guessTarget filePath Nothing Nothing) modules
+ targets <- mapM (\filePath -> guessTarget filePath Nothing) modules
setTargets targets
loadOk <- withTimingM "load" (const ()) $