[commit: ghc] wip/mpickering/rn-env: Remove new name logic from renamer (54e622b)

[git at git.haskell.org]

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

On branch  : wip/mpickering/rn-env
Link       : http://ghc.haskell.org/trac/ghc/changeset/54e622b46f542ed3a2ecb262d1ef6af1023b31f3/ghc

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

commit 54e622b46f542ed3a2ecb262d1ef6af1023b31f3
Author: Matthew Pickering <matthewtpickering at gmail.com>
Date:   Thu Apr 13 12:26:23 2017 +0100

    Remove new name logic from renamer


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

54e622b46f542ed3a2ecb262d1ef6af1023b31f3
 compiler/rename/RnEnv.hs | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/compiler/rename/RnEnv.hs b/compiler/rename/RnEnv.hs
index 5ca8050..8feea01 100644
--- a/compiler/rename/RnEnv.hs
+++ b/compiler/rename/RnEnv.hs
@@ -260,9 +260,7 @@ lookupTopBndrRn_maybe rdr_name
         -- This deals with the case of derived bindings, where
         -- we don't bother to call newTopSrcBinder first
         -- We assume there is no "parent" name
-  = do  { loc <- getSrcSpanM
-        ; n <- newGlobalBinder rdr_mod rdr_occ loc
-        ; return (Just n)}
+  = do  { Just <$> lookupOrig rdr_mod rdr_occ }
 
 -- MP: This looks dodgy, why not just make sure the calls are inserted..