[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