diff options
| author | John Ericson <John.Ericson@Obsidian.Systems> | 2021-10-27 04:06:46 +0000 |
|---|---|---|
| committer | John Ericson <John.Ericson@Obsidian.Systems> | 2021-10-27 20:55:50 +0000 |
| commit | 5a6f3c285b986891b8b56f8f1b29901892ca4e15 (patch) | |
| tree | 55addb41e4608890c406b93456c4b02465cf060d /compiler/GHC/Utils/GlobalVars.hs | |
| parent | 638f65482ca5265c268aa97abfcc14cdc27e46ba (diff) | |
| download | haskell-wip/clean-compiler-includes.tar.gz | |
Avoid GHC_STAGE and other include bitswip/clean-compiler-includes
We should strive to make our includes in terms of the RTS as much as
possible. One place there that is not possible, the llvm version, we
make a new tiny header
Stage numbers are somewhat arbitrary, if we simple need a newer RTS, we
should say so.
Diffstat (limited to 'compiler/GHC/Utils/GlobalVars.hs')
| -rw-r--r-- | compiler/GHC/Utils/GlobalVars.hs | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/compiler/GHC/Utils/GlobalVars.hs b/compiler/GHC/Utils/GlobalVars.hs index 19496d5d82..ad02bc45b1 100644 --- a/compiler/GHC/Utils/GlobalVars.hs +++ b/compiler/GHC/Utils/GlobalVars.hs @@ -22,9 +22,6 @@ module GHC.Utils.GlobalVars ) where --- For GHC_STAGE -#include "ghcplatform.h" - import GHC.Prelude import GHC.Conc.Sync ( sharedCAF ) @@ -60,7 +57,7 @@ foreign import ccall unsafe saccessor \ -#if GHC_STAGE < 2 +#if !MIN_VERSION_GLASGOW_HASKELL(9,3,0,0) GLOBAL_VAR(v_unsafeHasPprDebug, False, Bool) GLOBAL_VAR(v_unsafeHasNoDebugOutput, False, Bool) |