projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fix Haddock errors.
[ghc-hetmet.git]
/
compiler
/
cmm
/
CmmExpr.hs
diff --git
a/compiler/cmm/CmmExpr.hs
b/compiler/cmm/CmmExpr.hs
index
3149fb8
..
06149b4
100644
(file)
--- a/
compiler/cmm/CmmExpr.hs
+++ b/
compiler/cmm/CmmExpr.hs
@@
-97,13
+97,13
@@
maybeInvertCmmExpr _ = Nothing
data GCKind = GCKindPtr | GCKindNonPtr deriving (Eq)
data LocalReg
data GCKind = GCKindPtr | GCKindNonPtr deriving (Eq)
data LocalReg
- = LocalReg
- !Unique -- ^ Identifier
- MachRep -- ^ Type
- GCKind -- ^ Should the GC follow as a pointer
-
--- | Sets of local registers
+ = LocalReg !Unique MachRep GCKind
+ -- ^ Parameters:
+ -- 1. Identifier
+ -- 2. Type
+ -- 3. Should the GC follow as a pointer
+-- Sets of local registers
type RegSet = UniqSet LocalReg
emptyRegSet :: RegSet
elemRegSet :: LocalReg -> RegSet -> Bool
type RegSet = UniqSet LocalReg
emptyRegSet :: RegSet
elemRegSet :: LocalReg -> RegSet -> Bool