RosettaCodeData/Task/Introspection/Haskell/introspection.hs

9 lines
198 B
Haskell
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
import Data.Version
import Control.Monad
import System.Info
minGHCVersion = Version [6, 8] []
main = when (compilerName == "ghc" && compilerVersion < minGHCVersion) $
fail "Compiler too old."