[commit: ghc] master: MkIface: Ensure syntactic compatibility with ghc 8.0.1 (c88564d)

[git at git.haskell.org]

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

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

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

commit c88564dd7f41c66cee6420723131375f453631c1
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Mon Dec 18 17:16:22 2017 -0500

    MkIface: Ensure syntactic compatibility with ghc 8.0.1
    
    Prior to 8.0.2 MultiWayIf syntax required that the -> token be indented relative
    to the guard.


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

c88564dd7f41c66cee6420723131375f453631c1
 compiler/iface/MkIface.hs | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/compiler/iface/MkIface.hs b/compiler/iface/MkIface.hs
index 6d696d9..bb19a9e 100644
--- a/compiler/iface/MkIface.hs
+++ b/compiler/iface/MkIface.hs
@@ -1275,11 +1275,11 @@ checkOptimHash hsc_env iface = do
     new_hash <- liftIO $ fingerprintOptFlags (hsc_dflags hsc_env)
                                                putNameLiterally
     if | old_hash == new_hash
-       -> up_to_date (text "Optimisation flags unchanged")
+         -> up_to_date (text "Optimisation flags unchanged")
        | gopt Opt_IgnoreOptimChanges (hsc_dflags hsc_env)
-       -> up_to_date (text "Optimisation flags changed; ignoring")
+         -> up_to_date (text "Optimisation flags changed; ignoring")
        | otherwise
-       -> out_of_date_hash "Optimisation flags changed"
+         -> out_of_date_hash "Optimisation flags changed"
                      (text "  Optimisation flags have changed")
                      old_hash new_hash
 
@@ -1290,11 +1290,11 @@ checkHpcHash hsc_env iface = do
     new_hash <- liftIO $ fingerprintHpcFlags (hsc_dflags hsc_env)
                                                putNameLiterally
     if | old_hash == new_hash
-       -> up_to_date (text "HPC flags unchanged")
+         -> up_to_date (text "HPC flags unchanged")
        | gopt Opt_IgnoreHpcChanges (hsc_dflags hsc_env)
-       -> up_to_date (text "HPC flags changed; ignoring")
+         -> up_to_date (text "HPC flags changed; ignoring")
        | otherwise
-       -> out_of_date_hash "HPC flags changed"
+         -> out_of_date_hash "HPC flags changed"
                      (text "  HPC flags have changed")
                      old_hash new_hash