diff options
Diffstat (limited to 'compiler/codeGen/CodeGen/Platform.hs')
| -rw-r--r-- | compiler/codeGen/CodeGen/Platform.hs | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/compiler/codeGen/CodeGen/Platform.hs b/compiler/codeGen/CodeGen/Platform.hs index e44eed67cb..9af4712c29 100644 --- a/compiler/codeGen/CodeGen/Platform.hs +++ b/compiler/codeGen/CodeGen/Platform.hs @@ -31,7 +31,7 @@ callerSaves platform ArchARM {} -> ARM.callerSaves ArchARM64 -> ARM64.callerSaves arch - | arch `elem` [ArchPPC, ArchPPC_64] -> + | arch `elem` [ArchPPC, ArchPPC_64 ELF_V1, ArchPPC_64 ELF_V2] -> case platformOS platform of OSDarwin -> PPC_Darwin.callerSaves _ -> PPC.callerSaves @@ -54,7 +54,7 @@ activeStgRegs platform ArchARM {} -> ARM.activeStgRegs ArchARM64 -> ARM64.activeStgRegs arch - | arch `elem` [ArchPPC, ArchPPC_64] -> + | arch `elem` [ArchPPC, ArchPPC_64 ELF_V1, ArchPPC_64 ELF_V2] -> case platformOS platform of OSDarwin -> PPC_Darwin.activeStgRegs _ -> PPC.activeStgRegs @@ -72,7 +72,7 @@ haveRegBase platform ArchARM {} -> ARM.haveRegBase ArchARM64 -> ARM64.haveRegBase arch - | arch `elem` [ArchPPC, ArchPPC_64] -> + | arch `elem` [ArchPPC, ArchPPC_64 ELF_V1, ArchPPC_64 ELF_V2] -> case platformOS platform of OSDarwin -> PPC_Darwin.haveRegBase _ -> PPC.haveRegBase @@ -90,7 +90,7 @@ globalRegMaybe platform ArchARM {} -> ARM.globalRegMaybe ArchARM64 -> ARM64.globalRegMaybe arch - | arch `elem` [ArchPPC, ArchPPC_64] -> + | arch `elem` [ArchPPC, ArchPPC_64 ELF_V1, ArchPPC_64 ELF_V2] -> case platformOS platform of OSDarwin -> PPC_Darwin.globalRegMaybe _ -> PPC.globalRegMaybe @@ -108,7 +108,7 @@ freeReg platform ArchARM {} -> ARM.freeReg ArchARM64 -> ARM64.freeReg arch - | arch `elem` [ArchPPC, ArchPPC_64] -> + | arch `elem` [ArchPPC, ArchPPC_64 ELF_V1, ArchPPC_64 ELF_V2] -> case platformOS platform of OSDarwin -> PPC_Darwin.freeReg _ -> PPC.freeReg |