diff options
| author | David Terei <davidterei@gmail.com> | 2012-06-25 01:42:44 -0700 |
|---|---|---|
| committer | David Terei <davidterei@gmail.com> | 2012-06-25 01:42:44 -0700 |
| commit | 3a8f9ea196fd663fb0c17da88a9c39aea2652dfe (patch) | |
| tree | e3ce4c6aa6c75b6caf9a0b6ad026d1a6197f4d35 /compiler/llvmGen/LlvmCodeGen/Base.hs | |
| parent | 41b37a233e92b3f7df07f1d8d4240e80643dff96 (diff) | |
| download | haskell-3a8f9ea196fd663fb0c17da88a9c39aea2652dfe.tar.gz | |
Warn if using unsupported version of LLVM.
Diffstat (limited to 'compiler/llvmGen/LlvmCodeGen/Base.hs')
| -rw-r--r-- | compiler/llvmGen/LlvmCodeGen/Base.hs | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/compiler/llvmGen/LlvmCodeGen/Base.hs b/compiler/llvmGen/LlvmCodeGen/Base.hs index 2239dbb006..19ca511f16 100644 --- a/compiler/llvmGen/LlvmCodeGen/Base.hs +++ b/compiler/llvmGen/LlvmCodeGen/Base.hs @@ -9,7 +9,8 @@ module LlvmCodeGen.Base ( LlvmCmmDecl, LlvmBasicBlock, LlvmUnresData, LlvmData, UnresLabel, UnresStatic, - LlvmVersion, defaultLlvmVersion, + LlvmVersion, defaultLlvmVersion, minSupportLlvmVersion, + maxSupportLlvmVersion, LlvmEnv, initLlvmEnv, clearVars, varLookup, varInsert, funLookup, funInsert, getLlvmVer, setLlvmVer, getLlvmPlatform, @@ -144,7 +145,13 @@ type LlvmVersion = Int -- | The LLVM Version we assume if we don't know defaultLlvmVersion :: LlvmVersion -defaultLlvmVersion = 28 +defaultLlvmVersion = 30 + +minSupportLlvmVersion :: LlvmVersion +minSupportLlvmVersion = 28 + +maxSupportLlvmVersion :: LlvmVersion +maxSupportLlvmVersion = 31 -- ---------------------------------------------------------------------------- -- * Environment Handling |