summaryrefslogtreecommitdiff
path: root/libraries/base/Control
diff options
context:
space:
mode:
authorSylvain Henry <sylvain@haskus.fr>2020-04-22 11:23:31 +0200
committerMarge Bot <ben+marge-bot@smart-cactus.org>2020-05-09 21:46:38 -0400
commit951c1fb03d80094c8b0d9bcc463d86fa71695b3a (patch)
tree28a03e1ad9256c5038a0351c806910e9b7ef5aef /libraries/base/Control
parentea86360f21e8c9812acba8dc1bc2a54fef700ece (diff)
downloadhaskell-951c1fb03d80094c8b0d9bcc463d86fa71695b3a.tar.gz
Fix unboxed-sums GC ptr-slot rubbish value (#17791)
This patch allows boot libraries to use unboxed sums without implicitly depending on `base` package because of `absentSumFieldError`. See updated Note [aBSENT_SUM_FIELD_ERROR_ID] in GHC.Core.Make
Diffstat (limited to 'libraries/base/Control')
-rw-r--r--libraries/base/Control/Exception/Base.hs6
1 files changed, 1 insertions, 5 deletions
diff --git a/libraries/base/Control/Exception/Base.hs b/libraries/base/Control/Exception/Base.hs
index f15dc0590d..a009004879 100644
--- a/libraries/base/Control/Exception/Base.hs
+++ b/libraries/base/Control/Exception/Base.hs
@@ -95,7 +95,7 @@ module Control.Exception.Base (
-- * Calls for GHC runtime
recSelError, recConError, runtimeError,
nonExhaustiveGuardsError, patError, noMethodBindingError,
- absentError, absentSumFieldError, typeError,
+ absentError, typeError,
nonTermination, nestedAtomically,
) where
@@ -398,7 +398,3 @@ nonTermination = toException NonTermination
-- GHC's RTS calls this
nestedAtomically :: SomeException
nestedAtomically = toException NestedAtomically
-
--- Introduced by unarise for unused unboxed sum fields
-absentSumFieldError :: a
-absentSumFieldError = absentError " in unboxed sum."#