summaryrefslogtreecommitdiff
path: root/compiler
diff options
context:
space:
mode:
Diffstat (limited to 'compiler')
-rw-r--r--compiler/GHC/Types/Unique/FM.hs3
1 files changed, 0 insertions, 3 deletions
diff --git a/compiler/GHC/Types/Unique/FM.hs b/compiler/GHC/Types/Unique/FM.hs
index 15ca24e4b2..1be4628d8e 100644
--- a/compiler/GHC/Types/Unique/FM.hs
+++ b/compiler/GHC/Types/Unique/FM.hs
@@ -384,9 +384,6 @@ allUFM p (UFM m) = M.foldr ((&&) . p) True m
seqEltsUFM :: (elt -> ()) -> UniqFM key elt -> ()
seqEltsUFM seqElt = foldUFM (\v rest -> seqElt v `seq` rest) ()
- -- It's OK to use nonDetEltsUFM here because the type guarantees that
- -- the only interesting thing this function can do is to force the
- -- elements.
-- See Note [Deterministic UniqFM] to learn about nondeterminism.
-- If you use this please provide a justification why it doesn't introduce