2015-12-05 20:55:12 +00:00
|
|
|
module GHCMod.Version where
|
|
|
|
|
|
|
|
|
|
import Paths_ghc_mod
|
|
|
|
|
import Data.Version (showVersion)
|
|
|
|
|
import Config (cProjectVersion)
|
|
|
|
|
|
|
|
|
|
progVersion :: String -> String
|
|
|
|
|
progVersion pf =
|
|
|
|
|
"ghc-mod"++pf++" version " ++ showVersion version ++ " compiled by GHC "
|
2015-12-05 23:43:12 +00:00
|
|
|
++ cProjectVersion
|
2015-12-05 20:55:12 +00:00
|
|
|
|
|
|
|
|
ghcModVersion :: String
|
|
|
|
|
ghcModVersion = progVersion ""
|
|
|
|
|
|
|
|
|
|
ghcModiVersion :: String
|
|
|
|
|
ghcModiVersion = progVersion "i"
|
