Peter Trommler pushed to branch wip/T26519 at Glasgow Haskell Compiler / GHC

Commits:

1 changed file:

Changes:

  • compiler/GHC/CmmToAsm/PPC/CodeGen.hs
    ... ... @@ -493,7 +493,7 @@ getRegister' _ _ (CmmMachOp (MO_SS_Conv src tgt) [CmmLoad mem pk _])
    493 493
       , src < tgt = do
    
    494 494
           let format = cmmTypeFormat pk
    
    495 495
           -- lwa is DS-form. See Note [Power instruction format]
    
    496
    -      let form = if format == II32 then DS else D
    
    496
    +      let form = if format >= II32 then DS else D
    
    497 497
           Amode addr addr_code <- getAmode form mem
    
    498 498
           let code dst = assert (format == intFormat src)
    
    499 499
                          $ addr_code `snocOL` LA format dst addr