diff options
author | dias@eecs.tufts.edu <unknown> | 2009-03-18 15:13:43 +0000 |
---|---|---|
committer | dias@eecs.tufts.edu <unknown> | 2009-03-18 15:13:43 +0000 |
commit | fefeca989f9fb9b3fbf2be146a303b1b481097f7 (patch) | |
tree | f1d5bda7ec94bc43a0ffbe6c9127c1784537d568 /compiler/codeGen | |
parent | e5e7d10bb9fc69e58a78540a4a4bf34124730f48 (diff) | |
download | haskell-fefeca989f9fb9b3fbf2be146a303b1b481097f7.tar.gz |
Removed a trace
Diffstat (limited to 'compiler/codeGen')
-rw-r--r-- | compiler/codeGen/CgTailCall.lhs | 2 |
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 |