如何在没有长长的 CPP if/else 条件列表的情况下在代码中获取 haskell 编译器版本？

Question

按照以下路线的内容：

import GHC.Version qualified

main :: IO ()
main = print $ GHC.Version.current
-- would print Version 8 10 7

回旋方式是从Shell中执行GHC - Version：

import System.Process

main = system "ghc --version"

但是，当运行GHC与GHC不相同时，这可能是不正确的。在路径中。

Answer 1

是的，有两种方式。第一个使用 System.Info.compilerVersion< /code>

import System.Info

main :: IO ()
main = print compilerVersion
-- prints "Version {versionBranch = [8,6], versionTags = []}"

第二个通过 CPP 语言扩展：

{-# LANGUAGE CPP #-}

main :: IO ()
main = print __GLASGOW_HASKELL__
-- prints "806" (of type Integer)

文档说明该数字如何已经想出来了。