summaryrefslogtreecommitdiff
path: root/compiler/cmm/CmmOpt.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/cmm/CmmOpt.hs')
-rw-r--r--compiler/cmm/CmmOpt.hs7
1 files changed, 4 insertions, 3 deletions
diff --git a/compiler/cmm/CmmOpt.hs b/compiler/cmm/CmmOpt.hs
index 0d44f0ffd5..f89c08178e 100644
--- a/compiler/cmm/CmmOpt.hs
+++ b/compiler/cmm/CmmOpt.hs
@@ -8,14 +8,13 @@
module CmmOpt (
cmmMachOpFold,
- cmmMachOpFoldM,
- cmmLoopifyForC,
+ cmmMachOpFoldM
) where
#include "HsVersions.h"
import CmmUtils
-import OldCmm
+import Cmm
import DynFlags
import CLabel
@@ -416,6 +415,7 @@ exactLog2 x_
except factorial, but what the hell.
-}
+{-
cmmLoopifyForC :: DynFlags -> RawCmmDecl -> RawCmmDecl
-- XXX: revisit if we actually want to do this
-- cmmLoopifyForC p@(CmmProc Nothing _ _) = p -- only if there's an info table, ignore case alts
@@ -434,6 +434,7 @@ cmmLoopifyForC dflags (CmmProc infos entry_lbl live
| otherwise = entry_lbl
cmmLoopifyForC _ top = top
+-}
-- -----------------------------------------------------------------------------
-- Utils