diff options
Diffstat (limited to 'compiler/codeGen')
| -rw-r--r-- | compiler/codeGen/CodeGen/Platform.hs | 21 | ||||
| -rw-r--r-- | compiler/codeGen/CodeGen/Platform/PPC_Darwin.hs | 11 |
2 files changed, 5 insertions, 27 deletions
diff --git a/compiler/codeGen/CodeGen/Platform.hs b/compiler/codeGen/CodeGen/Platform.hs index 3014a0596f..9d9a0cf2d1 100644 --- a/compiler/codeGen/CodeGen/Platform.hs +++ b/compiler/codeGen/CodeGen/Platform.hs @@ -12,7 +12,6 @@ import Reg import qualified CodeGen.Platform.ARM as ARM import qualified CodeGen.Platform.ARM64 as ARM64 import qualified CodeGen.Platform.PPC as PPC -import qualified CodeGen.Platform.PPC_Darwin as PPC_Darwin import qualified CodeGen.Platform.SPARC as SPARC import qualified CodeGen.Platform.X86 as X86 import qualified CodeGen.Platform.X86_64 as X86_64 @@ -33,9 +32,7 @@ callerSaves platform ArchARM64 -> ARM64.callerSaves arch | arch `elem` [ArchPPC, ArchPPC_64 ELF_V1, ArchPPC_64 ELF_V2] -> - case platformOS platform of - OSDarwin -> PPC_Darwin.callerSaves - _ -> PPC.callerSaves + PPC.callerSaves | otherwise -> NoRegs.callerSaves @@ -56,9 +53,7 @@ activeStgRegs platform ArchARM64 -> ARM64.activeStgRegs arch | arch `elem` [ArchPPC, ArchPPC_64 ELF_V1, ArchPPC_64 ELF_V2] -> - case platformOS platform of - OSDarwin -> PPC_Darwin.activeStgRegs - _ -> PPC.activeStgRegs + PPC.activeStgRegs | otherwise -> NoRegs.activeStgRegs @@ -74,9 +69,7 @@ haveRegBase platform ArchARM64 -> ARM64.haveRegBase arch | arch `elem` [ArchPPC, ArchPPC_64 ELF_V1, ArchPPC_64 ELF_V2] -> - case platformOS platform of - OSDarwin -> PPC_Darwin.haveRegBase - _ -> PPC.haveRegBase + PPC.haveRegBase | otherwise -> NoRegs.haveRegBase @@ -92,9 +85,7 @@ globalRegMaybe platform ArchARM64 -> ARM64.globalRegMaybe arch | arch `elem` [ArchPPC, ArchPPC_64 ELF_V1, ArchPPC_64 ELF_V2] -> - case platformOS platform of - OSDarwin -> PPC_Darwin.globalRegMaybe - _ -> PPC.globalRegMaybe + PPC.globalRegMaybe | otherwise -> NoRegs.globalRegMaybe @@ -110,9 +101,7 @@ freeReg platform ArchARM64 -> ARM64.freeReg arch | arch `elem` [ArchPPC, ArchPPC_64 ELF_V1, ArchPPC_64 ELF_V2] -> - case platformOS platform of - OSDarwin -> PPC_Darwin.freeReg - _ -> PPC.freeReg + PPC.freeReg | otherwise -> NoRegs.freeReg diff --git a/compiler/codeGen/CodeGen/Platform/PPC_Darwin.hs b/compiler/codeGen/CodeGen/Platform/PPC_Darwin.hs deleted file mode 100644 index 91923fd453..0000000000 --- a/compiler/codeGen/CodeGen/Platform/PPC_Darwin.hs +++ /dev/null @@ -1,11 +0,0 @@ -{-# LANGUAGE CPP #-} - -module CodeGen.Platform.PPC_Darwin where - -import GhcPrelude - -#define MACHREGS_NO_REGS 0 -#define MACHREGS_powerpc 1 -#define MACHREGS_darwin 1 -#include "../../../../includes/CodeGen.Platform.hs" - |