diff options
| author | Michael D. Adams <t-madams@microsoft.com> | 2007-05-18 13:23:17 +0000 |
|---|---|---|
| committer | Michael D. Adams <t-madams@microsoft.com> | 2007-05-18 13:23:17 +0000 |
| commit | 98037604b0b148ce26ddc07a6fc6f15b4b386224 (patch) | |
| tree | 32e12d8c93f86e56ecde5ab4ceb902ca3b9d8174 | |
| parent | c614ed092823906e3e71421f3767facd7a83a6cc (diff) | |
| download | haskell-98037604b0b148ce26ddc07a6fc6f15b4b386224.tar.gz | |
Added spLimReg to complement spReg and hpReg
| -rw-r--r-- | compiler/cmm/Cmm.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/compiler/cmm/Cmm.hs b/compiler/cmm/Cmm.hs index d3bdeada1e..00d93b01f1 100644 --- a/compiler/cmm/Cmm.hs +++ b/compiler/cmm/Cmm.hs @@ -20,7 +20,7 @@ module Cmm ( BlockId(..), GlobalReg(..), globalRegRep, - node, nodeReg, spReg, hpReg, + node, nodeReg, spReg, hpReg, spLimReg ) where #include "HsVersions.h" @@ -351,9 +351,10 @@ data GlobalReg ) -- convenient aliases -spReg, hpReg, nodeReg :: CmmReg +spReg, hpReg, spLimReg, nodeReg :: CmmReg spReg = CmmGlobal Sp hpReg = CmmGlobal Hp +spLimReg = CmmGlobal SpLim nodeReg = CmmGlobal node node :: GlobalReg |