From ff48b3e3fd90e0328921f5e86460aba3ff217002 Mon Sep 17 00:00:00 2001 From: Peter Trommler Date: Mon, 25 Jan 2016 20:32:44 +0100 Subject: [PATCH] PPC/CodeGen: fix lwa instruction generation --- compiler/nativeGen/PPC/CodeGen.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) Index: ghc-8.0.1/compiler/nativeGen/PPC/CodeGen.hs =================================================================== --- ghc-8.0.1.orig/compiler/nativeGen/PPC/CodeGen.hs +++ ghc-8.0.1/compiler/nativeGen/PPC/CodeGen.hs @@ -471,7 +471,7 @@ getRegister' _ (CmmMachOp (MO_UU_Conv W3 return (Any II64 (\dst -> addr_code `snocOL` LD II32 dst addr)) getRegister' _ (CmmMachOp (MO_SS_Conv W32 W64) [CmmLoad mem _]) = do - Amode addr addr_code <- getAmode D mem + Amode addr addr_code <- getAmode DS mem -- lwa is DS-form return (Any II64 (\dst -> addr_code `snocOL` LA II32 dst addr)) getRegister' dflags (CmmMachOp mop [x]) -- unary MachOps