summaryrefslogtreecommitdiff
path: root/compiler/codeGen
diff options
context:
space:
mode:
authordias@eecs.tufts.edu <unknown>2009-03-18 15:13:43 +0000
committerdias@eecs.tufts.edu <unknown>2009-03-18 15:13:43 +0000
commitfefeca989f9fb9b3fbf2be146a303b1b481097f7 (patch)
treef1d5bda7ec94bc43a0ffbe6c9127c1784537d568 /compiler/codeGen
parente5e7d10bb9fc69e58a78540a4a4bf34124730f48 (diff)
downloadhaskell-fefeca989f9fb9b3fbf2be146a303b1b481097f7.tar.gz
Removed a trace
Diffstat (limited to 'compiler/codeGen')
-rw-r--r--compiler/codeGen/CgTailCall.lhs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/codeGen/CgTailCall.lhs b/compiler/codeGen/CgTailCall.lhs
index 3732babc8f..60a856177c 100644
--- a/compiler/codeGen/CgTailCall.lhs
+++ b/compiler/codeGen/CgTailCall.lhs
@@ -387,7 +387,7 @@ tailCallPrimOp op args
-- except that *all* the arguments will be in registers.
-- Hence the ASSERT( null leftovers )
arg_amodes <- getArgAmodes args
- ; let (arg_regs, leftovers) = pprTrace "prim op" (ppr op) $ assignPrimOpCallRegs arg_amodes
+ ; let (arg_regs, leftovers) = assignPrimOpCallRegs arg_amodes
jump_to_primop = jumpToLbl (mkRtsPrimOpLabel op)
; ASSERT(null leftovers) -- no stack-resident args