summaryrefslogtreecommitdiff
path: root/compiler/GHC/Stg
diff options
context:
space:
mode:
authorRichard Eisenberg <rae@richarde.dev>2020-10-14 18:12:45 -0400
committerMarge Bot <ben+marge-bot@smart-cactus.org>2020-12-01 19:57:41 -0500
commit72a87fbc7a95c012be260d1a14374e2b06ed0a36 (patch)
tree5c8de20dd2ddfbef39324baacfe01cc30638e55f /compiler/GHC/Stg
parentb94a65afe1e270245cd5b9fe03d59b726dfba8c4 (diff)
downloadhaskell-72a87fbc7a95c012be260d1a14374e2b06ed0a36.tar.gz
Move core flattening algorithm to Core.Unify
This sets the stage for a later change, where this algorithm will be needed from GHC.Core.InstEnv. This commit also splits GHC.Core.Map into GHC.Core.Map.Type and GHC.Core.Map.Expr, in order to avoid module import cycles with GHC.Core.
Diffstat (limited to 'compiler/GHC/Stg')
-rw-r--r--compiler/GHC/Stg/CSE.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/GHC/Stg/CSE.hs b/compiler/GHC/Stg/CSE.hs
index 61362053f5..5a2b9b16fa 100644
--- a/compiler/GHC/Stg/CSE.hs
+++ b/compiler/GHC/Stg/CSE.hs
@@ -102,7 +102,8 @@ import GHC.Types.Var.Env
import GHC.Core (AltCon(..))
import Data.List (mapAccumL)
import Data.Maybe (fromMaybe)
-import GHC.Core.Map
+import GHC.Core.Map.Expr
+import GHC.Data.TrieMap
import GHC.Types.Name.Env
import Control.Monad( (>=>) )