[commit: ghc] master: Comment layout only (947e44f)

git at git.haskell.org git at git.haskell.org
Tue Dec 15 14:33:49 UTC 2015


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

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/947e44feebb4e979d7d476ff2aa5c7054a1c0899/ghc

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

commit 947e44feebb4e979d7d476ff2aa5c7054a1c0899
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Tue Dec 15 14:26:34 2015 +0000

    Comment layout only


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

947e44feebb4e979d7d476ff2aa5c7054a1c0899
 compiler/deSugar/DsUtils.hs | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/compiler/deSugar/DsUtils.hs b/compiler/deSugar/DsUtils.hs
index 053fc13..6d47af3 100644
--- a/compiler/deSugar/DsUtils.hs
+++ b/compiler/deSugar/DsUtils.hs
@@ -871,11 +871,11 @@ mkBinaryTickBox ixT ixF e = do
 -- also make irrefutable patterns ordinary patterns if -XStrict.
 --
 -- Example:
--- ~pat    => False, pat -- when -XStrict
--- ~pat    => False, ~pat -- without -XStrict
--- ~(~pat) => False, ~pat -- when -XStrict
--- pat     => True, pat -- when -XStrict
--- !pat    => True, pat -- always
+-- ~pat    => False, pat   -- when -XStrict
+-- ~pat    => False, ~pat  -- without -XStrict
+-- ~(~pat) => False, ~pat  -- when -XStrict
+-- pat     => True,  pat   -- when -XStrict
+-- !pat    => True,  pat   -- always
 getUnBangedLPat :: DynFlags
                 -> LPat id  -- ^ Original pattern
                 -> (Bool, LPat id) -- is bind strict?, pattern without bangs



More information about the ghc-commits mailing list