diff options
| author | Sylvain Henry <sylvain@haskus.fr> | 2020-09-24 16:10:16 +0200 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2020-09-30 02:49:41 -0400 |
| commit | df3f58807580bc2762086e063e3823b05de6fd64 (patch) | |
| tree | 1c59f841d9eb351c20b1abe76e7db82634cc8056 /rts | |
| parent | 6527fc57b8e099703f5bdb5ec7f1dfd421651972 (diff) | |
| download | haskell-df3f58807580bc2762086e063e3823b05de6fd64.tar.gz | |
Remove unsafeGlobalDynFlags (#17957, #14597)
There are still global variables but only 3 booleans instead of a single
DynFlags.
Diffstat (limited to 'rts')
| -rw-r--r-- | rts/Globals.c | 8 | ||||
| -rw-r--r-- | rts/RtsSymbols.c | 4 |
2 files changed, 9 insertions, 3 deletions
diff --git a/rts/Globals.c b/rts/Globals.c index c9980d9a3a..4a8657dedc 100644 --- a/rts/Globals.c +++ b/rts/Globals.c @@ -35,7 +35,9 @@ typedef enum { LibHSghcFastStringTable, LibHSghcPersistentLinkerState, LibHSghcInitLinkerDone, - LibHSghcGlobalDynFlags, + LibHSghcGlobalHasPprDebug, + LibHSghcGlobalHasNoDebugOutput, + LibHSghcGlobalHasNoStateHack, LibHSghcStaticOptions, LibHSghcStaticOptionsReady, MaxStoreKey @@ -108,6 +110,8 @@ mkStoreAccessor(SystemTimerThreadIOManagerThreadStore) mkStoreAccessor(LibHSghcFastStringTable) mkStoreAccessor(LibHSghcPersistentLinkerState) mkStoreAccessor(LibHSghcInitLinkerDone) -mkStoreAccessor(LibHSghcGlobalDynFlags) +mkStoreAccessor(LibHSghcGlobalHasPprDebug) +mkStoreAccessor(LibHSghcGlobalHasNoDebugOutput) +mkStoreAccessor(LibHSghcGlobalHasNoStateHack) mkStoreAccessor(LibHSghcStaticOptions) mkStoreAccessor(LibHSghcStaticOptionsReady) diff --git a/rts/RtsSymbols.c b/rts/RtsSymbols.c index d14bdbc662..e10cef6cad 100644 --- a/rts/RtsSymbols.c +++ b/rts/RtsSymbols.c @@ -644,7 +644,9 @@ SymI_HasProto(getRTSStatsEnabled) \ SymI_HasProto(getOrSetLibHSghcPersistentLinkerState) \ SymI_HasProto(getOrSetLibHSghcInitLinkerDone) \ - SymI_HasProto(getOrSetLibHSghcGlobalDynFlags) \ + SymI_HasProto(getOrSetLibHSghcGlobalHasPprDebug) \ + SymI_HasProto(getOrSetLibHSghcGlobalHasNoDebugOutput) \ + SymI_HasProto(getOrSetLibHSghcGlobalHasNoStateHack) \ SymI_HasProto(genericRaise) \ SymI_HasProto(getProgArgv) \ SymI_HasProto(getFullProgArgv) \ |