diff options
author | Ian Lynagh <ian@well-typed.com> | 2012-08-21 21:50:59 +0100 |
---|---|---|
committer | Ian Lynagh <ian@well-typed.com> | 2012-08-21 21:50:59 +0100 |
commit | a3d77e86c1524017962810ba2f62a3953f9d8b26 (patch) | |
tree | b9cc62c7c47601c1c4421c31bce82f1baaa8c7a7 /compiler/nativeGen/PPC/CodeGen.hs | |
parent | 98c29f9419a3f8397ef0ac6e5e0d1a175a2ec5d3 (diff) | |
download | haskell-a3d77e86c1524017962810ba2f62a3953f9d8b26.tar.gz |
Make the PPC globalRegMaybe more similar to the other platforms'
Diffstat (limited to 'compiler/nativeGen/PPC/CodeGen.hs')
-rw-r--r-- | compiler/nativeGen/PPC/CodeGen.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/nativeGen/PPC/CodeGen.hs b/compiler/nativeGen/PPC/CodeGen.hs index c725dd2f0c..4090d95c9f 100644 --- a/compiler/nativeGen/PPC/CodeGen.hs +++ b/compiler/nativeGen/PPC/CodeGen.hs @@ -178,7 +178,7 @@ getRegisterReg (CmmLocal (LocalReg u pk)) getRegisterReg (CmmGlobal mid) = case globalRegMaybe mid of - Just reg -> reg + Just reg -> RegReal reg Nothing -> pprPanic "getRegisterReg-memory" (ppr $ CmmGlobal mid) -- By this stage, the only MagicIds remaining should be the -- ones which map to a real machine register on this |