diff options
| author | Ian Lynagh <ian@well-typed.com> | 2012-08-21 17:44:38 +0100 |
|---|---|---|
| committer | Ian Lynagh <ian@well-typed.com> | 2012-08-21 17:44:38 +0100 |
| commit | 75700644a7430612b40ba94476a5749594010671 (patch) | |
| tree | 4f1717e39ef576a35cbd65706582067b56d14487 /includes | |
| parent | 07295e96981b29cc6fb88b334d8ebd4b1b807516 (diff) | |
| download | haskell-75700644a7430612b40ba94476a5749594010671.tar.gz | |
Move activeStgRegs into CodeGen.Platform
Diffstat (limited to 'includes')
| -rw-r--r-- | includes/CodeGen.Platform.hs (renamed from includes/CallerSaves.part.hs) | 64 |
1 files changed, 64 insertions, 0 deletions
diff --git a/includes/CallerSaves.part.hs b/includes/CodeGen.Platform.hs index f5eec5ffb0..5ab3642e75 100644 --- a/includes/CallerSaves.part.hs +++ b/includes/CodeGen.Platform.hs @@ -79,3 +79,67 @@ callerSaves CurrentNursery = True #endif callerSaves _ = False +activeStgRegs :: [GlobalReg] +activeStgRegs = [ +#ifdef REG_Base + BaseReg +#endif +#ifdef REG_Sp + ,Sp +#endif +#ifdef REG_Hp + ,Hp +#endif +#ifdef REG_R1 + ,VanillaReg 1 VGcPtr +#endif +#ifdef REG_R2 + ,VanillaReg 2 VGcPtr +#endif +#ifdef REG_R3 + ,VanillaReg 3 VGcPtr +#endif +#ifdef REG_R4 + ,VanillaReg 4 VGcPtr +#endif +#ifdef REG_R5 + ,VanillaReg 5 VGcPtr +#endif +#ifdef REG_R6 + ,VanillaReg 6 VGcPtr +#endif +#ifdef REG_R7 + ,VanillaReg 7 VGcPtr +#endif +#ifdef REG_R8 + ,VanillaReg 8 VGcPtr +#endif +#ifdef REG_R9 + ,VanillaReg 9 VGcPtr +#endif +#ifdef REG_R10 + ,VanillaReg 10 VGcPtr +#endif +#ifdef REG_SpLim + ,SpLim +#endif +#ifdef REG_F1 + ,FloatReg 1 +#endif +#ifdef REG_F2 + ,FloatReg 2 +#endif +#ifdef REG_F3 + ,FloatReg 3 +#endif +#ifdef REG_F4 + ,FloatReg 4 +#endif +#ifdef REG_D1 + ,DoubleReg 1 +#endif +#ifdef REG_D2 + ,DoubleReg 2 +#endif + ] + |