summaryrefslogtreecommitdiff
path: root/compiler/cmm/CmmExpr.hs
diff options
context:
space:
mode:
authorsimonpj@microsoft.com <unknown>2009-09-10 12:29:28 +0000
committersimonpj@microsoft.com <unknown>2009-09-10 12:29:28 +0000
commitbe60e5192173e858be67465f8ddc6cd10cc0b108 (patch)
tree713623481abe537b7b858c47808af9d0fc4353cb /compiler/cmm/CmmExpr.hs
parent95693ea90582d7d240ed5a3c0dee9b417eed33c1 (diff)
downloadhaskell-be60e5192173e858be67465f8ddc6cd10cc0b108.tar.gz
Comments in Cmm
Diffstat (limited to 'compiler/cmm/CmmExpr.hs')
-rw-r--r--compiler/cmm/CmmExpr.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/compiler/cmm/CmmExpr.hs b/compiler/cmm/CmmExpr.hs
index e1a78a707e..a4d07c2c60 100644
--- a/compiler/cmm/CmmExpr.hs
+++ b/compiler/cmm/CmmExpr.hs
@@ -117,7 +117,10 @@ End of note -}
type SubArea = (Area, Int, Int) -- area, offset, width
type SubAreaSet = FiniteMap Area [SubArea]
+
type AreaMap = FiniteMap Area Int
+ -- Byte offset of the oldest byte of the Area,
+ -- relative to the oldest byte of the Old Area
data CmmLit
= CmmInt Integer Width