From d838d08f0ac0173dc704d51191b1c1976964b6f1 Mon Sep 17 00:00:00 2001 From: Sylvain Henry Date: Mon, 20 Jan 2020 23:12:29 +0100 Subject: Module hierarchy: runtime (cf #13009) --- haddock-api/src/Haddock.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'haddock-api/src/Haddock.hs') diff --git a/haddock-api/src/Haddock.hs b/haddock-api/src/Haddock.hs index 68392ab3..2e2f951f 100644 --- a/haddock-api/src/Haddock.hs +++ b/haddock-api/src/Haddock.hs @@ -73,7 +73,7 @@ import Packages import Panic (handleGhcException) import Module import FastString -import qualified DynamicLoading +import qualified GHC.Runtime.Loader -------------------------------------------------------------------------------- -- * Exception handling @@ -473,7 +473,7 @@ withGhc' libDir needHieFiles flags ghcActs = runGhc (Just libDir) $ do -- dynamic or static linking at all! _ <- setSessionDynFlags dynflags'' hscenv <- GHC.getSession - dynflags''' <- liftIO (DynamicLoading.initializePlugins hscenv dynflags'') + dynflags''' <- liftIO (GHC.Runtime.Loader.initializePlugins hscenv dynflags'') _ <- setSessionDynFlags dynflags''' ghcActs dynflags''' where -- cgit v1.2.3