Remove a bit more CPP

This could almost be handled by ghc-api-compat,
but if it was imported from TyCoPpr, it doesn't work with
ghc < 8.10

Author: anka-213

ghcide/src/Development/IDE/GHC/Compat.hs

@@ -117,6 +117,8 @@ module Development.IDE.GHC.Compat(
     LogActionCompat,
     logActionCompat,
 
+    pprSigmaType,
+
     module GHC,
     module DynFlags,
     initializePlugins,
@@ -139,12 +141,14 @@ import qualified Outputable           as Out
 import           StringBuffer
 #if MIN_GHC_API_VERSION(9,0,1)
 import qualified Data.Set             as S
+import           GHC.Core.TyCo.Ppr    (pprSigmaType)
 import           GHC.Core.TyCo.Rep    (Scaled, scaledThing)
 import           GHC.Iface.Load
 import           GHC.Types.Unique.Set (emptyUniqSet)
 import qualified SrcLoc
 #else
 import           Module               (InstalledUnitId, toInstalledUnitId)
+import           TcType               (pprSigmaType)
 #endif
 import           Compat.HieAst        (enrichHie, mkHieFile)
 import           Compat.HieBin

ghcide/src/Development/IDE/Plugin/TypeLenses.hs

@@ -1,8 +1,6 @@
-{-# LANGUAGE CPP              #-}
 {-# LANGUAGE DeriveAnyClass   #-}
 {-# LANGUAGE OverloadedLabels #-}
 {-# LANGUAGE TypeFamilies     #-}
-#include "ghc-api-version.h"
 
 -- | An HLS plugin to provide code lenses for type signatures
 module Development.IDE.Plugin.TypeLenses (
@@ -80,11 +78,6 @@ import           PatSyn                              (patSynName)
 import           TcEnv                               (tcInitTidyEnv)
 import           TcRnMonad                           (initTcWithGbl)
 import           TcRnTypes                           (TcGblEnv (..))
-#if MIN_GHC_API_VERSION(9,0,1)
-import           GHC.Core.TyCo.Ppr                   (pprSigmaType)
-#else
-import           TcType                              (pprSigmaType)
-#endif
 import           Text.Regex.TDFA                     ((=~), (=~~))
 
 typeLensCommandId :: T.Text