From: Ben.Lippmeier@anu.edu.au <unknown>
Date: Fri, 16 Jan 2009 01:18:53 +0000 (+0000)
Subject: SPARC NCG: Remove a comment that was confusing haddock
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=240a8f698e7aa7be84fb68e8aa63ed68389e74de

SPARC NCG: Remove a comment that was confusing haddock
---

diff --git a/compiler/nativeGen/RegAllocLinear.hs b/compiler/nativeGen/RegAllocLinear.hs
index 66ac1bf..5e25299 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