summaryrefslogtreecommitdiff
path: root/compiler/nativeGen/RegAlloc/Linear/Base.hs
diff options
context:
space:
mode:
authorBen.Lippmeier@anu.edu.au <unknown>2009-02-04 04:38:02 +0000
committerBen.Lippmeier@anu.edu.au <unknown>2009-02-04 04:38:02 +0000
commit2984649a87ffad1753be0c950ed18cfc40f55fea (patch)
tree15985d0b5c0eb5e1a59d0f8acad3e69376528a48 /compiler/nativeGen/RegAlloc/Linear/Base.hs
parente8043f339e23328e3457696589edaa1ab7d60a64 (diff)
downloadhaskell-2984649a87ffad1753be0c950ed18cfc40f55fea.tar.gz
SPARC NCG: Fix some haddock problems.
Diffstat (limited to 'compiler/nativeGen/RegAlloc/Linear/Base.hs')
-rw-r--r--compiler/nativeGen/RegAlloc/Linear/Base.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/nativeGen/RegAlloc/Linear/Base.hs b/compiler/nativeGen/RegAlloc/Linear/Base.hs
index a986c0ff32..3f9146cc02 100644
--- a/compiler/nativeGen/RegAlloc/Linear/Base.hs
+++ b/compiler/nativeGen/RegAlloc/Linear/Base.hs
@@ -105,9 +105,10 @@ data RegAllocStats
data RA_State
= RA_State
+ {
-- | the current mapping from basic blocks to
-- the register assignments at the beginning of that block.
- { ra_blockassig :: BlockAssignment
+ ra_blockassig :: BlockAssignment
-- | free machine registers
, ra_freeregs :: {-#UNPACK#-}!FreeRegs