[commit: ghc] master: Kill nameSetElems (31ba8d6)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/31ba8d645d24b16324eb66fd07f007710fdd8ba9/ghc

>---------------------------------------------------------------

commit 31ba8d645d24b16324eb66fd07f007710fdd8ba9
Author: Bartosz Nitka <niteria at gmail.com>
Date:   Mon Jun 6 06:53:25 2016 -0700

    Kill nameSetElems
    
    nameSetElems used `eltsUFM` which is nondeterministic.
    
    Test Plan: ./validate
    
    Reviewers: simonmar, austin, bgamari
    
    Subscribers: thomie
    
    Differential Revision: https://phabricator.haskell.org/D2305
    
    GHC Trac Issues: #4012


>---------------------------------------------------------------

31ba8d645d24b16324eb66fd07f007710fdd8ba9
 compiler/basicTypes/NameSet.hs | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/compiler/basicTypes/NameSet.hs b/compiler/basicTypes/NameSet.hs
index 7bfd915..0ab4ec0 100644
--- a/compiler/basicTypes/NameSet.hs
+++ b/compiler/basicTypes/NameSet.hs
@@ -10,7 +10,7 @@ module NameSet (
 
         -- ** Manipulating these sets
         emptyNameSet, unitNameSet, mkNameSet, unionNameSet, unionNameSets,
-        minusNameSet, elemNameSet, nameSetElems, extendNameSet, extendNameSetList,
+        minusNameSet, elemNameSet, extendNameSet, extendNameSetList,
         delFromNameSet, delListFromNameSet, isEmptyNameSet, filterNameSet,
         intersectsNameSet, intersectNameSet,
         nameSetAny, nameSetAll, nameSetElemsStable,
@@ -57,7 +57,6 @@ unionNameSet      :: NameSet -> NameSet -> NameSet
 unionNameSets  :: [NameSet] -> NameSet
 minusNameSet       :: NameSet -> NameSet -> NameSet
 elemNameSet        :: Name -> NameSet -> Bool
-nameSetElems      :: NameSet -> [Name]
 isEmptyNameSet     :: NameSet -> Bool
 delFromNameSet     :: NameSet -> Name -> NameSet
 delListFromNameSet :: NameSet -> [Name] -> NameSet
@@ -77,7 +76,6 @@ unionNameSet     = unionUniqSets
 unionNameSets = unionManyUniqSets
 minusNameSet      = minusUniqSet
 elemNameSet       = elementOfUniqSet
-nameSetElems     = uniqSetToList
 delFromNameSet    = delOneFromUniqSet
 filterNameSet     = filterUniqSet
 intersectNameSet  = intersectUniqSets