summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSimon Jakobi <simon.jakobi@gmail.com>2021-11-09 20:55:29 +0100
committerMarge Bot <ben+marge-bot@smart-cactus.org>2021-11-12 21:20:17 -0500
commit7b44c816b089de0e4f1a1a4d40a371524c79ab12 (patch)
tree0bf7493f3f88def6c0c89969b07bfdfe4c52063d
parent7cc6ebdfdcf37d25b5ce88a68a0181c6ec0f71dd (diff)
downloadhaskell-7b44c816b089de0e4f1a1a4d40a371524c79ab12.tar.gz
Turn GHC.Data.Graph.Base.Graph into a newtype
-rw-r--r--compiler/GHC/Data/Graph/Base.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Data/Graph/Base.hs b/compiler/GHC/Data/Graph/Base.hs
index 9e8cc383a4..2cc7fdcd24 100644
--- a/compiler/GHC/Data/Graph/Base.hs
+++ b/compiler/GHC/Data/Graph/Base.hs
@@ -42,7 +42,7 @@ type Triv k cls color
-- There used to be more fields, but they were turfed out in a previous revision.
-- maybe we'll want more later..
--
-data Graph k cls color
+newtype Graph k cls color
= Graph {
-- | All active nodes in the graph.
graphMap :: UniqFM k (Node k cls color) }