Adapt plugins to ghcide api changes

Author: jneira

plugins/default/src/Ide/Plugin/Eval.hs

@@ -176,7 +176,7 @@ runEvalCmd lsp state EvalParams {..} = withIndefiniteProgress lsp "Eval" Cancell
           toNormalizedFilePath' $
             fp
 
-  ms <-
+  (ms, _) <-
     liftIO $
       runAction "runEvalCmd.getModSummary" state $
         use_ GetModSummary $

plugins/default/src/Ide/Plugin/Retrie.hs

@@ -360,7 +360,7 @@ callRetrie state session rewrites origin restrictToOriginatingFile = do
       getCPPmodule t = do
         nt <- toNormalizedFilePath' <$> makeAbsolute t
         let getParsedModule f contents = do
-              modSummary <-
+              (modSummary, _) <-
                 useOrFail "GetModSummary" (CallRetrieInternalError "file not found") GetModSummary nt
               let ms' =
                     modSummary

plugins/tactics/src/Ide/Plugin/Tactic.hs

@@ -247,7 +247,7 @@ judgementForHole state nfp range = do
 
   -- Ok to use the stale 'ModIface', since all we need is its 'DynFlags'
   -- which don't change very often.
-  (modsum, _) <- MaybeT $ runIde state $ useWithStale GetModSummaryWithoutTimestamps nfp
+  ((modsum,_), _) <- MaybeT $ runIde state $ useWithStale GetModSummaryWithoutTimestamps nfp
   let dflags = ms_hspp_opts modsum
 
   (rss, goal) <- liftMaybe $ join $ listToMaybe $ M.elems $ flip M.mapWithKey (getAsts $ hieAst asts) $ \fs ast ->

plugins/tactics/src/Ide/Plugin/Tactic/Types.hs

@@ -65,7 +65,7 @@ instance Show Var where
 instance Show TCvSubst where
   show  = unsafeRender
 
-instance Show (LHsExpr GhcPs) where
+instance {-# OVERLAPPING #-} Show (LHsExpr GhcPs) where
   show  = unsafeRender
 
 instance Show DataCon where