summaryrefslogtreecommitdiff
path: root/compiler/nativeGen/CFG.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/nativeGen/CFG.hs')
-rw-r--r--compiler/nativeGen/CFG.hs1
1 files changed, 0 insertions, 1 deletions
diff --git a/compiler/nativeGen/CFG.hs b/compiler/nativeGen/CFG.hs
index 820785995e..b5b0fd7ca9 100644
--- a/compiler/nativeGen/CFG.hs
+++ b/compiler/nativeGen/CFG.hs
@@ -489,7 +489,6 @@ getCfgProc weights (CmmProc _info _lab _live graph)
| null (toBlockList graph) = mapEmpty
| otherwise = getCfg weights graph
-
getCfg :: D.CfgWeights -> CmmGraph -> CFG
getCfg weights graph =
foldl' insertEdge edgelessCfg $ concatMap getBlockEdges blocks