[commit: ghc] wip/T15916: Fix tab and improve whitespace (9f658bf)

[git at git.haskell.org]

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

On branch  : wip/T15916
Link       : http://ghc.haskell.org/trac/ghc/changeset/9f658bf2b55d7a2c3cbeaf5b852288b2425b7744/ghc

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

commit 9f658bf2b55d7a2c3cbeaf5b852288b2425b7744
Author: Peter Trommler <ptrommler at acm.org>
Date:   Sat Dec 29 11:29:02 2018 +0100

    Fix tab and improve whitespace


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

9f658bf2b55d7a2c3cbeaf5b852288b2425b7744
 compiler/nativeGen/PPC/CodeGen.hs | 15 ++++++++-------
 1 file changed, 8 insertions(+), 7 deletions(-)

diff --git a/compiler/nativeGen/PPC/CodeGen.hs b/compiler/nativeGen/PPC/CodeGen.hs
index 5586e0e..e4bf5fe 100644
--- a/compiler/nativeGen/PPC/CodeGen.hs
+++ b/compiler/nativeGen/PPC/CodeGen.hs
@@ -1569,13 +1569,14 @@ genCCall target dest_regs argsAndHints
 data GenCCallPlatform = GCPLinux | GCPLinux64ELF !Int | GCPAIX
 
 platformToGCP :: Platform -> GenCCallPlatform
-platformToGCP platform = case platformOS platform of
-    OSAIX    -> GCPAIX
-    _ -> case platformArch platform of
-            ArchPPC           -> GCPLinux
-            ArchPPC_64 ELF_V1 -> GCPLinux64ELF 1
-            ArchPPC_64 ELF_V2 -> GCPLinux64ELF 2
-	    _ -> panic "platformToGCP: Not PowerPC"
+platformToGCP platform
+  = case platformOS platform of
+      OSAIX    -> GCPAIX
+      _ -> case platformArch platform of
+             ArchPPC           -> GCPLinux
+             ArchPPC_64 ELF_V1 -> GCPLinux64ELF 1
+             ArchPPC_64 ELF_V2 -> GCPLinux64ELF 2
+             _ -> panic "platformToGCP: Not PowerPC"
 
 
 genCCall'