diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2009-06-20 21:41:13 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2009-06-20 21:41:13 +0000 |
| commit | a634a40c3e99e21cfd002cea87bcf28cb2912f3d (patch) | |
| tree | 9ed1aeb49cc037601c4f502d600969b775d04cb1 /compiler/cmm | |
| parent | 5a57316c7faf6628a0d999a3a8dc68f09a158487 (diff) | |
| download | haskell-a634a40c3e99e21cfd002cea87bcf28cb2912f3d.tar.gz | |
remove dead code
Diffstat (limited to 'compiler/cmm')
| -rw-r--r-- | compiler/cmm/PprC.hs | 13 |
1 files changed, 1 insertions, 12 deletions
diff --git a/compiler/cmm/PprC.hs b/compiler/cmm/PprC.hs index 3ee3738e7b..1be886213e 100644 --- a/compiler/cmm/PprC.hs +++ b/compiler/cmm/PprC.hs @@ -679,22 +679,11 @@ mkFE_ = ptext (sLit "FE_") -- function code end -- from includes/Stg.h -- -mkC_,mkW_,mkP_,mkPP_,mkI_,mkA_,mkD_,mkF_,mkB_,mkL_,mkLI_,mkLW_ :: SDoc +mkC_,mkW_,mkP_ :: SDoc mkC_ = ptext (sLit "(C_)") -- StgChar mkW_ = ptext (sLit "(W_)") -- StgWord mkP_ = ptext (sLit "(P_)") -- StgWord* -mkPP_ = ptext (sLit "(PP_)") -- P_* -mkI_ = ptext (sLit "(I_)") -- StgInt -mkA_ = ptext (sLit "(A_)") -- StgAddr -mkD_ = ptext (sLit "(D_)") -- const StgWord* -mkF_ = ptext (sLit "(F_)") -- StgFunPtr -mkB_ = ptext (sLit "(B_)") -- StgByteArray -mkL_ = ptext (sLit "(L_)") -- StgClosurePtr - -mkLI_ = ptext (sLit "(LI_)") -- StgInt64 -mkLW_ = ptext (sLit "(LW_)") -- StgWord64 - -- --------------------------------------------------------------------- -- |