projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(from parent 1:
ce77f70
)
[project @ 1999-01-20 09:15:37 by sof]
author
sof
<unknown>
Wed, 20 Jan 1999 09:15:37 +0000
(09:15 +0000)
committer
sof
<unknown>
Wed, 20 Jan 1999 09:15:37 +0000
(09:15 +0000)
Dead code removal
ghc/compiler/absCSyn/PprAbsC.lhs
patch
|
blob
|
history
diff --git
a/ghc/compiler/absCSyn/PprAbsC.lhs
b/ghc/compiler/absCSyn/PprAbsC.lhs
index
9143b3b
..
f5456b8
100644
(file)
--- a/
ghc/compiler/absCSyn/PprAbsC.lhs
+++ b/
ghc/compiler/absCSyn/PprAbsC.lhs
@@
-207,10
+207,6
@@
pprAbsC (CSwitch discrim alts deflt) c -- general case
-- Costs for addressing header of switch and cond. branching -- HWL
switch_head_cost = addrModeCosts discrim Rhs + (Cost (0, 1, 0, 0, 0))
-{-
-pprAbsC stmt@(COpStmt results op@(CCallOp _ _ _) args vol_regs) _
- = pprCCall op args results vol_regs
--}
pprAbsC stmt@(COpStmt results op@(CCallOp _ _ _ _) args vol_regs) _
= pprCCall op args results vol_regs