summaryrefslogtreecommitdiff
path: root/compiler/GHC/StgToCmm/Types.hs
diff options
context:
space:
mode:
authorMatthew Pickering <matthewtpickering@gmail.com>2021-01-27 09:58:59 +0000
committerMatthew Pickering <matthewtpickering@gmail.com>2021-02-02 08:57:08 +0000
commit67a20e2ef8e894f7767acf7ac099358fe45bf602 (patch)
tree38fe8ff5c1d0c6afde91c4276806bd3ddf0d5902 /compiler/GHC/StgToCmm/Types.hs
parent29720620de92f63a153a384710cc1370acc9852d (diff)
downloadhaskell-67a20e2ef8e894f7767acf7ac099358fe45bf602.tar.gz
Use a newtype for CHeader and CStub in ForeignStubs
Diffstat (limited to 'compiler/GHC/StgToCmm/Types.hs')
-rw-r--r--compiler/GHC/StgToCmm/Types.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/GHC/StgToCmm/Types.hs b/compiler/GHC/StgToCmm/Types.hs
index 944ff4b072..2788a4a7cc 100644
--- a/compiler/GHC/StgToCmm/Types.hs
+++ b/compiler/GHC/StgToCmm/Types.hs
@@ -15,6 +15,7 @@ module GHC.StgToCmm.Types
import GHC.Prelude
import GHC.Types.Basic
+import GHC.Types.ForeignStubs
import GHC.Core.DataCon
import GHC.Types.Name.Env
import GHC.Types.Name.Set
@@ -87,7 +88,7 @@ data CgInfos = CgInfos
-- either not exported of CAFFY.
, cgLFInfos :: !ModuleLFInfos
-- ^ LambdaFormInfos of exported closures in the current module.
- , cgIPEStub :: !SDoc
+ , cgIPEStub :: !CStub
-- ^ The C stub which is used for IPE information
}