summaryrefslogtreecommitdiff
path: root/compiler/GHC/Core/UsageEnv.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/GHC/Core/UsageEnv.hs')
-rw-r--r--compiler/GHC/Core/UsageEnv.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Core/UsageEnv.hs b/compiler/GHC/Core/UsageEnv.hs
index b8a6dd1468..9c50d79772 100644
--- a/compiler/GHC/Core/UsageEnv.hs
+++ b/compiler/GHC/Core/UsageEnv.hs
@@ -84,7 +84,7 @@ supUE (UsageEnv e1 b1) (UsageEnv e2 b2) = UsageEnv (plusNameEnv_CD2 combineUsage
-- Note: If you are changing this logic, check 'mkMultSup' in Multiplicity as well.
supUEs :: [UsageEnv] -> UsageEnv
-supUEs = foldr supUE bottomUE
+supUEs = foldr supUE bottomUE --
deleteUE :: NamedThing n => UsageEnv -> n -> UsageEnv