Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/f0cb41b6ee58814ad965be5a3a9286a34a829b72 >--------------------------------------------------------------- commit f0cb41b6ee58814ad965be5a3a9286a34a829b72 Author: Simon Peyton Jones <[email protected]> Date: Fri Mar 30 12:36:06 2012 +0100 White space only >--------------------------------------------------------------- compiler/basicTypes/RdrName.lhs | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/compiler/basicTypes/RdrName.lhs b/compiler/basicTypes/RdrName.lhs index c8f7c16..7af33a4 100644 --- a/compiler/basicTypes/RdrName.lhs +++ b/compiler/basicTypes/RdrName.lhs @@ -348,7 +348,7 @@ extendLocalRdrEnv (env, ns) name extendLocalRdrEnvList :: LocalRdrEnv -> [Name] -> LocalRdrEnv extendLocalRdrEnvList (env, ns) names - = (extendOccEnvList env [(nameOccName n, n) | n <- names], addListToNameSet ns names) + = (extendOccEnvList env [(nameOccName n, n) | n <- names], addListToNameSet ns names) lookupLocalRdrEnv :: LocalRdrEnv -> RdrName -> Maybe Name lookupLocalRdrEnv (env, _) (Unqual occ) = lookupOccEnv env occ _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
