X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2FnativeGen%2FRegAlloc%2FGraph%2FTrivColorable.hs;fp=compiler%2FnativeGen%2FRegAlloc%2FGraph%2FTrivColorable.hs;h=df0460631396c3cf3366c19fb38b1c7c82ea9f42;hp=6a7211dd06c1bfe3828100ba479b9cd0d7f97afa;hb=de29a9f02449359b70402f763ac7590673774124;hpb=685f631451c4e6d8ebb6e31decb935db675f338e

diff --git a/compiler/nativeGen/RegAlloc/Graph/TrivColorable.hs b/compiler/nativeGen/RegAlloc/Graph/TrivColorable.hs
index 6a7211d..df04606 100644
--- a/compiler/nativeGen/RegAlloc/Graph/TrivColorable.hs
+++ b/compiler/nativeGen/RegAlloc/Graph/TrivColorable.hs
@@ -126,9 +126,9 @@ worst n classN classC
 #define ALLOCATABLE_REGS_FLOAT   (_ILIT(0))
 
 #elif sparc_TARGET_ARCH
-#define ALLOCATABLE_REGS_INTEGER (_ILIT(3))
-#define ALLOCATABLE_REGS_DOUBLE  (_ILIT(6))
-#define ALLOCATABLE_REGS_FLOAT   (_ILIT(0))
+#define ALLOCATABLE_REGS_INTEGER (_ILIT(14))
+#define ALLOCATABLE_REGS_DOUBLE  (_ILIT(8))
+#define ALLOCATABLE_REGS_FLOAT   (_ILIT(6))
 
 #else
 #error ToDo: define ALLOCATABLE_REGS_INTEGER and ALLOCATABLE_REGS_DOUBLE