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

Commits:

1 changed file:

Changes:

  • compiler/GHC/CmmToAsm/PPC/CodeGen.hs
    ... ... @@ -769,7 +769,7 @@ extendSExpr from to x = CmmMachOp (MO_SS_Conv from to) [x]
    769 769
     extendUExpr :: Width -> Width -> CmmExpr -> CmmExpr
    
    770 770
     extendUExpr from to x = CmmMachOp (MO_UU_Conv from to) [x]
    
    771 771
     
    
    772
    -loadZeroExpand :: CmmExpr -> CmmType -> Format -> NatM Register
    
    772
    +loadZeroExpand :: CmmExpr -> CmmType -> Width -> NatM Register
    
    773 773
     loadZeroExpand mem pk tgt = do
    
    774 774
         Amode addr addr_code <- getAmode D mem
    
    775 775
         let code dst = addr_code `snocOL` LD (cmmTypeFormat pk) dst addr