projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
10428c5
)
SPARC NCG: Remove a comment that was confusing haddock
author
Ben.Lippmeier@anu.edu.au
<unknown>
Fri, 16 Jan 2009 01:18:53 +0000
(
01:18
+0000)
committer
Ben.Lippmeier@anu.edu.au
<unknown>
Fri, 16 Jan 2009 01:18:53 +0000
(
01:18
+0000)
compiler/nativeGen/RegAllocLinear.hs
patch
|
blob
|
history
diff --git
a/compiler/nativeGen/RegAllocLinear.hs
b/compiler/nativeGen/RegAllocLinear.hs
index
66ac1bf
..
5e25299
100644
(file)
--- a/
compiler/nativeGen/RegAllocLinear.hs
+++ b/
compiler/nativeGen/RegAllocLinear.hs
@@
-204,8
+204,6
@@
noFreeRegs = FreeRegs 0 0 0
-- Don't treat the top half of reg pairs we're using as doubles as being free.
initFreeRegs :: FreeRegs
initFreeRegs
-- Don't treat the top half of reg pairs we're using as doubles as being free.
initFreeRegs :: FreeRegs
initFreeRegs
--- = trace (show allocable ++ "\n" ++ show freeDouble)
--- $ regs
= regs
where
freeDouble = getFreeRegs RcDouble regs
= regs
where
freeDouble = getFreeRegs RcDouble regs