X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Frename%2FRnNames.lhs;h=a7396483d4395425823a4dc8cc90bd989feb94ae;hb=4161ba13916463f8e67259498eacf22744160e1f;hp=e95e4917dbe68aa906e1aff4e5f8a228c945a0ef;hpb=db95d6e8d319b0c5cee1ccc23751e8190152ade3;p=ghc-hetmet.git

diff --git a/ghc/compiler/rename/RnNames.lhs b/ghc/compiler/rename/RnNames.lhs
index e95e491..a739648 100644
--- a/ghc/compiler/rename/RnNames.lhs
+++ b/ghc/compiler/rename/RnNames.lhs
@@ -5,7 +5,7 @@
 
 \begin{code}
 module RnNames (
-	getGlobalNames
+	getGlobalNames, exportsFromAvail
     ) where
 
 #include "HsVersions.h"
@@ -58,7 +58,7 @@ getGlobalNames :: Module -> RdrNameHsModule
 			GlobalRdrEnv,	-- Maps just *local* things
 			ExportAvails)	-- The exported stuff
 
-getGlobalNames this_mod (HsModule _ _ exports imports decls _ mod_loc)
+getGlobalNames this_mod (HsModule _ _ _ imports decls _ mod_loc)
   = 		-- PROCESS LOCAL DECLS
 		-- Do these *first* so that the correct provenance gets
 		-- into the global name cache.