summaryrefslogtreecommitdiff
path: root/compiler
diff options
context:
space:
mode:
Diffstat (limited to 'compiler')
-rw-r--r--compiler/nativeGen/RegAllocLinear.hs2
1 files changed, 0 insertions, 2 deletions
diff --git a/compiler/nativeGen/RegAllocLinear.hs b/compiler/nativeGen/RegAllocLinear.hs
index 66ac1bfe1a..5e2529979d 100644
--- 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
--- = trace (show allocable ++ "\n" ++ show freeDouble)
--- $ regs
= regs
where
freeDouble = getFreeRegs RcDouble regs