[commit: ghc] wip/T14626: WIP: some more de-strictifying (bdfa919)

git at git.haskell.org git at git.haskell.org
Sun Jan 28 16:06:37 UTC 2018


Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/T14626
Link       : http://ghc.haskell.org/trac/ghc/changeset/bdfa91956326db08c525c90bc908941ed2636f14/ghc

>---------------------------------------------------------------

commit bdfa91956326db08c525c90bc908941ed2636f14
Author: Gabor Greif <ggreif at gmail.com>
Date:   Fri Jan 12 15:41:40 2018 +0100

    WIP: some more de-strictifying


>---------------------------------------------------------------

bdfa91956326db08c525c90bc908941ed2636f14
 compiler/codeGen/StgCmmClosure.hs | 2 +-
 compiler/utils/Outputable.hs      | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/compiler/codeGen/StgCmmClosure.hs b/compiler/codeGen/StgCmmClosure.hs
index 24f21f0..d5caff8 100644
--- a/compiler/codeGen/StgCmmClosure.hs
+++ b/compiler/codeGen/StgCmmClosure.hs
@@ -768,7 +768,7 @@ data ClosureInfo
            -- code for ticky and profiling, and we could pass the information
            -- around separately, but it doesn't do much harm to keep it here.
 
-        closureLFInfo :: !LambdaFormInfo, -- NOTE: not an LFCon
+        closureLFInfo :: LambdaFormInfo, -- NOTE: not an LFCon
           -- this tells us about what the closure contains: it's right-hand-side.
 
           -- the rest is just an unpacked CmmInfoTable.
diff --git a/compiler/utils/Outputable.hs b/compiler/utils/Outputable.hs
index 793b8fb..fd0de1e 100644
--- a/compiler/utils/Outputable.hs
+++ b/compiler/utils/Outputable.hs
@@ -321,7 +321,7 @@ code (either C or assembly), or generating interface files.
 newtype SDoc = SDoc { runSDoc :: SDocContext -> Doc }
 
 data SDocContext = SDC
-  { sdocStyle      :: !PprStyle
+  { sdocStyle      :: PprStyle
   , sdocLastColour :: !Col.PprColour
     -- ^ The most recently used colour.  This allows nesting colours.
   , sdocDynFlags   :: !DynFlags



More information about the ghc-commits mailing list