RTS tidyup sweep, first phase
[ghc-hetmet.git] / compiler / nativeGen / SPARC / RegPlate.hs
index ff42f2b..a0d0e4c 100644 (file)
@@ -93,7 +93,7 @@ import FastBool
 #define f31    63
 
 
-#include "../includes/MachRegs.h"
+#include "../includes/stg/MachRegs.h"
 
 -- | Check whether a machine register is free for allocation.
 freeReg :: RegNo -> FastBool
@@ -299,7 +299,7 @@ globalRegMaybe _                    = Nothing
 freeReg :: RegNo -> FastBool
 freeReg                = error "SPARC.RegPlate.freeReg: not defined"
 
-globalRegMaybe :: GlobalReg -> Maybe Reg
+globalRegMaybe :: GlobalReg -> Maybe RealReg
 globalRegMaybe = error "SPARC.RegPlate.globalRegMaybe: not defined"
 
 #endif