Cmm: remove a few unused type aliases
authorMichal Terepeta <michal.terepeta@gmail.com>
Fri, 24 Mar 2017 01:00:24 +0000 (21:00 -0400)
committerBen Gamari <ben@smart-cactus.org>
Fri, 24 Mar 2017 14:14:26 +0000 (10:14 -0400)
Test Plan: ./validate

Reviewers: austin, bgamari, simonmar

Reviewed By: bgamari

Subscribers: rwbarton, thomie

Differential Revision: https://phabricator.haskell.org/D3372

compiler/cmm/Cmm.hs

index 39c2d39..d2ee531 100644 (file)
@@ -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
 -----------------------------------------------------------------------------