From: Ben.Lippmeier@anu.edu.au <unknown>
Date: Tue, 21 Apr 2009 01:44:09 +0000 (+0000)
Subject: SPARC NCG: Fix available regs for graph allocator
X-Git-Tag: 2009-06-25~154
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=de29a9f02449359b70402f763ac7590673774124

SPARC NCG: Fix available regs for graph allocator
---

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