mirror of
https://github.com/IHaskell/IHaskell.git
synced 2025-04-19 12:56:08 +00:00
Update src/IHaskell/Eval/Completion.hs
This commit is contained in:
parent
932886e218
commit
4446931f46
@ -29,7 +29,9 @@ import Data.Maybe (fromJust)
|
||||
import System.Environment (getEnv)
|
||||
|
||||
import GHC hiding (Qualified)
|
||||
#if MIN_VERSION_ghc(7,10,0)
|
||||
#if MIN_VERSION_ghc(8,2,0)
|
||||
import GHC.PackageDb
|
||||
#elif MIN_VERSION_ghc(7,10,0)
|
||||
import GHC.PackageDb (ExposedModule(exposedName))
|
||||
#endif
|
||||
import DynFlags
|
||||
@ -61,6 +63,9 @@ data CompletionType = Empty
|
||||
| KernelOption String
|
||||
| Extension String
|
||||
deriving (Show, Eq)
|
||||
#if MIN_VERSION_ghc(8,2,0)
|
||||
exposedName = fst
|
||||
#endif
|
||||
#if MIN_VERSION_ghc(7,10,0)
|
||||
extName (FlagSpec { flagSpecName = name }) = name
|
||||
#else
|
||||
|
Loading…
x
Reference in New Issue
Block a user