[commit: ghc] ghc-8.0: PPC NCG: Fix pretty printing of st[wd]ux instr. (87a3ea5)

[git at git.haskell.org]

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

On branch  : ghc-8.0
Link       : http://ghc.haskell.org/trac/ghc/changeset/87a3ea5612b0b9a174131a9a0bf9287c0820e8db/ghc

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

commit 87a3ea5612b0b9a174131a9a0bf9287c0820e8db
Author: Peter Trommler <ptrommler at acm.org>
Date:   Mon May 16 15:16:49 2016 +0200

    PPC NCG: Fix pretty printing of st[wd]ux instr.
    
    Printing STU was mixed up. The tab character must appear
    after the 'x'.
    
    Test Plan: validate on powerpc
    
    Reviewers: bgamari, austin, erikd
    
    Reviewed By: austin, erikd
    
    Subscribers: thomie
    
    Differential Revision: https://phabricator.haskell.org/D2214
    
    GHC Trac Issues: #12054
    
    (cherry picked from commit 2dbdc79bb9e2760394ebfe630908813b630146c7)


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

87a3ea5612b0b9a174131a9a0bf9287c0820e8db
 compiler/nativeGen/PPC/Ppr.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/compiler/nativeGen/PPC/Ppr.hs b/compiler/nativeGen/PPC/Ppr.hs
index 59b0ad8..b7d2196 100644
--- a/compiler/nativeGen/PPC/Ppr.hs
+++ b/compiler/nativeGen/PPC/Ppr.hs
@@ -494,9 +494,10 @@ pprInstr (STU fmt reg addr) = hcat [
         char '\t',
         text "st",
         pprFormat fmt,
-        text "u\t",
+        char 'u',
         case addr of AddrRegImm _ _ -> empty
                      AddrRegReg _ _ -> char 'x',
+        char '\t',
         pprReg reg,
         text ", ",
         pprAddr addr