summaryrefslogtreecommitdiff
path: root/compiler/nativeGen/RegAlloc/Graph/TrivColorable.hs
diff options
context:
space:
mode:
authorPeter Trommler <ptrommler@acm.org>2016-12-09 15:42:11 -0500
committerBen Gamari <ben@smart-cactus.org>2016-12-09 16:38:45 -0500
commit2823492e88889d823a871c193af041ae91784524 (patch)
tree20ca2d1a2ef8d0ba4b16f5ed9ff1de72fc573f84 /compiler/nativeGen/RegAlloc/Graph/TrivColorable.hs
parent90fae01c326bf8b0802b4e8968f84886be4e1380 (diff)
downloadhaskell-2823492e88889d823a871c193af041ae91784524.tar.gz
NCG: Implement trivColorable for PowerPC 64-bit
Define constants for 64-bit PowerPC in graph coloring register allocator. Test Plan: ./validate Reviewers: simonmar, austin, erikd, bgamari, hvr Reviewed By: bgamari Subscribers: thomie Differential Revision: https://phabricator.haskell.org/D2791
Diffstat (limited to 'compiler/nativeGen/RegAlloc/Graph/TrivColorable.hs')
-rw-r--r--compiler/nativeGen/RegAlloc/Graph/TrivColorable.hs8
1 files changed, 4 insertions, 4 deletions
diff --git a/compiler/nativeGen/RegAlloc/Graph/TrivColorable.hs b/compiler/nativeGen/RegAlloc/Graph/TrivColorable.hs
index a40bec16e4..81e0c5e091 100644
--- a/compiler/nativeGen/RegAlloc/Graph/TrivColorable.hs
+++ b/compiler/nativeGen/RegAlloc/Graph/TrivColorable.hs
@@ -111,7 +111,7 @@ trivColorable platform virtualRegSqueeze realRegSqueeze RcInteger conflicts excl
ArchPPC -> 16
ArchSPARC -> 14
ArchSPARC64 -> panic "trivColorable ArchSPARC64"
- ArchPPC_64 _ -> panic "trivColorable ArchPPC_64"
+ ArchPPC_64 _ -> 15
ArchARM _ _ _ -> panic "trivColorable ArchARM"
ArchARM64 -> panic "trivColorable ArchARM64"
ArchAlpha -> panic "trivColorable ArchAlpha"
@@ -137,7 +137,7 @@ trivColorable platform virtualRegSqueeze realRegSqueeze RcFloat conflicts exclus
ArchPPC -> 0
ArchSPARC -> 22
ArchSPARC64 -> panic "trivColorable ArchSPARC64"
- ArchPPC_64 _ -> panic "trivColorable ArchPPC_64"
+ ArchPPC_64 _ -> 0
ArchARM _ _ _ -> panic "trivColorable ArchARM"
ArchARM64 -> panic "trivColorable ArchARM64"
ArchAlpha -> panic "trivColorable ArchAlpha"
@@ -163,7 +163,7 @@ trivColorable platform virtualRegSqueeze realRegSqueeze RcDouble conflicts exclu
ArchPPC -> 26
ArchSPARC -> 11
ArchSPARC64 -> panic "trivColorable ArchSPARC64"
- ArchPPC_64 _ -> panic "trivColorable ArchPPC_64"
+ ArchPPC_64 _ -> 20
ArchARM _ _ _ -> panic "trivColorable ArchARM"
ArchARM64 -> panic "trivColorable ArchARM64"
ArchAlpha -> panic "trivColorable ArchAlpha"
@@ -189,7 +189,7 @@ trivColorable platform virtualRegSqueeze realRegSqueeze RcDoubleSSE conflicts ex
ArchPPC -> 0
ArchSPARC -> 0
ArchSPARC64 -> panic "trivColorable ArchSPARC64"
- ArchPPC_64 _ -> panic "trivColorable ArchPPC_64"
+ ArchPPC_64 _ -> 0
ArchARM _ _ _ -> panic "trivColorable ArchARM"
ArchARM64 -> panic "trivColorable ArchARM64"
ArchAlpha -> panic "trivColorable ArchAlpha"