[commit: packages/pretty] master: Make TextDetails strict in the NoAnnot constructor (764213f)

git at git.haskell.org git at git.haskell.org
Wed Dec 16 07:11:51 UTC 2015


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

On branch  : master
Link       : http://git.haskell.org/packages/pretty.git/commitdiff/764213f8632571a2ba1dbc559242249f7c04d318

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

commit 764213f8632571a2ba1dbc559242249f7c04d318
Author: Trevor Elliott <trevor at galois.com>
Date:   Mon Jan 26 17:07:43 2015 -0800

    Make TextDetails strict in the NoAnnot constructor


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

764213f8632571a2ba1dbc559242249f7c04d318
 src/Text/PrettyPrint/Annotated/HughesPJ.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Text/PrettyPrint/Annotated/HughesPJ.hs b/src/Text/PrettyPrint/Annotated/HughesPJ.hs
index de89c8e..8670fbd 100644
--- a/src/Text/PrettyPrint/Annotated/HughesPJ.hs
+++ b/src/Text/PrettyPrint/Annotated/HughesPJ.hs
@@ -238,7 +238,7 @@ Notice the difference between
 type RDoc = Doc
 
 data AnnotDetails a = AnnotStart
-                    | NoAnnot TextDetails {-# UNPACK #-} !Int
+                    | NoAnnot !TextDetails {-# UNPACK #-} !Int
                     | AnnotEnd a
                       deriving (Show,Eq)
 



More information about the ghc-commits mailing list