[project @ 2000-10-02 14:05:22 by sewardj]

Partially back out changes mistakenly included in last commit :-(

diff --git a/ghc/compiler/nativeGen/AsmRegAlloc.lhs b/ghc/compiler/nativeGen/AsmRegAlloc.lhs
index 6349b44..e6a80c4 100644 (file)
--- a/ghc/compiler/nativeGen/AsmRegAlloc.lhs
+++ b/ghc/compiler/nativeGen/AsmRegAlloc.lhs
@@ -206,14 +206,7 @@ doGeneralAlloc
 
 doGeneralAlloc all_regs reserve_regs instrs
    -- succeeded without spilling
-   | --trace (showSDoc (
-     --   text "allocating with these regs" <+> ppr prespill_regs
-     --   $$
-     --   text "giving code" 
-     --   $$
-     --   vcat (map pprInstr prespill_insns)
-     --))
-     prespill_ok
+   | prespill_ok
    = Just prespill_insns
 
    -- failed, and no spill regs avail, so pointless to attempt spilling