summaryrefslogtreecommitdiff
path: root/compiler/GHC/Utils/Outputable.hs
diff options
context:
space:
mode:
authorAndreas Klebinger <klebinger.andreas@gmx.at>2022-09-27 00:10:47 +0200
committerAndreas Klebinger <klebinger.andreas@gmx.at>2022-11-25 14:02:15 +0100
commit3678fb2695d3fc2db8de0be3dca7dff0ccdec08a (patch)
tree538e88fba811a15d8a9d74af4e86b82f8ed59480 /compiler/GHC/Utils/Outputable.hs
parent13d627bbd0bc3dd30d672de341aa7f471be0aa2c (diff)
downloadhaskell-wip/fix-ubx-cast.tar.gz
Properly cast values when writing/reading unboxed sums.wip/fix-ubx-cast
Unboxed sums might store a Int8# value as Int64#. This patch makes sure we keep track of the actual value type. See Note [Casting slot arguments] for the details.
Diffstat (limited to 'compiler/GHC/Utils/Outputable.hs')
-rw-r--r--compiler/GHC/Utils/Outputable.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/compiler/GHC/Utils/Outputable.hs b/compiler/GHC/Utils/Outputable.hs
index 812edf15cd..74f77af445 100644
--- a/compiler/GHC/Utils/Outputable.hs
+++ b/compiler/GHC/Utils/Outputable.hs
@@ -414,6 +414,7 @@ data SDocContext = SDC
, sdocSuppressUniques :: !Bool
, sdocSuppressModulePrefixes :: !Bool
, sdocSuppressStgExts :: !Bool
+ , sdocSuppressStgReps :: !Bool
, sdocErrorSpans :: !Bool
, sdocStarIsType :: !Bool
, sdocLinearTypes :: !Bool
@@ -474,6 +475,7 @@ defaultSDocContext = SDC
, sdocSuppressUniques = False
, sdocSuppressModulePrefixes = False
, sdocSuppressStgExts = False
+ , sdocSuppressStgReps = True
, sdocErrorSpans = False
, sdocStarIsType = False
, sdocLinearTypes = False