diff options
| author | John Ericson <John.Ericson@Obsidian.Systems> | 2021-10-27 04:06:46 +0000 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-11-05 20:25:32 -0400 |
| commit | 3645abac01b634b61b2ea2508ba67e88ef9ee219 (patch) | |
| tree | 0274f7f1fdcb328e76a531a3ec25e357c5bc8188 /compiler/GHC/Utils/GlobalVars.hs | |
| parent | d96ce59dc86799f0cf07da2ce5a55b189a50c130 (diff) | |
| download | haskell-3645abac01b634b61b2ea2508ba67e88ef9ee219.tar.gz | |
Avoid GHC_STAGE and other include bits
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) |