[commit: ghc] master: Remove unused getScopedTyVarBinds (116d3fe)

[git at git.haskell.org]

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

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/116d3fe67f0f45d1e3e98e3c091eb4d14a121305/ghc

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

commit 116d3fe67f0f45d1e3e98e3c091eb4d14a121305
Author: Bartosz Nitka <niteria at gmail.com>
Date:   Sun May 1 17:56:39 2016 +0200

    Remove unused getScopedTyVarBinds
    
    Test Plan: it compiles
    
    Reviewers: simonpj, austin, goldfire, bgamari, simonmar
    
    Reviewed By: simonmar
    
    Subscribers: thomie, simonmar
    
    Differential Revision: https://phabricator.haskell.org/D2160
    
    GHC Trac Issues: #4012


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

116d3fe67f0f45d1e3e98e3c091eb4d14a121305
 compiler/typecheck/TcEnv.hs | 7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

diff --git a/compiler/typecheck/TcEnv.hs b/compiler/typecheck/TcEnv.hs
index 5bc3d00..006a2f9 100644
--- a/compiler/typecheck/TcEnv.hs
+++ b/compiler/typecheck/TcEnv.hs
@@ -33,7 +33,7 @@ module TcEnv(
         tcLookup, tcLookupLocated, tcLookupLocalIds,
         tcLookupId, tcLookupTyVar,
         tcLookupLcl_maybe,
-        getScopedTyVarBinds, getInLocalScope,
+        getInLocalScope,
         wrongThingErr, pprBinders,
 
         tcAddDataFamConPlaceholders, tcAddPatSynPlaceholders,
@@ -404,11 +404,6 @@ tcExtendTyVarEnv2 binds thing_inside
                   tyvar' = setTyVarName tyvar name'
                   name'  = tidyNameOcc name occ'
 
-getScopedTyVarBinds :: TcM [(Name, TcTyVar)]
-getScopedTyVarBinds
-  = do  { lcl_env <- getLclEnv
-        ; return [(name, tv) | ATyVar name tv <- nameEnvElts (tcl_env lcl_env)] }
-
 isTypeClosedLetBndr :: Id -> TopLevelFlag
 -- See Note [Bindings with closed types] in TcRnTypes
 -- Note that we decided if a let-bound variable is closed by