summaryrefslogtreecommitdiff
path: root/compiler/cmm/Cmm.hs
diff options
context:
space:
mode:
authorMichal Terepeta <michal.terepeta@gmail.com>2017-03-23 21:00:24 -0400
committerBen Gamari <ben@smart-cactus.org>2017-03-24 10:14:26 -0400
commit8429a202ec8aef0af226d3fb5907b47dc9cba155 (patch)
tree7cb76d00ce02c07982e5af2bdf67d1f174f8ad4a /compiler/cmm/Cmm.hs
parent5671e22e913c60a0b5be4ddb3caa55fe8398b14f (diff)
downloadhaskell-8429a202ec8aef0af226d3fb5907b47dc9cba155.tar.gz
Cmm: remove a few unused type aliases
Test Plan: ./validate Reviewers: austin, bgamari, simonmar Reviewed By: bgamari Subscribers: rwbarton, thomie Differential Revision: https://phabricator.haskell.org/D3372
Diffstat (limited to 'compiler/cmm/Cmm.hs')
-rw-r--r--compiler/cmm/Cmm.hs9
1 files changed, 0 insertions, 9 deletions
diff --git a/compiler/cmm/Cmm.hs b/compiler/cmm/Cmm.hs
index 39c2d390d5..d2ee531686 100644
--- a/compiler/cmm/Cmm.hs
+++ b/compiler/cmm/Cmm.hs
@@ -14,9 +14,6 @@ module Cmm (
GenBasicBlock(..), blockId,
ListGraph(..), pprBBlock,
- -- * Cmm graphs
- CmmReplGraph, GenCmmReplGraph, CmmFwdRewrite, CmmBwdRewrite,
-
-- * Info Tables
CmmTopInfo(..), CmmStackInfo(..), CmmInfoTable(..), topInfoTable,
ClosureTypeInfo(..),
@@ -33,7 +30,6 @@ import BlockId
import CmmNode
import SMRep
import CmmExpr
-import UniqSupply
import Compiler.Hoopl
import Outputable
@@ -105,11 +101,6 @@ type CmmGraph = GenCmmGraph CmmNode
data GenCmmGraph n = CmmGraph { g_entry :: BlockId, g_graph :: Graph n C C }
type CmmBlock = Block CmmNode C C
-type CmmReplGraph e x = GenCmmReplGraph CmmNode e x
-type GenCmmReplGraph n e x = UniqSM (Maybe (Graph n e x))
-type CmmFwdRewrite f = FwdRewrite UniqSM CmmNode f
-type CmmBwdRewrite f = BwdRewrite UniqSM CmmNode f
-
-----------------------------------------------------------------------------
-- Info Tables
-----------------------------------------------------------------------------