[commit: ghc] master: White space only (ea8f91d)

git at git.haskell.org git at git.haskell.org
Fri Dec 23 12:34:58 UTC 2016


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

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

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

commit ea8f91d3915fc41f0eeabef2c773e8250b6bccb0
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Fri Dec 23 10:04:02 2016 +0000

    White space only


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

ea8f91d3915fc41f0eeabef2c773e8250b6bccb0
 compiler/main/TidyPgm.hs | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/compiler/main/TidyPgm.hs b/compiler/main/TidyPgm.hs
index c4057fc..52137a4 100644
--- a/compiler/main/TidyPgm.hs
+++ b/compiler/main/TidyPgm.hs
@@ -1255,10 +1255,10 @@ tidyTopIdInfo dflags rhs_tidy_env name orig_rhs tidy_rhs idinfo show_unfold caf_
 
     sig = strictnessInfo idinfo
     final_sig | not $ isTopSig sig
-                 = WARN( _bottom_hidden sig , ppr name ) sig
-                 -- try a cheap-and-cheerful bottom analyser
-                 | Just (_, nsig) <- mb_bot_str = nsig
-                 | otherwise                    = sig
+              = WARN( _bottom_hidden sig , ppr name ) sig
+              -- try a cheap-and-cheerful bottom analyser
+              | Just (_, nsig) <- mb_bot_str = nsig
+              | otherwise                    = sig
 
     _bottom_hidden id_sig = case mb_bot_str of
                                   Nothing         -> False



More information about the ghc-commits mailing list